[NumLock]

Код:

uses
  IdURI,
...
  Memo1.Text:=Utf8ToAnsi(IdHTTP1.Get(TIdURI.URLEncode('http://sinoptik.ua/'
    +UTF8Encode('погода-севастополь')+'/2012-04-08')));