FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Efectivamente JCarlosas, es del mismo modo, lo que no hace es confirmar la recepcion OK.
Puede que con una rutina de control se pueda realizar, donde el receptor envie una señal de recibido. Esto es lo que probe: [delphi] uses SysUtils, windows; var Puerto,n:integer; Num, Res:byte; Cad:string; Mode:DCB; begin Puerto:=FileOpen('COM1',fmOpenReadWrite);//Abre el puerto Mode.BaudRate := 1200; Mode.ByteSize := 8; Mode.Parity := NOPARITY; Mode.StopBits := ONESTOPBIT; SetCommState(Puerto, Mode); //Ajusta los parámetros Num:=253; // Dato a enviar repeat until FileWrite(Puerto,Num,1)=1; Sleep(1000); // Espera para enviar el siguiente dato end. |
|
|
|