Startparameter

[viperen]

Hallo,

ich wollte wissen, wie man Startparameter in Programme einfügt...

z.B.

wenn ich mein Programm folgendermaßen ausführe: programm.exe -c oder mit /c

dann soll die funktion/procedure "controlle" gestartet werden...


DAnke!

[Daniel B]

Hi,

Label1.Caption := ParamStr(1);
Label2.Caption := ParamStr(2);
usw.

C:\programm.exe "text für label 1" "text für label 2"

Mehr ist es nicht...

Gruss, Daniel...

[Amateurprofi]

Zitat von viperen:

wenn ich mein Programm folgendermaßen ausführe: programm.exe -c oder mit /c
dann soll die funktion/procedure "controlle" gestartet werden...

If (ParamStr(1)='-c') or (ParamStr(1)='/c') then ... oder, falls mehrere Parameter in beliebiger Reihenfolge mitgegeben werden können

Delphi-Quellcode:

for i=1 to ParamCount do
   If (ParamStr(i)='-c') or (ParamStr(i)='/c') then ...

[s14]

Es gibt auch noch nützliche Funtionen in SysUtils wie "FindCmdLineSwitch"

[viperen]

Danke sehr!