Cita:
Empezado por usuario87
hola, disculpen ya lo solucione de esta forma:
var
Cadena: string;
Cod: BYTE;
begin
SetLength(Cadena,1);
//cadena:='a';
Cod:=Ord(Cadena[1]);
Form1.Caption:=IntToStr(Cod);
|
Hola, bienvenido a los foros del ClubDelphi. En lo sucesivo, te pido que uses las etiquetas adecuadas para tu código. En esta caso, podrías haber usado la etiqueta [delphi]
Por otra parte, no es necesario usar SetLength, basta que pongas:
// Saludos