Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

новая форма без модуля? [D6, WinXP]


Sidorovich ©   (2002-10-10 01:02:00) 

нужно создать новую форму только без нового модуля ... те используя основной .... можно так?
и как?


Rouse_   (2002-10-10 03:18:00) [1]

К сожалению автор пока молчит :(

Желаю успехов


А почему   (2002-10-10 03:15:00) [2]

есть такая уверенность, что автору нужны две разныеформы? Может он спрашивает только о том как создать еще один экземпляр некоей формы?


Rouse_   (2002-10-10 01:49:00) [3]

> Anatoly Podgoretsky © (10.10.02 01:28)

Зачем же в отдельном модуле? Если имеется Unit то можно 2 формы в одном юните положить и никакого динамического создания

Желаю успехов


Anatoly Podgoretsky   (2002-10-10 01:28:00) [4]

НельзяЮ каждая форма должна быть в отдельном модуле, чисто динамическое создание это отдельная песня.


AL2002   (2002-10-10 01:09:00) [5]

public

frmCurrent : TForm;
procedure ShowForm (aOwner : TPanel);
procedure CloseForm;

end;

procedure TfrmMain.ShowForm (aOwner : TPanel);
begin
frmCurrent.Parent := aOwner;
frmCurrent.Show;
end;

procedure TfrmMain.CloseForm;
begin
frmCurrent.Close;
end;

procedure TfrmMain.aNewForm(Sender: TObject);
begin
frmCurrent := TForm1.Create(Self);
ShowForm (pnlWork);
end;

procedure TfrmMain.aClose(Sender: TObject);
begin
CloseForm;
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо