Comunicação com balança toledo

preciso ligar meus sistema nas balnaças toledo 9094, na nfrente de caixa

USO DELPHI7 - C/ ASYNC32

MAS NÃO DA NADA

COM1
9600
Eestá configurado no componente, NAUM TENHO EXPERIENCIA NENHUMA NISTO, ALGUEM PODERIA ME ENVIAR UM EXEMPLO


procedure TFor_Qtde_Toledo.BitBtn1Click(Sender: TObject);
var

vare : string;
resp : string;

Begin
vare := #5+10+13;

if not vacomm1.Active then
Begin
Vacomm1.open;
end;


if vacomm1.Active then
Begin
vacomm1.WriteText(vare);
end;

resp:=resp+vacomm1.ReadText; // ASSIM NAUM FUNCIONOU
// ou
vare:=vare+vacomm1.ReadText;// Tmbem naum funcionou

end;



end.


Nilson


Agradeço a todos :-))

T+