Запустить запрос нажатием кнопки

Question

Я новичок в кодировании, и мне просто нужно знать, как назначить инструкцию SQL кнопке onclick.

SQL, который у меня работает отлично и выполняет эту работу.

Select * From fields 
where rno ='R1'; 

И это прекрасно работает. Все, что я хочу сделать сейчас, это привязать этот SQL к кнопке формы, чтобы получить тот же результат. У меня есть ADO Connection, ADO Query и Datasource плюс DBGrid1 все работает отлично

Благодарности

Answer 1

Помещенный в OnClick в случае вашей кнопки, и откройте запрос там.

procedure TForm1.Button1Click(Sender: TObject); 
begin 
    ADOQuery1.SQL.Text := 'SELECT * FROM fields WHERE mo = :mo'; 
    ADOQuery1.Parameters.ParamByName('mo').Value := 'R1'; 
    ADOQuery1.Open; 
end;