Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Mehrere Parameter (https://www.delphipraxis.net/61143-mehrere-parameter.html)

freak4fun 17. Jan 2006 15:28


Mehrere Parameter
 
Hallo :hi:,
ich schreibe eine Konsolenanwendung und möchte 3 Parameter übergeben. (programm.exe -c -50 -0) Dabei sinfd die Parameter bereits mit Defaultwerten belegt. Wie kann ich prüfen, welcher Parameter gesetzt wurde, wenn ich das Programm zum Beispiel so aufrufe: programm.exe -50 also mit nur einem Parameter, der nicht der erste ist.
Kann man die irgendwie einfach unterscheiden? :wiejetzt:

MfG
freak

Matze 17. Jan 2006 15:37

Re: Mehrere Parameter
 
Du kannst mit

Delphi-Quellcode:
for i := 1 to ParamCount - 1 do
  Parameter := ParamStr(i);
die Parameter abfragen. Keine Ahnung, ob dir das nun hilft, aber da kannst du ja überprüfen, welcher Parameter gesetzt wurde. Oder geht das bei Konsolenanwendungen nicht. :gruebel:

freak4fun 17. Jan 2006 15:40

Re: Mehrere Parameter
 
Hm... das hab ich auch stehen. Ich werde wohl -drive=c -space=50 und -timestam=0 benutzen müssen und dann schauen welcher Parameter gesetzt ist. :(

Ich bin für einfachere Lösungen offen. ;)

MfG
freak

shmia 17. Jan 2006 16:14

Re: Mehrere Parameter
 
Zitat:

Zitat von freak4fun
Ich bin für einfachere Lösungen offen. ;)

Code-Library: Kommandozeilen Parameter parsen

freak4fun 17. Jan 2006 16:21

Re: Mehrere Parameter
 
Danke! :)

MfG
freak

Amateurprofi 17. Jan 2006 21:19

Re: Mehrere Parameter
 
Zitat:

Zitat von Matze
Delphi-Quellcode:
for i := 1 to ParamCount - 1 do
  Parameter := ParamStr(i);

@matze: Nicht ... to ParamCount-1 sondern ... to ParamCount

Matze 17. Jan 2006 21:27

Re: Mehrere Parameter
 
Zitat:

Zitat von Amateurprofi
@matze: Nicht ... to ParamCount-1 sondern ... to ParamCount

Hallo. Ups, hast recht. :oops:


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:52 Uhr.

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