[Adrenalin666]

s := IdHTTP.Get('http://delphistudio.ru/');
Label1.Caption := Copy(s, pos('<title>', s) + 7, pos('</title>', s) - pos('<title>', s) -7);

вот пример проще по этому примеру
чтото у меня ругается на Get и Label1 какие модули при работе с этим надо