На главную
Подписка
Новости


Рейтинг@Mail.ru











Главная / DELPHI / Часто задаваемые вопросы и ответы на них / Разработка баз данных / Интерактивные SQL-запросы Сделать домашней страницей Добавить в избранное Написать писмо

Интерактивные 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;


Copyright ©   "DELPHI WORLD"   E-mail:   delphiworld@mail.ru  http://www.delphiworld.narod.ru
Источник получения информации: http://www.delphiworld.narod.ru
Hosted by uCoz