Delphi 8: Wo sind die ganzen Komponenten?

[sakura]

Und nun zur Nachbildung des TCP Protokolls, wieder anhand des Downloads der DP-Homepage.

Delphi-Quellcode:

uses
  System.Windows.Forms,
  System.Net.Sockets,
  System.Text;

[...]

procedure TWinForm.Button1_Click(sender: System.Object; e: System.EventArgs);
var
  tcp: TcpClient;
  Stream: NetworkStream;
  Data: array of Byte;
  SB: StringBuilder;
  Read: Int32;
begin
  tcp := TcpClient.Create;
  tcp.Connect('www.delphipraxis.com', 80);
  Stream := tcp.GetStream;
  Data := System.Text.Encoding.ASCII.GetBytes(
      'GET / HTTP/1.0'#10'host: www.delphipraxis.com'#10#10);
  Stream.Write(Data, 0, Length(Data));

  SetLength(Data, 256);
  SB := StringBuilder.Create;

  repeat
    Read := Stream.Read(Data, 0, Length(Data));
    SB.Append(Data, 0, Read);
  until Read = 0;

  MessageBox.Show(SB.ToString);
end;

Hier der MSDN Link: http://msdn.microsoft.com/library/de...ClassTopic.asp

......