![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
динамическое создание форм
dolphin © (2004-11-01 22:06:00)как в ходе проги создать новые формы
заранее спасибо
KisaNetik (2004-11-02 06:48:00) [1]>"Создавать новые формы" можно конструктором.
И динамические тоже??????
МММММММММММммммммммммм............
Подскажи как???
Fay (2004-11-02 06:34:00) [2]"Создавать новые формы" можно конструктором.
Удачи.
KisaNetik (2004-11-02 06:28:00) [3]Более удобно создавать форму, как и всегда в IDE Delphi визуально, сохранять её...
Далее из файла dpr (вроде Project1.dpr) удаляем строку
Application.CreateForm(TНазвание_формы, Название_формы);
В главную форму после implementation пишем:
uses Название_формы
далее, в коде (где нужно создать форму) пишем
Название формы:=TНазвание_формы.Create(Application);
Название_формы.Show;
Желательно в самой форме, в событии OnClose прописать:
Action:=caFree;
_student (2004-11-01 22:12:00) [4]
procedure TForm1.Button1Click(Sender: TObject);
var mygrid:TStringGrid;
n:integer;
myform:TForm;
begin
myform:=TForm.Create(Self);
myform.Show;
end;