Часть 1

Задание

Then begin

sSql:=sSql+' Minist= '+s+leMinist.Text+s+p;

k:=k+1;

end;

l:=length(sSql);

sSql:=Copy(sSql,1,l-3);

if k<>0 then

with qUpdate do begin

N:=qTitleNumber.AsInteger;

Sql.Clear;

Sql.Add(sSql+' Where Number = '+IntToStr(N));

Close;

ExecSql;

Sql.Clear;

Sql.Add('Select * from title');

end;

При работе с закладкой Общие данные работа с БД происходит в виде написания запросов вручную и непосредственной работой с БД. При этом все визуальные компоненты LableEdit получают значения как строковые переменные. Такой подход более трудоемок но позволяет более тонко работать с БД, добавляя например новые записи при помощи тех же визуальных компонентов.

На закладке Задание размещаются характеристики механической системы, выдаваемые в задании к курсовой работе – массы и геометрические размеры тел, жесткости пружин и др.

В отличии от вкладки Общие данные на вкладке Задание используются визуальные компоненты для работы с БД – имеющие тип BDEdit (рис 5). Они связаны с БД при помощи цепочки qZadanie-dsZadanie-dbeNuzhnoePole. Где TQuery qZadanie связано с qMain и выполняет запрос select * from zadanie where number=:number.

При нажатии на кнопку Изменить производиться изменение данных в таблице Zadanie. Для этого с компонентом qZadanie связывается компонент updZadanie (TUpdateSql) при вызове метода

updZadanie.Apply(ukModify);

измененные данные заносятся в БД. Для работы updZadanie в обекте qZadanie разрешается кеширование изменией (свойство CachedUpdate = True).

Рис 5. Вкладка Задание

Первая часть курсовой работы по ТМ описывает движение материальной точки на рамке, вращающийся с постоянной скоростью В закладку Часть 1 (рис 6) вынесены неизменные параметры первой части - начальные данные движения точки, угловая скорость вращения рамки и оценки погрешностей вызванных сделанными в работе допущениями.

Для отображения данных используются компоненты типа DBEdit связанные с объектам qPart1 (TQuery, DataSource=dsMain, Sql: Select * from Part1 where Number=:Number) через dsPart1(TDataSource).

При нажатии на кнопку Изменить выполняется метод Apply(ukModify) объекта udpPart1, связанного с qPart1.

Рис 6. Закладка Часть 1

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