Fórum Ajuda balança - PortA Serial #194254

Estou precisando de uma apoio(Consultoria) para leitura de dados de balança Toledo, vim do Clipper mais ou menos uns 15 anos nele e a alguns meses estou no Delphi, mas estou apnhando muito para ler os dados de uma balança toledo..

Li artigos, mas mesmo assim naum consegui ainda, estou com dois componentes instalados, o Apro e o async32, qual vc aconselharia.

Configurei a balança para continuamente enviar os dados pela serial quando for colocado algum peso nela e para teste fiz o seguinte, mas continua dando erro

não aparece nada

me ajuda, e se ouver custo me envie


Nilson

SEGUE UM EXEMPLO


procedure TForm1.Button1Click(Sender: TObject);
var
vare : string;
resp : string;

begin
Vacomm1.Open;
if vacomm1.Active Then
Begin
vare := vare+vacapture1.Comm.ReadText;
resp :=resp+vacomm1.ReadText;
label1.Caption:=resp;
edit1.Text:=vare;

Vacomm1.Close;

end;


end;

end.