Читать диплом по информатике, вычислительной технике, телекоммуникациям: "АРМ мененджер автосалона "А-моторс"" Страница 10
2.4 Проект базы данных, используемой в задаче
2.5 Разработка алгоритмов обработки данных2.5.1 Алгоритм работы главной формы приложения
Схема 3.1
2.5.2 Алгоритм работы форм приложения
Схема 3.2
2.5 Таблица идентификаторовТаблица 2.10
| Идентификатор | Смысловое содержание | Тип | Разрядность |
| Main.path | Путь к папке программы | string | |
| Add.pic1 | Путь к первому изображению | String |
Продолжение таблицы 2.10
| Add.pic2 | Путь ко второму изображению | string | |
| Del. AppProgID | Идентификатор приложения Microsoft Excel | string | |
| Del.App | Указатель на приложение Microsoft Excel | Variant | |
| Del.Ke | Указатель на рабочую книгу Microsoft Excel | Variant | |
| Del.Abc | Указатель на лист Microsoft Excel | Variant | |
| Del.Result | Предназначена для проверки удачной активизации приложения Mcirosoft Excel | HResult | |
| Del.i | Счетчик цикла | integer |
Запрос на выборку автомобилей по необходимым критериям формируется динамически, в зависимости от выбранных параметров поиска.
procedure TFSearch.LMDButton1Click(Sender: TObject);
begin
Query1.Close;
Query1.SQL.Clear;try
Query1.Sql.Add('select a.kod_avto, m.marka, a.model, a.cvet, a.tip_kuz, a.cena, a.v, k.korobka,k.privod ');
Query1.SQL.Add('from avto a, komplect k, marka m ');
Query1.SQL.Add('where ');
if checkBox9.Checked then Query1.SQL.Add('a.marka = '+ Inttostr(DBLookupComboBox1.keyvalue)+' and');
if checkBox10.Checked then Query1.SQL.Add('a.tip_kuz="'+ComboBox1.Text+
'" and ');
if checkBox11.Checked then Query1.SQL.Add('a.v
Похожие работы
Интересная статья: Основы написания курсовой работы

(Назад)
(Cкачать работу)