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
 
#4

Re: Umgang mit Textdatei

  Alt 19. Apr 2004, 18:03
Alles wird eingelesen .... warte kurz , ich suche mal eben den Source Code...


Delphi-Quellcode:

procedure ZeichenFuerZeichen;
var
  i:integer; // Schleifen Zähler
  CharsInFile:Integer; // Anzahl der Zeichen insgesammt
  AktZeichen:String; // Aktuelles Zeichen
Begin
  charsinfile:=form1.richedit1.GetTextLen; // Holt aus dem Richedit Feld Die länge der Zeichen
  for i:= 1 to charsinfile do
  begin
    AktZeichen := Copy(richedit1.text,i,1); // kopiert Zeichen für Zeichen in Variable AktZeichen
  End;
End;
Ich denke das wars .....
Justiver
Das schwere machen wir jetzt und das unmögliche später !
  Mit Zitat antworten Zitat