Cita:
|
Empezado por mjjj
me tira un problema de compatibilidad...
que puede ser... ayuda porfa....
|

Que podrá ser .... Si revisas la ayuda de delphi, veras que a la función Ord se le pasa como parámetro un
Char. Y tu le estas pasando un
String. Así que parece bastante lógico que proteste.
Lo que necesitamos es un Char y tenemos un string, menos mal que delphi permite acceder a cada uno de los caracteres de un string por separado. Por ejemplo, si queremos utilizar el primer carácter de la cadena sub1
Código Delphi
[-]
sub2:=inttohex(ord(sub1[1]),2);
Pero, y que pasa si la cadena sub1 esta vacía, pues que se monta un buen jaleo

Así que va a ser mejor comprobar primero si tiene el tamaño adecuado:
Código Delphi
[-]
if Length(sub1) > 0 then
sub2:=inttohex(ord(sub1[1]),2);