Ver Mensaje Individual
  #1  
Antiguo 24-02-2005
cesarjbf cesarjbf is offline
Miembro
 
Registrado: may 2003
Posts: 54
Reputación: 21
cesarjbf Va por buen camino
MaskEdit y Puerto paralelo

Hola,resulta que tengo un MaskEdit de solo numeros(3 Digitos), el problema es que lo quiero editar desde una interfase que tengo conectada al puerto paralelo, la cual tiene teclas que representan los numeros del 0 al 9, el codigo de la interfase ya lo tengo y funciona, solo que no se como escribir en la maskedit como si estuviera usando el mismo keyboard.....les agradeceria mucho su respuesta ya que este es el ultimo paso para mi proyecto gracias

uso este codigo:

begin
Bit:=GetPortBit(889,7);{procedimientos que se llaman desde la io.dll}
Buffer:=Portin(889); {el cual lee el byte de entrada}
if (Bit=0) and (Teclado=0) then
begin

case buffer of {Buffer es el valor que leyo y convirtio a decimal}
7:Borrar algo; ; {valor binario convertido a funcion u procedimiento}
15:MaskEdit.???? {aqui es donde quiero introducir el digito,no se como}
23:Memo.lines.Add('algo');
87:Atras;
95:Adelante;
127:Memo1.Lines.clear; {si el byte nos da 127 borra el memo}
end;

Teclado:=1;
end;
if (bit=255) and (Teclado=1) then
Teclado:=0;
end;
__________________
Mexicali
Responder Con Cita