Duda al leer el puerto serie

[alloger]

Muchas gracias por vuastra ayuda, por fin lo he conseguido, tengo un pequeño error de baud-rate pero ese es otro tema. Este es el codigo con el cual leo el puerto serie:

//-----------------------------------------------------------------------
void __fastcall TForm1::ComPort1RxChar(TObject *Sender, int Count)
{
if(x==0)
{
AnsiString a, dato1;
ComPort1->ReadStr(a,Count);
dato1 = AnsiString((int)(a.c_str()[0]));
Label8->Caption = "";
Label8->Caption =dato1;
temperatura= StrToInt(dato1);
x=1;
}
}

Gracias de nuevo, si sale alguna otra duda os la comento

Un saludo