Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject); begin Comport1.Connected:=true; Comport1.WriteStr('0200'); Comport1.Connected:=False; end; end.
procedure TForm1.Button1Click(Sender: TObject); begin Comport1.Connected:=true; Comport1.WriteStr('0200'); Comport1.Connected:=False; end; end.
Código Delphi [-] Comport1.WriteStr(#2#0);
Comport1.WriteStr(#2#0);