Hi,
I have approached the Synapse mailing list with this problem, but have
had no response, so it may be a Lazarus issue.
In any case, maybe someone can suggest a work-around....
I have used the following code to send data to a serial printer using
the TBlockSerial synapse variable.
var ser:TBlockSerial;
ser:=TBlockserial.Create;
try
ser.RaiseExcept:=True;
ser.Connect('COM1');
ser.Config(9600,8,'N',0,false,false);
ser.SendString('Invoice: The Galley Restaurant'+#13+#10);
finally
ser.Free;
end;
If I run the above code, there is no response from the printer.
However, if I put a breakpoint into the code and step through it, the
printer prints as expected.
_______________________________________________
Lazarus mailing list
[email protected]
http://www.lazarus.freepascal.org/mailman/listinfo/lazarus
