Советы по Delphi

       

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


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

Решение этой задачи в Delphi подобно созданию и выполнению строки запроса SQL в Paradox.

Pdoxwin код:

method pushButton(var eventInfo Event)vars stringq queryd databaseendvar
d.open( "MYALIAS" )s = "select * from mytable where somefield=\"" + entryField.value + "\""q.readFromString( s )q.executeSQL( d )
endmethod

Delphi код:

procedure TForm1.Button1Click(Sender: TObject);beginMyQuery.Active := false;MyQuery.SQL.clear;MyQuery.SQL.add('select * from mytable where somefield="' + EntryField.Text + '"');MyQuery.Active := true;end;

[000377]



Содержание раздела