Hi,

I'm using synapse to communicate with a cash drawer on my serial port,
using Lazarus and fpc.

I'm using the following code (lifted directly from the example)

procedure TForm1.ButtonTenderedClick(Sender: TObject);
var  ser:TBlockSerial;
begin
  showInput;
  Panel3.Visible:=false;
  LogicPath:=4;
  ser:=TBlockserial.Create;
  try
    ser.RaiseExcept:=True;
    ser.Connect('COM1');
    ser.Config(9600,8,'N',0,false,false);
    writeln (ser.ATCommand(#7));
  finally
    ser.Free;
  end;
end;

Does anyone know if I can interrogate the serial port to find out if
the cash drawer is still open?

-------------------------------------------------------------------------
Sponsored by: SourceForge.net Community Choice Awards: VOTE NOW!
Studies have shown that voting for your favorite open source project,
along with a healthy diet, reduces your potential for chronic lameness
and boredom. Vote Now at http://www.sourceforge.net/community/cca08
_______________________________________________
synalist-public mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/synalist-public

Reply via email to