مشکل در استفاده از سوکت دلفی

[ojZim0]

سلام. من تازه از ویژوال بیسیک به دلفی مهاجرت کردم و متوجه شدم که هیچی دلفی نمیشه. اما برای وصل کردن سوکت مشکل دارم.
یعنی با موفقیت به سرور کانکت میشم، بعد از کانکت شدن درخواست رو به سرور ارسال میکنم اما هیچ جوابی از سرور نمیاد مطمئنم سرور مشکلی نداره به دلایل زیر:
1- سرور مال یاهو هست
2- توی وی بی بدون مشکل اطلاعات دریافت میشه
اصلاً شاید من سوکت رو اشتباه انتخاب کرده باشم! توی دلفی هزار تا سوکت بود من نفهمیدم باید از کدوم استفاده کنم، یه چیزی میخوام تو مایه های Microsoft Winsock باشه که توی وی بی ازش استفاده میکردم.
این هم کدهای من:

procedure TfrmMain.btnLoginClick(Sender: TObject);

begin

  TcpClient1.Active    := False;

  TcpClient1.RemoteHost := 'login.yahoo.com';

  TcpClient1.RemotePort := '80';

  TcpClient1.Active    := True;

end;

procedure TfrmMain.TcpClient1Connect(Sender: TObject);

Var LoginStr: String;

begin

  LoginStr := 'GET http://login.yahoo.com/config/login?login=' + txtUser.Text + '&passwd=' + txtPass.text + ' HTTP/1.1' + Chr(13);

  LoginStr := 'Accept-Language: en-us' + Chr(13);

  LoginStr := 'User-Agent: Mozilla/5.0 (compatible; MSIE 8.0; Windows NT 5.1; Expulsion-Creations)' + Chr(13);

  LoginStr := 'Accept: */*' + Chr(13);

  LoginStr := 'Host: login.yahoo.com' + Chr(13);

  LoginStr := 'Connection: Keep-Alive' + Chr(13) + Chr(13);

  TcpClient1.Sendln(LoginStr);

end;



procedure TfrmMain.TcpClient1Receive(Sender: TObject; Buf: PAnsiChar;

  var DataLen: Integer);

begin

  ShowMessage('daryaftShod');

end;

دوستان ممنون میشم کمک کنید.

بعداً نوشت: انگار سیستم ویبولتین توی کدهای من خودبه خود تغییر ایجاد کرده. چون داخل کدهای من لینک هست ممکنه شما کد تگ لینک رو به صورت <a ببینید و بهش اعتنا نکنید. ممنون