Parent у главной формы

← →
Chlavik © (2003-09-26 16:55) [0]

Почему у всех форм Parent это TApplication а вот у главной нет ...??
почему то функция GetParent не находит parent у главной формы...

← →
KSergey © (2003-09-26 16:57) [1]

Она его находит, но это - DeskTop
А у остальных - точно TApplication?

← →
don-do (2003-09-26 16:59) [2]

Вообще-то Parent не должен здесь применяться, это относиться лишь к TControl, которые на чем то должны лежать.

← →
Юрий Федоров © (2003-09-26 17:01) [3]

Не может быть
Parent: TWinControl, TApplication не является TWinControl"ом

← →
Chlavik © (2003-09-26 17:16) [4]

У меня вот так
procedure TfmMain.About2Click(Sender: TObject); var h:Thandle; var fmAbout: TfmAbout; s:array [0..20] of Char; // Имя проги (Application Title у меня 20 символов + нулевой begin h:=FindWindow("TfmAbout",nil); While h<>0 do // не хочется что бы оно нашло окно такого же класа у другой проги begin GetWindowText(GetParent(h),s,21); if s=AppName then begin ShowWindow(h,SW_SHOWNA); exit;end; h:=FindWindowEx(0,h,"TfmAbout",nil); end; Application.CreateForm(TfmAbout, fmAbout); fmAbout.ShowModal; fmAbout.Free; end;

Так вот это код пашет!!!!!! просто у меня можно вызвать About через PopupMenu иконки трэя. А потом когда разварачиваеш прога то получается бред: старое окно About остаётся как бы не в модальным и создаётся новый модальный About ... И вот эту проблему я решаю так, если мона проще то подскажите, но это не важною... Гланое что почемуто у окна About находит а у главной нет.. Если Вместо GetWindowText написать GetClassName то в результе будет Tapplcation а вот для главного окна такой код не работает ...

← →
Юрий Федоров © (2003-09-26 17:20) [5]

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

← →
Chlavik © (2003-09-26 19:13) [6]

Ok

Но всё равно на своей первоначальный вопрос не получил ответ....

← →
Chlavik © (2003-09-26 19:32) [7]

Или как бы сделать что бы он Application был парент у главной формы... Только что бы окно потом показывалось :)

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

Ну я верю тогда как обьснить работающий мой код, почему так???

А лучше скачайте http://www.greatis.com/wdsetup.exe (Advanced Windows Analyser) и посмотрите что она выдаёт!!!! в закладке Parents. Кстати полезная прога, кто не видел.

Parent у главной формы Найти похожие ветки