[cyber922]

Здравствуйте, вообщем нужна такая вот помощь, у меня есть программка, которая из модальной формы заставки вызывает главную форму, а мне нужно сделать наоборот... чтобы главная форма вызывала модульную форму. При движении мышки либо нажатии с клавиатуры кнопки(любой) ну как у меня.
Вот моя программа.

Благодарю за оказанную помощь)

[DelphiM0ZG]

Прогу глянул, но так и не понял в чём проблема. Вызывать модальную форму можно так (если результат закрытия не нужно в дальнейшем обрабатывать).

Код:

Form2.ShowModal;

Или так, если имеет значение на какую кнопку (свойство кнопки ModalResult) закрылась модальная форма.

Код:

Var
  mr: Integer;
begin
...
...
  mr:=Form2.ShowModal;
...

А теперь понял проблему: надо в обработчике OnClose модальной формы убрать эту строку:

Код:

Action:=caFree;

[oper]

Эм... Вставить мб процедуру?

Код:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
Form2.ShowModal;
end;

Тогда при нажатии любой клавиши будет появляться модальное окно

[cyber922]

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

Эм... Вставить мб процедуру?

Код:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
Form2.ShowModal;
end;

Тогда при нажатии любой клавиши будет появляться модальное окно

вообщем мне нужно вот так :

из главной формы вызывать модальную форму с картинкой.

А не как у меня из модальной формы главная... поменять местами...

То бишь из главной модальную..

[oper]

КАк я понял вот так будет

[Ildar-tsr]

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

А не как у меня из модальной формы главная... поменять местами..

Дружок, у тебя итак главная форма вызывает модальную. Вызов стоит на FormShow (Form2.ShowModal), т.е. открывается главная форма и сразу же открывается модальное.