Hallo
ich komme gerade nicht weiter.
Also ich hab in eine Textdatei Buchstaben zeilenweise geschrieben.
Mit Delphi hab ich diese dann ausgelesen und umgewandelt (
ASCII) und als Zahlen ausgegeben.
Jetzt möchte ich das in einer Textdatei zeilenweise Buchstaben,Zahlen stehen. Das das Programm erkennt wenn es eine Buchstabe ist wandel ich das in Zahl um und wenn das eine Zahl ist dann in einen Buchstaben.
Ich weiß wohl das diese eigentlich ganz einfaches Programmieren ist aber im arbeite mich da momentan so langsam ran
Der Quellecode ist von Buchstabe in Zahl:
Delphi-Quellcode:
procedure TForm1.LeseClick(Sender: TObject);
var
f:textfile;
ch:char;
b:integer;
begin
memo1.clear;
assignfile(f,'Buchstaben.txt');
reset(f);
while not eof(f) do
Begin
readln(f,ch);
b:=ord(ch);
memo1.Lines.add(inttostr(b));
end;
closefile(f);
end;
end.