hallo teddyman,
z.b.
Delphi-Quellcode:
procedure schreib_ans(sernr: string; ans: Byte); //sernr = die nummer; ans = sernr von 1 bis 4
var
fp: textfile; //dient als filepointer
begin
assignFile(fp, 'C:\Messwerte.txt'); //gibt einen pointer auf die datei
append(fp); //öffnet die datei zum anhängen
writeln(fp, sernr + 'ANS' + IntToStr(ans)); //schreib die sernr + 'Ans' + 1 bis 4
closefile(fp); //schließt die datei wieder
end;
ich hoffe ich konnte dir helfen und du verstehst, was die prozedur macht!
(ich hoffe ich hab mich nich verschrieben)
tschüss,
heiopei
[edit=Luckie]Noch so ein Kanditat ohne Delphi-Tags und das nach über 100 Beiträgen. Mfg, Luckie[/edit]
[edit=Luckie]Warum ist bei dir BBCode im Beitrag deaktiviert? :roll: Mfg, Luckie[/edit]