error al comparar caracteres

[Enan0]

Yo en una epoca trabaje en una empresa (en argentina) que trabajaba con impresores fiscales y con los de matris de puntos (los de carro ancho tipo impresoras) teniamos un problema similar.
al consultarle varias veces el estado.. se solapaban las consultas y el Impresor se colgaba.

como solucion Inclui un Timer en la respuesta. como decis vos.. en 10 segundos aproximadamente.

DAdo que no siempre respondia con la misma rapidez.

Entonces si el impresor estaba ocupado. y se le preguntaba el estado y pasaban pocos segundos.. este respondia y todo seguia perfecto.

El tema es cuando el impresor se demoraba en contestar.. y Plafff..

la DLL del Impresor fiscal moria.

habia que re inicializar TODO..

esa Solucion (talvez no optima) Fue la mejor.

Saludos.

[luisdevis]

No conozco a fondo el Delphi 2009 pero has de tener cuidado con los bucles del tipo que has indicado, te pueden colgar el sistema. El timer que indica schdamian le da un respiro pero es conveniente por algo parecido a application.processmessages para que el procesador dedique tiempo a otras tareas.

leer_inicio:= '';
while ( leer_inicio <> chr($02) ) do
begin
ComPort1.ReadStr(leer_inicio,1);
application.processmessages;
end;