Delphi Das Programm einmal Starten. Beispiel.

Thema durchsuchen

Ansicht

Themen-Optionen

Das Programm einmal Starten. Beispiel.

Ein Thema von Karstadt · begonnen am 27. Jan 2006 · letzter Beitrag vom 26. Jul 2006

Vorheriger Beitrag

Nächster Beitrag

Christian Seehase

(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.123 Beiträge

Delphi 11 Alexandria

#11

Re: Das Programm einmal Starten. Beispiel.

28. Jan 2006, 01:06

Moin Karstadt,

mit Application.Terminate habe ich ein kleines Problem.
Nicht, dass es nicht funktionieren würde, aber solche Routinen wie OnClose und OnCloseQuery werden dann nicht mehr verarbeitet (was natürlich manchmal auch gewünscht sein kann). Deshalb nehme ich, i.d.R., nur Close im Hauptformular.

Aber noch einmal zu Deinem Problem:
Die Lösung hast Du doch schon selber geschrieben, mit Deinem if-then-else-Konstrukt.
Für den Fall, dass schon ein passendes Fenster gefunden wurde, werden CreateForm und Run einfach nicht mehr aufgerufen.
Den Aufruf von Terminate, kannst Du dann IMHO auch weglassen.

Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist