vSuccess это что за оператор?

[MrMorozko]

PHP код:

vSuccess := False;
ADOTable1.First;
while not ADOTable1.EOF do
 begin
 if Edit1.text=Form2.ADOTable1.FieldByN ame('Логин').Value then
 if Edit2.text=Form2.ADOTable1.FieldByN ame('Пароль').Value Then
  begin
  ShowMessage('Аутентификация прошла успешно');vSuccess := True; break;
  end;
 ADOTable1.Next;
 end;
if vSuccess then // аутентификация прошла успешно
else // аутентификация неуспешна. Можно давать вторую попытку итд. 


ПОчему у меня прога ругается на vSuccess?

[ZaRDaK]

var vSuccess: Boolean;

[MrMorozko]

Сообщение от ZaRDaK

var vSuccess: Boolean;

Спасибо)