Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.04.29;
Скачать: CL | DM;

Вниз

Открыть форму...   Найти похожие ветки 

 
wHammer ©   (2002-04-16 13:41) [0]

У меня затруднение. Необходимо открыть одну форму (второстепенную), в ней выбрать кой-какие параметры, затем эту форму уничтожить раз и навсегда, открыть другую (главную), уже до конца работы программы. Проблемы со свертыванием окна на панель задач.


 
Song ©   (2002-04-16 13:42) [1]

на onClose второстепенной формы указать Action:=caFree;


 
wHammer ©   (2002-04-16 14:32) [2]

Да нет, вопрос в том, как активизировать "второстепенную" форму раньше главной, причем, как-бы не создавая главную. Затем, после ввода значений, закрыть её и открыть главную.


 
Song ©   (2002-04-16 14:34) [3]

TApplication.MainForm
TApplication.ShowMainForm


 
shane54 ©   (2002-04-16 14:36) [4]

В Project Options в закладке Forms поставь AutoCreate Form нужную тебе форму. Только помни, что первая открывшаяся форма становится ГЛАВНОЙ формой со всеми вытекающими отсюда последствиями (в твоем случае - при закрытии ГЛАВНОЙ формы программа прекращает работу...)


 
wHammer ©   (2002-04-16 14:42) [5]

Отлично, то что надо!!!


 
wHammer ©   (2002-04-16 14:46) [6]

...век живи, век учись, а об ShowMainForm ничего не знал. Спасибо Song.


 
Виктор Щербаков ©   (2002-04-16 14:51) [7]

program Project1;

uses
Forms,
Unit1 in "Unit1.pas" {Form1},
Unit2 in "Unit2.pas" {Form2};

{$R *.RES}

begin
Application.Initialize;
with TForm2.Create(nil) do
begin
ShowModal;
Free;
end;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.

Form2 не должна создаваться автоматически



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

Текущий архив: 2002.04.29;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.013 c
4-94610
MARcoDEN
2002-02-19 20:20
2002.04.29
Аналог функции ExtractFileName


1-94477
User_OKA
2002-04-15 10:23
2002.04.29
Реестр


4-94639
Grim Rider
2002-02-20 13:20
2002.04.29
Hook


1-94478
Марина
2002-04-16 08:37
2002.04.29
Install Shield Express


3-94336
Black-Grin
2002-04-05 22:35
2002.04.29
Delphi 5,6 + Mysql