Расположение форм

← →
Aszbed (2002-08-19 06:14) [0]

У МЕНЯ ПРОБЛЕМА С ФОРМАМИ:
ФРАГМЕНТ КОДА:
PROCEDURE BUTTON1.CLICK
BEGIN
FORM2.SHOWMODAL
END;
ДРУГОЙ ФРАГМЕНТ (В ДРУГОЙ ФОРМЕ)
PROCEDURE BUTTON2.CLICK
BEGIN
FORM2.CLOSE;
FORM1.SHOW;
END;
НО FORM1 НЕ РЕАГИРУЕТ НИ НА КАКИЕ ДЕЙСТВИЯ??? ЧТО ЭТО Я НЕПРАВИЛЬНО ДЕЛАЮ???

← →
Opuhshii © (2002-08-19 06:54) [1]

PROCEDURE BUTTON1.CLICK???
с формами ли проблема?,.. ты свою кнопку пишешь?,...
interface
....
TForm1= class(TForm)
...
procedure BUTTON1Click(Sender:Tobject);

implementation

uses Unit2; // или где у тебя описана Form2..
procedure TForm1.BUTTON1Click(Sender:Tobject);
begin
Form2.ShowModal;
end;

← →
npAKtuk © (2002-08-19 07:03) [2]

А что насчет вида FORM1?

Вообще-то достаточно Form2.Close...если у тебя Form1 как fsMDI-Parent или fsNormal. И ещё проверь Default Monitor...Form1 (если она главная) надо поставить как ActiveForm, а Form2(как модальная форма) как Dialog.

Пробуй :)

← →
Aszbed (2002-08-19 07:14) [3]

Расположение форм Найти похожие ветки