Интерактивные SQL-запросы

Как мне передать значение переменной в SQL-запросе? К примеру, в обработчике onClick клавиши вывести все записи с величиной поля большей, чем задал пользователь. Можно ли в Delphi создать что-либо подобное механизму запросов, реализованному в Paradox for Windows?
Решение этой задачи в Delphi подобно созданию и выполнению строки запроса SQL в Paradox.
Pdoxwin код:

method pushButton(var eventInfo Event)

var

s string

q query

d database

endvar

d.open( "MYALIAS" )

s = "select * from mytable where somefield=\"" + entryField.value + "\""

q.readFromString( s )

q.executeSQL( d )

endmethod

Delphi код:
procedure TForm1.Button1Click(Sender: TObject);

begin

 MyQuery.Active := false;

 MyQuery.SQL.clear;

 MyQuery.SQL.add('select * from mytable where somefield="' +

  EntryField.Text + '"');

 MyQuery.Active := true;

end;


Взято с http://delphiworld.narod.ru

Отправить комментарий

Проверка
Антиспам проверка
Image CAPTCHA
...