Verständnisfrage zu CoolTrayIcon

[Ati]

Hallo zusammen,

in einem Beitrag habe ich folgenden Code gefunden:

Delphi-Quellcode:

procedure TForm1.ctiStartup(Sender: TObject; var ShowMainForm: Boolean);
begin
  showmainform:=false;

end;

Damit soll es angeblich klappen das mein Programm automatisch nur als TrayIcon gestartet wird. Allerdings funktioniert das nicht. Ich habe es dann zwar anders hinbekommen nur wurmt mich das so ein bischen das es so nicht funktioniert. Habe ich was übersehen oder falsch gemacht.

Ati

[Cyberbob]

Also bei mir gehts!

Du darfst das nicht einfach in den Quelltext schreiben!
Du musst im Objektinspektor vom TrayIcon auf Ereignisse klicken und dann unten auf OnStartup doppelklicken.
Nun einfach nur "ShowMainForm := False;" in der neu erstellten Prozedur eintippen und es geht.

[Ati]

Hab ich ja so gemacht. Werde es morgen einfach nochmal versuchen. Zur Not mit einem Testprojekt.

[Cyberbob]

Probier mal mein Testprojekt aus. Evtl hängt es ja an deiner Delphi-Version oder CTI-Version ab...

[Ati]

Bekam schon beim öffnen eine Fehlermeldung. (s.Anhang)
Also habe ich mal ein neues Projekt angelegt und siehe da es hat so funktioniert. Danach wollte ich meine bestehendes Projekt nach dem bekannten Muster ändern und es hat wieder nicht funktioniert?????
Auch wenn ich es jetzt noch nicht machen wollte, so stelle ich mal mein Projekt hier rein. Vielleicht mache ich ja nur einen Flüchtigkeitsfehler. Bitte seid gnädig mit eurer Kritik. So habe ich nicht mehr benötigte Codeteile noch nicht gelöscht.

Ati

[Ati]

Ups hatte ja die Fehlermeldung vergessen

[3_of_8]

Ihr könnt einfach in den Projektquellcode gleich nach dem "begin" "Application.ShowMainForm:=False" reinschreiben.

[Ati]

Wie ich in meinem ersten Beitrag ja geschrieben hatte, habe ich ja eine Lösung (und zwar Deine) gefunden. Nur möchte ich jetzt doch wissen warum es bei einem leeren/neuen Projekt funktioniert und in meinem bestehenden nicht. Brauchst mich aber nicht mit "Ihr" anreden ;-)

Ati

[3_of_8]

Showmainform:=True bei ctiStartup ist aber was anderes als Application.ShowMainForm:=True. Und das geht in JEDEM Projekt.

Und ich meinte dich und Cyberbob.

[mr.unbekannt]

mach doch einfach form1.minimize müsste auch klappen!