Приветствую всех!
Не получаю ответ от сервера.
Код:
procedure Tf.btnSendClick(Sender: TObject);
var
buf:string;
begin
udpSocket.RemoteHost:='hl1master.steampowered.com';
udpSocket.RemotePort:='27015';
udpSocket.Connect;
udpSocket.Sendln(#$71,'');
udpSocket.Receiveln(buf);
memo.Lines.Add(buf);
udpSocket.Disconnect;
end;
Пакет отсылается правильно и доходит до сервера (смотрел сниффером), а вот ответа нет. Программа тупо зависает. Подскажите пожалуйста, что я делаю не так?
Версия Delphi 7 (lite, которая распаковывается в full).