Thema: Delphi Konsole für Anfänger

Einzelnen Beitrag anzeigen

silbsch

Registriert seit: 24. Jan 2008
2 Beiträge
 
#1

Konsole für Anfänger

  Alt 24. Jan 2008, 19:44
Hallo,
ich habe noch nie in meinem Leben mit Delphi programmiert, aber es gibt für alles ein erstes mal
Normalerweise programmiere ich mit C#, doch jetzt muss ich eine Konsolenanwendung in Delphi übersetzen, da sie ohne Framework laufen soll.

Also folgende kurze Aufgabe: Die Anwendung soll 15sek. ein bestimmtes Verzeichnis auf die Existenz einer bestimmten Datei durchsuchen. Sobald die Datei existiert, soll die Anwendung beendet werden und 0 zurückgeben. Wenn die Datei binnen 15sek. nicht erscheint, soll sich die Anwendung ebenfalls beenden und 1 als Errorcode zurückgeben.

Im Moment habe ich folgendes:
Delphi-Quellcode:
begin
  try
    begin
      if ParamCount > 0 then
        begin
          i:=0;
          repeat
            i:=i+1;
            if FileExists(ParamStr(1)+'Bla.txt') then
            begin
              // Abbruch
            end
          until i>=10000;
        end
      else
        Writeln('Falsche Syntax <Programm.exe> <Ergebnisordner>');
    end;
  except
    on E:Exception do
      Writeln(E.Classname, ': ', E.Message);
  end;
end.
Kann mir jemand mit der Zeitschleife weiterhelfen?
Und gibt es bei Delphi so etwas wie Path.Combine in C#?

Vielen Dank
  Mit Zitat antworten Zitat