Textdatei anlegen...

[Teddyman]

Hallo zusammen, habe folgende Frage:
Habe ein kleines Programm geschrieben, womit ich Schrittmotoren positionieren kann. Bei jeder Position möchte ich einen Sensoren einlesen und den Wert in eine Textdatei speichern.
Mit der Positionierung 1 (siehe Code) klappt es schon.
Nun möchte ich auch für die Positionierung 2 den Sensorwert in die selbe Textdatei schreiben, ohne den vorherigen Wert zu überschreiben.
Kann mir jemand helfen?
Danke.Grüße.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var Text_Datei : TextFile;
s : String;
begin 

   //Start Positionierung 1
   Wait(3000);            // axis,  pos,   svel,  mvel,   Tacc
   _8132_start_a_move( 0,   18000,  0,    3000,   0.1);

   //In Textdatei schreiben
   AssignFile (Text_Datei, 'C:\Test.txt');
   Rewrite(Text_Datei);
   s := A_Volt.Text;
   Write(Text_Datei,s);
   CloseFile(Text_Datei);

   //Start Positionierung 2
   Wait(9000);
   _8132_start_a_move( 0,   13000,  0,    2000,   0.3);
   
   {Hier soll der nächste Wert bei dieser Position in die Test.txt geschrieben werden,
   ohne den vorherigen zu überschreiben}

end;

[edit=Sharky]Delphi-Tags gesetzt. Mfg, Sharky[/edit]