Программы   Загрузка Партнерство   О компании Контакты  
 
                    
  Карта Сайта   
   





Интерактивные 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 © LSD Software 2006 - 2011