Muchas gracias por el mensaje, no habia pensando en eso, hago los cambios y ahi les comento.
MI consulta es como actualizar la variable o el memo o edit para que en cada que lea los datos se actualice, al momento de lecturar me muestra lo siguiente:
Consultorio A|
y si vuelvo a lecturar me muestra:
Consultorio A|Consultorio A y asi va incrementando
No se donde colocar codigo para que lea datos y solo muestre
Consultorio A cada que leo
hice este cambio;
Código Delphi
[-]
procedure TF_Principal.ComPortRxChar(Sender: TObject; Count: Integer);
var
cadena,Str: String;
begin
edit1.text:='';
ComPort.ReadStr(Str, count);
edit1.Text:=edit1.Text+ Str;
end;
pero no hace que por mas que presione mas de dos veces solo me me muestre Consultorio A
Estare atento a sus comentarios amigos del foro