Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: ASCII Zeichenkette

   
    by mr.winkle, 9. Mär 2007
  also in deinem Fall z.B:
  
  procedure TForm1.Button1Click(Sender: TObject);
  var i:integer;
  begin
  label1.Caption:='';
  for i:=1 to length(edit1.Text) do
  Label1.Caption := label1.Caption+' '+inttostr(ord(Edit1.text));
  end;