Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Eigene Anwendung mit Parametern starten ? (https://www.delphipraxis.net/16073-eigene-anwendung-mit-parametern-starten.html)

Bit Juggler 9. Feb 2004 20:48


Eigene Anwendung mit Parametern starten ?
 
Hallo zusammen :)

Ich hoffe ich bin im richtigen Abschnitt gelandet mit meiner Frage!

Ich möchte gerne eine Anwendung schreiben die ich mit Parametern starten kann.
Ich habe dazu schon etwas hier im Forum gesucht aber leider nichts gefunden!
Ich stelle mir das zum Beispiel so vor:

'Project1.exe -zu'

Startet Project1.exe mit der Ausgabe der Systemzeit in einem Label...(nur ein Beipiel halt um zu verdeutlichen was ich meine ;) )
Kann mir dazu vielleicht jemdan etwas hilfestellung leisten?

Gruß Bit

hboy 9. Feb 2004 20:54

Re: Eigene Anwendung mit Parametern starten ?
 
dafür gibt es paramstr

Delphi-Quellcode:
parameter := paramstr(1);

hboy 9. Feb 2004 20:56

Re: Eigene Anwendung mit Parametern starten ?
 
also

Delphi-Quellcode:
procedure TForm1.OnCreate(Sender:TObject);
begin
  if paramstr(1) = '-zu' then close;
end;

Bit Juggler 10. Feb 2004 21:27

Re: Eigene Anwendung mit Parametern starten ?
 
Vielen Dank!

Tpercon 10. Feb 2004 21:39

Re: Eigene Anwendung mit Parametern starten ?
 
Du mußt aber vorher erstmal schauen ob paramcount > 0 ist.
Dann mittels Schleife alle Parameter durchsuchen und n deinem Beispiel auf zu überprüfen. Schließlich kann der Benutzer ja sonstwas eingeben!

Bit Juggler 14. Feb 2004 21:04

Re: Eigene Anwendung mit Parametern starten ?
 
Hi,
ja das war mir klar!
Ich habe alle möglichen Parameter genau deklariert, und ob ParamStr > 0 ist habe ich auch überprüft!


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:46 Uhr.

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