Application.Terminate geht nicht mehr ?

**arnof**

Hi im Zuge auf meine Umstellung D5 auf XE2 ist mir aufgefallen, das Application.Terminate keine Funktion mehr hat!

Ich will die Application abschießen (Passwort falsch; keine Lizenz usw.)

**himitsu**

Ich bin mir sicher, daß es noch funktioniert.

Wie und wo nutzt du es denn?

(doch hoffentlich nicht erst im OnCreate der MainForm)

**Der schöne Günther**

Zitat von himitsu:

(doch hoffentlich nicht erst im OnCreate der MainForm)

Selbst da geht es bei mir

VCL oder FMX?

**arnof**

VCL bei Programmstart d.h. entweder bei Create oder showForm

Ich rufe es auf und die Applikation läuft munter weiter (Passwort falsch, dann habe ich Adminrechte

)

**Union**

Das ging ja noch nie so wirklich. Wenn Du sowas machst, solltest Du ein (Application.Terminated) Flag parallel dazu auswerten und noch ablaufenden "Restcode" bedingt ausführen.

**Der schöne Günther**

Application.Terminate() tut doch im Endeffekt eh nichts anderes als nur eine WM_QUIT -Message zu senden, oder?

Wenn ich so etwas habe, dass ich mich nach dem Prüfen von irgendwas eventuell direkt wieder beenden möchte mache ich das generell noch vor Application.Run() . Ob das eine gute Idee ist weiß ich allerdings auch nicht.

**Union**

Bestimmt geht es um eine Benutzeranmeldung die ausgelöst durch ein OnAfterOpen einer Benutzertabelle während der Anzeige eines SplashScreens o.ä. erfolgen soll. Schägt die fehl, soll das Program beeendet werden.

**arnof**

Zitat von Union:

Bestimmt geht es um eine Benutzeranmeldung die ausgelöst durch ein OnAfterOpen einer Benutzertabelle während der Anzeige eines SplashScreens o.ä. erfolgen soll. Schägt die fehl, soll das Program beeendet werden.

So ist es, bevor die Hauptform benutzbar ist muss ich wissen, ob der User es auch darf und was er darf. Bisher ging das Ohne Probleme. Der Quellcode von Delphi her ist bei Application.terminate auch gleich. Anscheinend wird die Message WM_Quit ignoriert!

**arnof**

Wenn Die Anwendung läuft geht es, anscheinend verträgt er es nicht beim Create (dort kann/konnte man auch kein Close setzen). Ich werde es nun über einen Timer lösen, der eingreift!

**Zacherl**

Alternativ ein gutes altes ExitProcess(0)

Application.Terminate geht nicht mehr ?

Application.Terminate geht nicht mehr ?

AW: Application.Terminate geht nicht mehr ?

AW: Application.Terminate geht nicht mehr ?

AW: Application.Terminate geht nicht mehr ?

AW: Application.Terminate geht nicht mehr ?

AW: Application.Terminate geht nicht mehr ?

AW: Application.Terminate geht nicht mehr ?

AW: Application.Terminate geht nicht mehr ?

AW: Application.Terminate geht nicht mehr ?

AW: Application.Terminate geht nicht mehr ?

Forumregeln

arnof Registriert seit: 25. Apr 2013 1.254 Beiträge Delphi 10.1 Berlin Enterprise	#1 Application.Terminate geht nicht mehr ? 13. Jan 2014, 10:10 Hi im Zuge auf meine Umstellung D5 auf XE2 ist mir aufgefallen, das Application.Terminate keine Funktion mehr hat! Ich will die Application abschießen (Passwort falsch; keine Lizenz usw.) SEPA-Komponente für Delphi Banking für Entwickler TSE für Kassenhersteller ZVT für Kassenentwickler
	Zitat

himitsu Registriert seit: 11. Okt 2003 Ort: Elbflorenz 44.063 Beiträge Delphi 12 Athens	#2 AW: Application.Terminate geht nicht mehr ? 13. Jan 2014, 10:14 Ich bin mir sicher, daß es noch funktioniert. Wie und wo nutzt du es denn? (doch hoffentlich nicht erst im OnCreate der MainForm) Neuste Erkenntnis: Seit Pos einen dritten Parameter hat, wird PoSex im Delphi viel seltener praktiziert.
	Zitat

Der schöne Günther Registriert seit: 6. Mär 2013 6.158 Beiträge Delphi 10 Seattle Enterprise	#3 AW: Application.Terminate geht nicht mehr ? 13. Jan 2014, 10:15 Zitat von himitsu: (doch hoffentlich nicht erst im OnCreate der MainForm) Selbst da geht es bei mir VCL oder FMX?
	Zitat

arnof Registriert seit: 25. Apr 2013 1.254 Beiträge Delphi 10.1 Berlin Enterprise	#4 AW: Application.Terminate geht nicht mehr ? 13. Jan 2014, 10:24 VCL bei Programmstart d.h. entweder bei Create oder showForm Ich rufe es auf und die Applikation läuft munter weiter (Passwort falsch, dann habe ich Adminrechte ) SEPA-Komponente für Delphi Banking für Entwickler TSE für Kassenhersteller ZVT für Kassenentwickler
	Zitat

Union Registriert seit: 18. Mär 2004 Ort: Luxembourg 3.492 Beiträge Delphi 7 Enterprise	#5 AW: Application.Terminate geht nicht mehr ? 13. Jan 2014, 10:32 Das ging ja noch nie so wirklich. Wenn Du sowas machst, solltest Du ein (Application.Terminated) Flag parallel dazu auswerten und noch ablaufenden "Restcode" bedingt ausführen. Ibi fas ubi proxima merces sudo /Developer/Library/uninstall-devtools --mode=all
	Zitat

Union Registriert seit: 18. Mär 2004 Ort: Luxembourg 3.492 Beiträge Delphi 7 Enterprise	#7 AW: Application.Terminate geht nicht mehr ? 13. Jan 2014, 10:38 Bestimmt geht es um eine Benutzeranmeldung die ausgelöst durch ein OnAfterOpen einer Benutzertabelle während der Anzeige eines SplashScreens o.ä. erfolgen soll. Schägt die fehl, soll das Program beeendet werden. Ibi fas ubi proxima merces sudo /Developer/Library/uninstall-devtools --mode=all
	Zitat

arnof Registriert seit: 25. Apr 2013 1.254 Beiträge Delphi 10.1 Berlin Enterprise	#9 AW: Application.Terminate geht nicht mehr ? 13. Jan 2014, 10:46 Wenn Die Anwendung läuft geht es, anscheinend verträgt er es nicht beim Create (dort kann/konnte man auch kein Close setzen). Ich werde es nun über einen Timer lösen, der eingreift! SEPA-Komponente für Delphi Banking für Entwickler TSE für Kassenhersteller ZVT für Kassenentwickler
	Zitat

Zacherl Registriert seit: 3. Sep 2004 4.629 Beiträge Delphi 10.2 Tokyo Starter	#10 AW: Application.Terminate geht nicht mehr ? 13. Jan 2014, 10:47 Alternativ ein gutes altes ExitProcess(0) Projekte: - GitHub (Profil, zyantific) - zYan Disassembler Engine ( Zydis Online, Zydis GitHub)
	Zitat