Memofeld in Ord Werte übertragen

[Bummi]

da ich nicht weiß was Du vorhast, vielleicht ist hierin das enthalten was Du suchst ...

Delphi-Quellcode:

type
 //TByteArray=Array of Byte; // nur für AnsiStrings 
 TByteArray=Array of Word;
Var
 i:Integer;
 ba:TByteArray;
begin
  SetLength(ba,Length(Memo1.Text));
  for I := 1 to Length(memo1.Text)  do
      begin
        ba[i-1] := Ord(memo1.Text[i]);
        ListBox1.Items.Add(IntToStr(ba[i-1]));
      end;

end;