Ver Mensaje Individual
  #2  
Antiguo 14-09-2007
Mick Mick is offline
Miembro
 
Registrado: may 2003
Posts: 405
Reputación: 22
Mick Va por buen camino
Hola,

Código:
var
 n:integer;
 b1,b2:char;
begin 
  n:= $EA03;
  b1:= PChar(@n)[0];
  b2:= PChar(@n)[1];
end;
Saludos
Responder Con Cita