MYSQL + delphi (запросы)

[Devolarium]

Всем приветы! Начал разбираться MYSQL в делфи, немогу сделать чтобы при вводе логина в edit1 он мне выводил пароль от этого логина, если таковой имеется в бд

[Yurk@]

if Trim(Edit1.Text) = ''
then 
begin
  ShowMessage('Не введено значение для поиска');
  Exit;
end;
qry1.SQL.Text:='SELECT * FROM users WHERE login = :p_login';
qry1.Parameters.ParamByName('p_login').Value := Edit1.Text;
qry1.Open;
if not qry1.IsEmpty
then
  ShowMessage(qry1.FieldByName('password').asString)
else
  ShowMessage('Такой логин не найден');

[Devolarium]

делфи ругается на ParamByName

[Yurk@]

qry1.Parameters.ParamByName

лишнее прикрутил))

[Devolarium]

эм.. незнаю правильно или нет, оставил вот так:
qry1('p_login').asString := Edit1.Text;

[Yurk@]

я ж написал как

qry1.Parameters.ParamByName('p_login').Value := Edit1.Text;

[Devolarium]

немного изменил

qry1.Parameters.ParamByName('p_logi n').asString := Edit1.Text;

ругается теперь только на

Undeclared identifier: 'asString'

[Аватар]

Если qry1 is TAdoQuery, то там нет AsString, а есть Value

[Devolarium]

Незнаю, правильно ли я понял, но заменив .asString на .value выдается ошибка, после чего последующие нажатия на кнопку, нормально выдают пароль от логина, но крэш программа как-то не айс)

P.s. извиняюсь за свое нубство)

[Yurk@]

Devolarium, а модуль DB в uses подключен ?
Аватар, я или не так понял или что-то упустил в этой жизни