Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Piro,
23. Okt 2006
Danke, es hat geklappt. Ist schon komisch, dass es von der Reihenfolge abhängig ist. Hier die Lösung:
procedure TForm1.ApplicationEvents1Minimize(Sender: TObject);
begin
Form1.FormStyle := fsStayOnTop;
TrayIcon1.Visible := True;
Form1.Hide;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Piro,
23. Okt 2006
Leider geht dann bei 2.Minimieren dann gar nichts mehr. Soll heißen, dass die Mainform sich nicht mehr minimiert.
Man woran kann das denn liegen?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Piro,
23. Okt 2006
Guten Abend,
habe gerade mit TurboDelphi und den beiden Komponenten ApplicationEvent und TrayIcon herum gespielt. Beim Aufruf des Minimieren soll die Application verschwinden und das TrayIcon erscheinen. Ich benutze folgenden Code:
...
procedure TForm1.ApplicationEvents1Minimize(Sender: TObject);
begin
TrayIcon1.Visible := True;
form1.FormStyle := fsStayOnTop;
...