Witam, udało mi się sklecić taki o to kodzik:
void __fastcall TForm4::Button1Click(TObject *Sender)
{
IdHTTP1->Connect("appmsg.gadu-gadu.pl", 80);
if(IdHTTP1->Connected())
{
AnsiString ODP;
IdHTTP1->Socket->WriteLn("GET /appsvc/appmsg4.asp?fmnumber=NUMER&version=WERSJA&fmt=FORMAT&lastmsg=WIADOMOSC");
IdHTTP1->Socket->WriteLn("Accept: */*");
IdHTTP1->Socket->WriteLn("User-Agent: Mozilla");
IdHTTP1->Socket->WriteLn("Pragma: no-cache");
IdHTTP1->Socket->WriteLn("Host: appmsg.gadu-gadu.pl");
IdHTTP1->Socket->WriteLn("");
}
else
{
ShowMessage("BŁĄD!");
}
}
Jak teraz odebrąć to co odsyła serwer ?