Как сделать одну форму поверх другой

[lu_una]

Доброе утро!
Как сделать одну форму поверх главной?
Пробовала AboutBox.Show; во всяческие события главной формы, в каких то выводил,в каких то- непонятно как. Но в каждом случае при закрытии приложения были ошибки.
Как правильно это сделать?

[FaTaL]

Попробуй AboutBox.ShowModal;

[lu_una]

Пробовала что то с Шоумодал.. Но главное -какое событие?!

[FaTaL]

Ну тогда киньте код, что именно Вы делаете или хотите добиться. Что-то я Ваше первое сообщение понять никак не могу, что Вы хотите.

[lu_una]

Сообщение от lu_una

Как сделать одну форму поверх главной?
Пробовала AboutBox.Show; ...

Какой еще код? По-моему вполне четко задала вопрос.
Чтобы сразу при старте приложения, на заднем фоне- главная форма, спереди -вторая.

[Аватар]

program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
    procedure FormActivate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm1.FormActivate(Sender: TObject);
begin
  Form2:=TForm2.Create(Application);
  Form2.ShowModal;
  Form2.Free;
end;

end.

Как сделать одну форму поверх главной?

Какой еще код? По-моему вполне четко задала вопрос.
Чтобы сразу при старте приложения, на заднем фоне- главная форма, спереди -вторая.

Вопрос и его расшифровка явно из разных опер

[FaTaL]

Сообщение от lu_una

Какой еще код? По-моему вполне четко задала вопрос.
Чтобы сразу при старте приложения, на заднем фоне- главная форма, спереди -вторая.

И теперь прочтите свой первый пост. Совершенно разные темы. Вы лучше точнее объясните, что именно Вы хотите сделать? Чтобы в обоих формах можно было работать или Вы просто хотите сделать заставку при запуске своей программы?

[Stilet]

одну форму поверх главной?

А может тебе нужна MDI схема, где второстепенные формы являются как бы компонентами главной, и отрисовываются в ее пределах, но поверх?

[Yurk@]

Form2.FormStyle:=fsStayOnTop;

не?

[lu_una]

MDI - оно!!)) спасибо большое !!) разбираюсь)
Ага.. для существующего ребенка есть код, для второго я пишу тоже самое?

procedure TMainForm.CreateMDIChild(const p: TMemoryStream; name : String);
var
  Child: TMDIChild;
begin                              
             Child := TMDIChild.Create(MainForm);

        Child.Initialize(p);
        Child.Caption := name;
end;

У ребенка меняю FormStyle еще. У ребенка имя обязательно менять??
Просто Form3 можно оставить или нет?? Не хочется менять