Назначить главную форму в ран-тайме...

← →
IfBeginThenEnd (2005-09-12 13:07) [0]

При создании (OnCreate) главной формы (Form1) вызывается процедура которая при выполнении некоторых условий, динамически создает вторую форму (Form2). Так-как при выполнении этих самых условий, Form2 создается первой, она автоматически назначается главной формой (при ее закрытии, закрывается все приложение, а при закрытии первой ничего не происходит(((), как мне вернуть "корону" превой форме?

← →
MBo © (2005-09-12 13:26) [1]

Читать внимательно хелп по TApplication.MainForm

← →
Anatoly Podgoretsky © (2005-09-12 14:29) [2]

Зачем же ты так делаешь? Какая то ошибка в проектировании?

← →
ssk © (2005-09-12 14:32) [3]

когда-то я делал примерно так:

procedure SetAsMainForm(aForm:TForm); var P:Pointer; begin P := @Application.Mainform; Pointer(P^) := aForm; end;

← →
Del_programmer © (2005-09-12 14:36) [4]

могу сказать , тока на си.

← →
IfBeginThenEnd (2005-09-12 14:49) [5]

Anatoly Podgoretsky © (12.09.05 14:29) [2]

не понял (((, Вы про какую ошибку?

ssk © (12.09.05 14:32) [3]

буду пробовать пасибо!

Del_programmer © (12.09.05 14:36) [4]

не спасибо на си не надо...

Когда создаешь вторую форму - не передавай владельцом Application
Form2:=TForm2.Create(nil);

>[2]
Просто человек пытается сделать в программе рекламу типа: "Если не заплатите, то Вам осталось жить 30 дней"
>>[5]
Я угадал или нет?
Если да, то есть другие способы.

← →
IfBeginThenEnd (2005-09-12 15:13) [8]

Наиль © (12.09.05 14:56) [7]

нет к сожалению не угадали, до шароварных програм которые хоть кому нибудь нужны за деньги еще не дорос.(((

программа реализует записки на рабочем столе (своего рода стики), при запуске она должна отобразить и те записки которые были написаны в прошлом сеансе, но небыли закрыты.
А про другие способы можно поподробнее...

Гаврила © (12.09.05 14:50) [6]

ОK! буду пробовать!

Назначить главную форму в ран-тайме... Найти похожие ветки