
30.07.2007, 08:28
|
 |
Модератор
|
|
Регистрация: 07.10.2005
Адрес: Москва
Сообщения: 2,907
Версия Delphi: Delphi XE
Репутация: выкл
|
|
Неправда Ваша!
Цитата:
Сообщение от 4kusNick
Код:
procedure TForm1.N3Click(Sender: TObject);
begin
//Form2.Create; // эту и нижнюю строку нужно раскомментировать,
// если форма 2 у вас исключена из списка
// автоматически создаваемых форм (в настройках
// проекта)
//ТАК НЕЛЬЗЯ!!!! Нужно так:
//Form2:=TForm2.Create(nil); //или ...TForm2.Create(self); это по желанию
Form2.ShowModal;
//Form2.Free;
end;
|
|