R realLearning Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-27 #2 procedure TForm1.Button1Click(Sender: TObject); var I : Integer; begin for I := 0 to 128do begin ListBox1.Items.Add('ASCII: '+IntToStr(I)+','+Chr(I)); end; end;
procedure TForm1.Button1Click(Sender: TObject); var I : Integer; begin for I := 0 to 128do begin ListBox1.Items.Add('ASCII: '+IntToStr(I)+','+Chr(I)); end; end;