Thema: Delphi Erweitete Startfunktion

Einzelnen Beitrag anzeigen

EarthQuaker

Registriert seit: 14. Apr 2007
Ort: Pirna
50 Beiträge
 
Delphi 7 Enterprise
 
#3

Re: Erweitete Startfunktion

  Alt 16. Aug 2007, 16:07
Danke habe es jetzt mal nach dem Delphi beispiel getestet da meinte und bringt er mir einen fehler

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);

var
  i: Integer;
  for i := 1 to ParamCount do
  begin
    if LowerCase(ParamStr(i)) = 'beepthen
      Beep
    else if LowerCase(ParamStr(i)) = 'exitthen
      Application.Terminate;
  end;
end;
da meinte er der fehler ist bei for

an was könnte das liegen?
  Mit Zitat antworten Zitat