Авторизируешься на сайте в ручную, открываешь исходный код это страницы. И на это странице должно быть что то типа 'привет ...' добро пожаловать, личный кабинет, или что то подобное, чего нет на странице авторизации.
Используешь фунуцию pos. Она определяет позицию подстроки в строке.
Например:
begin
if pos('добро пожаловать',s)=0 then showmessage ('авторизация не прошла')
end
else
showmessage ('авторизация прошла')
end;