Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject); begin label1.Caption:=Chr(65); end; procedure TForm1.Button2Click(Sender: TObject); begin label1.Caption:=IntToStr(Ord('A')); end;
procedure TForm1.Button1Click(Sender: TObject); begin label1.Caption:=Chr(65); end; procedure TForm1.Button2Click(Sender: TObject); begin label1.Caption:=IntToStr(Ord('A')); end;