![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Расположение форм
Aszbed © (2002-08-19 06:14:00)У МЕНЯ ПРОБЛЕМА С ФОРМАМИ:
ФРАГМЕНТ КОДА:
PROCEDURE BUTTON1.CLICK
BEGIN
FORM2.SHOWMODAL
END;
ДРУГОЙ ФРАГМЕНТ (В ДРУГОЙ ФОРМЕ)
PROCEDURE BUTTON2.CLICK
BEGIN
FORM2.CLOSE;
FORM1.SHOW;
END;
НО FORM1 НЕ РЕАГИРУЕТ НИ НА КАКИЕ ДЕЙСТВИЯ??? ЧТО ЭТО Я НЕПРАВИЛЬНО ДЕЛАЮ???
Aszbed (2002-08-19 07:14:00) [1]npAKtuk © ВОТ именно!!!! в других формах хватало только Form2.close ... а в этой уже не хватает :(((
npAKtuk (2002-08-19 07:03:00) [2]А что насчет вида FORM1?
Вообще-то достаточно Form2.Close...если у тебя Form1 как fsMDI-Parent или fsNormal. И ещё проверь Default Monitor...Form1 (если она главная) надо поставить как ActiveForm, а Form2(как модальная форма) как Dialog.
Пробуй :)
Opuhshii (2002-08-19 06:54:00) [3]PROCEDURE BUTTON1.CLICK???
с формами ли проблема?,.. ты свою кнопку пишешь?,...
interface
....
TForm1= class(TForm)
...
procedureBUTTON1Click(Sender:Tobject);
implementation
usesUnit2;// или где у тебя описана Form2..
procedureTForm1.BUTTON1Click(Sender:Tobject);
begin
Form2.ShowModal;
end;