Delphi 3 и создание приложений баз данных

       

Динамический редактор SQL


Разработаем приложение, в котором пользователь сам вводит текст SQL-запроса, а приложение (если текст запроса правильный) этот запрос выполняет и выдает результаты.

Пусть SQL-оператор вводится в некоторое поле ввода (лучше типа TMemo). После ввода пользователь нажимает экранную кнопку "Выполнить", и только что введенный им запрос выполняется для одной или более ТБД. Вид окна программы, реализующей динамический редактор SQL-операторов, показан на рис.9.9. Результат выполнения запроса выводится в отдельной форме после нажатия в основной форме кнопки "Выполнить SQL-запрос" (рис. 9.10).

Техника реализации такого режима работы проста: текст запроса вводится в компонент Memo1 и перед выполнением переписывается в свойство SQL компонента TQuery (Form2. Query I):

procedure TForm1.GoQueryButtonClick(Sender: TObject) ;

begin

Form2.Query1.Close;

Form2.Query1.SQL.Clear;

Form2.Query1.SQL.Add(Memol.Text) ;

Form2.Query1.Open;

Form2.Show; end;



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