Городской транспорт. Создание параметризованного запроса

Begin

Создание параметризованного запроса

Begin

Query1.Active:=True;

end;

Запустите программу (F9). Результат работы представлен на рис. 12.

Рис. 12. – Результат работы программы по созданию простого запроса

Можно не менять свойство SQL компонента Query1, а изменить обработчик события для Form1 следующим образом:

procedure TForm1.FormActivate(Sender: TObject);

begin

Query1.SQL.Add('Select * from MainData where Comment="Ivanov"');

Query1.Active:=True;

end;

1. Задаем текст SQL запроса в компоненте Query1:

SQL: Select * from MainData where Comment=:NameStr

2. Обработчик события для Form1 перепишите следующим образом:

procedure TForm1.FormActivate(Sender: TObject);

Query1.Params[0].AsString:='Petrov';

Query1.Active:=True;

end;

3. Запустите программу (F9). Результат работы представлен на рис. 14.

Рис. 14. – Результат работы программы по созданию параметризованного запроса

Индивидуальные задания

Задание: создать таблицу базы данных сответстующей предметной области с помощью утилиты Database Desktop, программные модули открытия и редактирования таблицы, осуществления простого и параметризованного запросов.

Варианты задач

Список характеристик:

Вид транспорта, номер маршрута, начальная остановка, конечная остановка, время в пути, примечание.

Дата добавления: 2015-05-09