Thema: Delphi Umgang mit Textdatei

Einzelnen Beitrag anzeigen

Benutzerbild von justiver
justiver

Registriert seit: 17. Apr 2004
Ort: Hamburg
9 Beiträge
 
Delphi 7 Professional
 
#2

Re: Umgang mit Textdatei

  Alt 19. Apr 2004, 18:00
moin ....

ne Möglichkeit wäre :


Per Schleife Zeichen für Zeichen auszulesen

Delphi-Quellcode:
procedure ZeichenZaehlen;
Var
  AnzahlZeichenInText:Integer; // klar oder ?
  AktZeichen:Integer;
Begin
  AnzahlZeichenInText:=form1.Richedit1.gettextlenght // Beim Richedit Feld
  For i:= 1 to AnzahlZeichenInText do
  Begin
    AktZeichen:=copy (blabla,1,i) //oder so ähnlich
  end
End;
musste ausprobieren
Ich muß kurz mal meinen Source durchkramen ..
Ich glaube (weiß) ich hab' das schon mal gemacht !
werde meinen Beitrag Korrigieren , wenn ich's gefunden habe.
Gruß Justiver
Das schwere machen wir jetzt und das unmögliche später !
  Mit Zitat antworten Zitat