Как в одном проекте создать две формы?

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Как в одном проекте создать две формы?

Сообщение yantux » 16.10.2008 15:25:03

Как в одном проекте создать две формы?

Допустим при запуске автоматически создаётся первая форма. Как сделать чтобы в процессе работы программы создавались/уничтожались новые формы?
yantux
постоялец
 
Сообщения: 133
Зарегистрирован: 29.10.2007 16:02:33
Откуда: Санкт-Петербург

Re: Как в одном проекте создать две формы?

Сообщение Mr.Smart » 16.10.2008 15:39:32

Два варианта:
1. Создавать их во время загрузки
Код: Выделить всё
...
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.Run;
...

а после по событию показывать
Код: Выделить всё
...
procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2.Show;
end;
...

2. Создавать динамически
Код: Выделить всё
var
Form2: TForm2;
begin
  Form2:=TForm2.Create(Application)
  Form2.Show;
end;
....
Mr.Smart
долгожитель
 
Сообщения: 1796
Зарегистрирован: 29.03.2008 01:01:11
Откуда: из леса!


Вернуться в Lazarus

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 43

Рейтинг@Mail.ru