OK mal wieder String in txt-dateien ... iss warscheins ganz simpel aber ich komm nich dahinter .... also zu meinem problem wie kann ich wenn ich 2 gegebene strings habe von dem ersten bis ende der datei alles ausgeben und von anfang der datei bis zu dem anderen .
bisher habe ich das so, das ich von dem einen bis zu dem anderen alles ausgeben kann in einer listbox
Delphi-Quellcode:
if ioResult <> 0 then halt;
While Not EoF(f) Do Begin
ZNr:=ZNr+1;
ReadLn(f,zeile);
gefzeit:=StrToTime( copy(zeile,12,8) );
if (gefzeit>=zeit1) AND (gefzeit<=zeit2) Then
begin
ListBox1.Items.Add( copy(zeile,1,19)+': '+IntToStr(zNr)+' --> '+Kammertext(zeile,KammerNr));
X:=StrToDateTime(copy(zeile,12,8));
Y:=StrToInt(Kammertext(zeile,KammerNr));
FTabelle.Series1.AddXY(X,Y);
end;
end;
jo aber muss ich da ne andere abfrage machen??ß
pls um hilfe bye foxy
