Versuch mal ein crlf mitzusenden.
ComPort.WriteStr(#6#13#13#10);
Ok, durch das ; wird #13 beim Print-Befehl unterdrückt, crlf wird auch nicht funzen.
Da würde ich es mal so versuchen:
Delphi-Quellcode:
var
Buffer: PACKED ARRAY[0..1] OF Byte;
Buffer[0]:= $06;
Buffer[1]:= $13;
ComPort.Write(Buffer, SizeOf(Buffer));