syntax ord(x)

[Klaus01]

Hallo,

ist vielleicht besser so?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject); 
var 
s,b:string ; 
  i:integer; 
begin 

  s := edit1.text; 
  for i:=1 to length(s)      do 
    begin
      b := s[i]; 
      ListBox1.Items.Add(IntToStr(ord(b))  ; 
    end;

end;

Grüße
Klaus