Как вызвать новую форму в DELPHI) - Форум ПРОГРАММИСТОВ

Новые сообщения · Правила

Страница 1 из 1 1
Модератор форума: Berestovskiy

Как вызвать новую форму в DELPHI) (Какой способ праквильный и почему?)) Или свой способ..)

Как вызвать новую форму в DELPHI)

вариант 1

uses ...,uForm2;

var
frm2:TForm2;
begin

try
frm2:=TForm2.create(nil);
frm2.show;
finally
freeandnil(frm2);
end;

end;

или

вариант 2
uses ...,uForm2;

var
frm2:TForm2;
begin

try
frm2:=TForm2.create(nil);
frm2.showmodal;
finally
freeandnil(frm2);
end;

end;

Думаю, не ошибусь, если промолчу ;)

№1 | Автор: Archi | 2008-03-13, 23:04 | Изменено: Archi - Чт, 2008-03-13, 23:05 | Репутация: [ + 3 ]

Ну первый вариант похоже не подойдет, так как сразу после показа формы (метод show) выполниться блок finally, в котором память выделенная под форму очистится. А во втором варианте блок finally не выполниться до момента закрытия второй формы, ну или если в блоке try случиться ошибка, поэтому второй вариант правильный. Хотя может кто-то думает иначе cool

№2 | Автор: gerra | 2008-03-15, 14:58 | Репутация: [ + 7 ]

Как вызвать новую форму в DELPHI) (Какой способ праквильный и почему?)) Или свой способ..)

Страница 1 из 1
1

прикладная математика