Komischer Fehler mit TClientSocket

[wth]

Hallo,

Ich versuche gerade mit der TClientSocket Komponente eine simple HTTP Anfrage zu senden.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
sock.host:='google.de';
sock.port:=80;
sock.ClientType:=ctnonblocking;
sock.Open; //sock.active:=true;
end;

procedure TForm1.sockConnect(Sender: TObject; Socket: TCustomWinSocket);
begin
Socket.SendText('GET / HTTP/1.0' + #13#10#13#10)
end;

procedure TForm1.sockRead(Sender: TObject; Socket: TCustomWinSocket);
begin
memo1.text:=socket.ReceiveText;
end;

wieso bekomme ich hier als Antwort irgendwelche komischen Zeichen

Zitat:

呈偔ㄯ〮㌠㈰䘠畯摮਍潌慣楴湯›瑨灴⼺眯睷朮潯汧⹥敤യ䌊捡敨䌭湯牴汯›牰癩瑡൥䌊湯整瑮吭灹㩥琠硥⽴瑨汭 ※档牡敳㵴呕ⵆസ匊瑥䌭潯楫㩥倠䕒㵆䑉㔽㉥㐴攵㠰㈹挱㈰㨵䵔ㄽ㈲㜱㌵㤷㨷䵌ㄽ㈲㜱㌵㤷㨷㵓䭌獑彦乗湩祭癧洲 ※硥楰敲㵳慓ⱴㄠⴸ敓⵰〲〱ㄠ㨶㌰ㄺ‷䵇㭔瀠瑡㵨㬯搠浯楡㵮朮潯汧⹥潣൭䐊瑡㩥吠畨‬㠱匠灥㈠〰‸㘱〺㨳㜱 䜠呍਍敓癲牥›睧൳䌊湯整瑮䰭湥瑧㩨㈠㠱਍潃湮捥楴湯›汃獯൥ഊ㰊呈䱍㰾䕈䑁㰾敭慴栠瑴⵰煥極㵶挢湯整瑮琭 灹≥挠湯整瑮∽整瑸栯浴㭬档牡敳㵴瑵ⵦ∸ਾ吼呉䕌㌾㈰䴠癯摥⼼䥔䱔㹅⼼䕈䑁㰾佂奄ਾ䠼㸱〳′潍敶㱤䠯㸱吊敨 搠捯浵湥⁴慨⁳潭敶੤䄼䠠䕒㵆栢瑴㩰⼯睷⹷潧杯敬搮⽥㸢敨敲⼼㹁മ㰊䈯䑏㹙⼼呈䱍ാ