Ver Mensaje Individual
  #3  
Antiguo 14-06-2007
cmurua71 cmurua71 is offline
Miembro
 
Registrado: nov 2005
Posts: 13
Reputación: 0
cmurua71 Va por buen camino
Cita:
Empezado por Mick
Hay varias formas de hacerlo, por ejemplo usando nuestros amigos los punteros:

Código:
var 
  ptr      :PChar;
  number:single;
  c1,c2,c3,c4:char;
begin

  number:= 13.34;
  ptr:= @number;
  c1:= ptr[0];
  c2:= ptr[1];
  c3:= ptr[2];
  c4:= ptr[3];
 
  // O Directamente sin variables intermedias 
  c1:= PChar(@number)[0];
  c2:= PChar(@number)[1];
  c3:= PChar(@number)[2];
  c4:= PChar(@number)[3]

end;
Saludos
No me funciona así... me da el error ¨Array type required¨ en las 4 lineas c1:=ptr[0] y subsiguientes

y no se como solucionarlo
Responder Con Cita