Это что???
Код:
w:=логин.text;
t:=пароль.Text;
А ошибка скорее всего тут:
Код:
E:=ADOTable1.Fields[1].AsInteger;
Скорее всего там в поле NULL сидит, так что идет попытка конвертировать его, а точнее пустую строку, в которую он превращяется, в целое число. Вот оно и падает.