Witam, potrzebuję dodatkowo eksportować dane a,b i c do pliku txt. Jakieś sugestie?
void __fastcall TForm1::Data1CSRead(TObject *Sender, TCustomWinSocket *Socket)
{
int data;
float a, b, c, d;
String bufor;
String dane;
aaa = Data1CS->Socket->ReceiveText();
Data1Buff = Data1Buff + dane;
Data1Buff.Delete(1,Data1Buff.Pos('$')-1);
if ((Data1Buff.Pos('$') == 1)&&(Data1Buff.Pos('\r') > 10))
{
bufor = Data1Buff.SubString(Data1Buff.Pos('$'),Data1Buff.Pos('\r')-Data1Buff.Pos('$'));
if ((strstr(bufor.c_str(), "$OHPR")) != NULL)
{
data = sscanf(bufor.c_str(), "$OHPR,%f,%f,%f,%f", &a, &b, &c, &d);
Data1M->Lines->Add(bufor);
HeadingVL->Caption = FloatToStrF(a, ffFixed,7,1);
PitchVL->Caption = FloatToStrF(b, ffFixed,7,1);
RollVL->Caption = FloatToStrF(c, ffFixed,7,1);
}
Data1Buff.Delete(1,Data1Buff.Pos('\n')) ;
}
Data1Buff.Delete(1,Data1Buff.Pos('\n')) ;
}