@leddle: auch ein immer wieder gerne gemachter fehler
aber dafür ist ja der edit-button
die frage ist doch warum machst du das überhaupt mit dyn arrays?
Delphi-Quellcode:
procedure TForm1.JvButton1Click(Sender: TObject);
var email : string;
i : integer;
anzeige:string;
begin
anzeige:='';
email := JvEdit1.Text;
for i := 1 to length(email) do
begin
anzeige:= anzeige + IntToStr(ord(email[i]) * 163) + ':';
end;
JvEdit2.Text := anzeige;
end;