Eine kleine Frage hätte ich noch.
Delphi-Quellcode:
z := Zeilenanzahl-1;
begin;
for s := 0 to Spaltenanzahl-2 do
begin
StringArray[s,z] := ZwSpeicher.Strings[s+2];
Temp := (StringArray[s,z]) + ';';
TestDatei.Write(PChar(Temp)^,Length(Temp));
end;
StringArray[Spaltenanzahl-1,z] := ZwSpeicher.Strings[ZwSpeicher.Count-1];
Temp := (StringArray[Spaltenanzahl-1,z]) + #13#10;
TestDatei.Write(PChar(Temp)^,Length(Temp));
end;
Es wird ja alle 3 Sekunden eine neue Zeile angehängt.Allerdings soll das nur geschehen, wenn sich die Zeilenanzahl verändert hat. Wie kann ich das Prüfen?