Tweet
Hi,
ich würde gerne wissen, wie ich einem Programm verständlich machen kann, dass es auf Parameter reagiert.
Danke :-)
ich würde gerne wissen, wie ich einem Programm verständlich machen kann, dass es auf Parameter reagiert.
Danke :-)
-
-
<br>Hi,...
<br>
<br>Aus der Borland Hilfe (Stichwort ist ParamCount/ParamStr):
<br>procedure TForm1.FormCreate(Sender: TObject);
<br>
<br>var
<br> i: Integer;
<br> for i := 0 to ParamCount – 1 do
<br> begin
<br> if LowerCase(ParamStr(i)) = 'beep' then
<br> Beep(10000,1000)
<br> else if (LowerCase(ParamStr(i)) = 'exit' then
<br> Application.Terminate;
<br> end;
<br>end;
<br>
<br>MfG
<br>P
Comment