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
|