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