Einzelnen Beitrag anzeigen

khh

Registriert seit: 18. Apr 2008
Ort: Südbaden
1.903 Beiträge
 
FreePascal / Lazarus
 
#12

Re: parent minimieren - erweitert

  Alt 28. Nov 2008, 09:07
Zitat von khh:
Zitat von DeddyH:
Wäre es nicht besser, mit GetParentForm das Elternformular zu ermitteln? Parent kann ja auch z.B. ein Panel sein.
ich denke du hast recht,
und dann in abhängigkeit des ergebnises minimieren.

ich danke euch, so funktionierts richtig:


parentForm:= GetParentForm(self);
if (Parent.ClassType.InheritsFrom(TForm)) then
begin
SendMessage(parentForm.handle, WM_SYSCOMMAND, SC_MINIMIZE, 0);
end;


gruss Kh
Karl-Heinz
  Mit Zitat antworten Zitat