Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.11.14;
Скачать: [xml.tar.bz2];

Вниз

динамическое создание форм   Найти похожие ветки 

 
dolphin   (2004-11-01 22:06) [0]

как в ходе проги создать новые формы  

заранее спасибо


 
_student   (2004-11-01 22:12) [1]

procedure TForm1.Button1Click(Sender: TObject);
var mygrid:TStringGrid;
n:integer;
myform:TForm;
begin
  myform:=TForm.Create(Self);
  myform.Show;

end;


 
KisaNetik   (2004-11-02 06:28) [2]

Более удобно создавать форму, как и всегда в IDE Delphi визуально, сохранять её...

Далее из файла dpr (вроде Project1.dpr) удаляем строку
Application.CreateForm(TНазвание_формы, Название_формы);

В главную форму  после implementation пишем:
uses Название_формы

далее, в коде (где нужно создать форму) пишем

Название формы:=TНазвание_формы.Create(Application);
Название_формы.Show;

Желательно в самой форме, в событии OnClose прописать:
Action:=caFree;


 
Fay ©   (2004-11-02 06:34) [3]

"Создавать новые формы" можно конструктором.
Удачи.


 
KisaNetik   (2004-11-02 06:48) [4]

>"Создавать новые формы" можно конструктором.

И динамические тоже??????
МММММММММММммммммммммм............
Подскажи как???



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.11.14;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.043 c
14-1098623973
Verg
2004-10-24 17:19
2004.11.14
А какой сегодня церковный празник?


3-1097811979
Kair()
2004-10-15 07:46
2004.11.14
TTable


1-1098999368
tchn
2004-10-29 01:36
2004.11.14
как убрать кнопку "закрыть" из заголовка окна и системного меню?


4-1096978644
Delphi5.01
2004-10-05 16:17
2004.11.14
как программно поймать процесс изменения Modify


3-1097670942
Lord de Mon
2004-10-13 16:35
2004.11.14
Две базы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский