SQL запрос

← →
Gringoire © (2007-05-14 03:20) [0]

procedure TForm8.BitBtn1Click(Sender: TObject);
var s : string;
begin
AdoQuery1.Close;
AdoQuery1.SQL.Text := "select password from users where user =" + labelededit1.Text ;
AdoQuery1.Open ;
s := AdoQuery1.Fields[0].AsString ;
labelededit2.Text := s;
end;

Люди, он мне говорит, что введенный параметр в поле LabeledEdit1 не имеет значения поумолчанию...

в таблице такие поля:

ID_User
User
Password

← →
sniknik © (2007-05-14 03:36) [1]

http://delphimaster.net/view/3-1179096304/

SQL запрос Найти похожие ветки