Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Programm schließen im FormCreate (https://www.delphipraxis.net/114873-programm-schliessen-im-formcreate.html)

Reinhardtinho 2. Jun 2008 10:42

Re: Programm schließen im FormCreate
 
Hi,

Wenn keine vorherige Prüfung stattfinden soll, wie Luckie das vorgeschlagen hat, würde ich mit PostMessage arbeiten.


MFG
Lorenz


[Edit]Bernhard Geyer war schneller ... :stupid: ... kein roter Kasten im Firefox?[/Edit]

hitzi 2. Jun 2008 10:43

Re: Programm schließen im FormCreate
 
Zitat:

Zitat von Luckie
Die Vorschläge werden ja immer schlimmer.

Hehe ... warum dass denn schon wieder? Ich würde es ja verstehen, wenn du bei der Verwendung von "Halt" rummeckerst, aber so?!

mleyen 2. Jun 2008 11:06

Re: Programm schließen im FormCreate
 
Warum nicht folgendes:

Delphi-Quellcode:
initialization

Application.ShowMainForm := IfIniExitsShowTheForm;
?
Oder direkt im Projektcode das nötige FileExist einbauen

Edit: Arg ich häng grad voll daneben sry^^, das würde ja nur ein hide zur Folge haben...

Hier:

Delphi-Quellcode:
...
uses
  SysUtils,
...

if FileExists(pfad + 'admincfg.ini') then
Application.CreateForm(TForm1, Form1);
...

JSB 2. Jun 2008 11:39

Re: Programm schließen im FormCreate
 
ich habs erstmal im Projektquelltext gemacht...
Nachteil ist das ich (eigentlich) unnötigerweise die Units IniFiles, SysUtils und Dialogs hinzufügen musste

Die weiteren Vorschläge werde ich testen um eine Optimale Lösung für mich finden.
Danke an alle. :thumb:

Luckie 2. Jun 2008 11:46

Re: Programm schließen im FormCreate
 
Zitat:

Zitat von JSB
ich habs erstmal im Projektquelltext gemacht...
Nachteil ist das ich (eigentlich) unnötigerweise die Units IniFiles, SysUtils und Dialogs hinzufügen musste

Wieso? Es reicht doch zu prüfen, ob sie da ist. Auslesen kannst du sie doch in Konstruktor des Formulares.

JSB 2. Jun 2008 11:52

Re: Programm schließen im FormCreate
 
ja...
schon...

hab's aber dann an 2 verschiedenen Stellen...

Fussball-Robby 2. Jun 2008 11:55

Re: Programm schließen im FormCreate
 
Zitat:

Zitat von spawn89
Delphi-Quellcode:
...
uses
  SysUtils,
...

if FileExists(pfad + 'admincfg.ini') then
Application.CreateForm(TForm1, Form1);
...

Das ist doch nur eine Zeile. Und den Rest lässt du einfach so im OnCreate, ohne das FileExists natürlich :wink:

JSB 2. Jun 2008 12:41

Re: Programm schließen im FormCreate
 
und die Fehlermeldung ?

Delphi-Quellcode:
uses
  ... SysUtils, Dialogs,

...


else
    Messagedlg('Fehler! Konfigurationsdatei "admincfg.ini" nicht gefunden!', mtError, [mbOK], 0);
wenn ich nur den Pfad prüfe und die Ini im Show/Create auslese spar ich mir nur die IniFiles im Projekt.

...ist aber weiterhin nicht schlimm.
Beide Lösungen sind ok


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:10 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz