Hi!
Also ich würde das mal so machen:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
begin
for i:=1 to length(memo1.Text) do
begin
showmessage(Memo1.Lines.Text[i]);
end;
end;
So hast du jeden einzelnen Buchstaben.
Ciao Frederic