Einzelnen Beitrag anzeigen

meik

Registriert seit: 25. Okt 2007
Ort: Frankfurt am main
12 Beiträge
 
#1

Inhalt der textdatei löschen

  Alt 5. Nov 2007, 21:27
hallo,

ich wollte aus einer Textdatei den ersten Zeil löschen, das problem das ich die ganze textdatei lösche

der code sieht so aus:

Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
var
  S1: Integer;
begin
  S1 := 0;
  try
    memo1.Lines.LoadFromFile('command.txt');
    S1 := StrToInt(memo1.Lines[0]);
    deletefile('command.txt');
  except
  end;
  case S1 of
    1: button1click(self);
    2: button2click(self);
  end;
Frage: wie kann ich den Inhalt der Textdatei löschen ohne den ganzen FILE, bitte korrigiere mir den Code.


[edit=Matze][delphi]-Tags gesetzt. Zukünftig bitte selbst einfügen. MfG, Matze[/edit]
  Mit Zitat antworten Zitat