База данных тур фирма “Мечта”

Автор работы: Пользователь скрыл имя, 07 Декабря 2011 в 10:06, курсовая работа

Краткое описание

При работе с компонентами наборов данных можно обойтись без явного использования компонентов, реализующих соединение с базой данных. Однако некоторые возможности, такие, как управление транзакциями, кешированные обновления, невозможны без компонентов типа TDatabase или TADOConnection. Компонент база данных. TDatabase применяется для соединения с источником данных через драйверы BDE или напрямую через внешние ODBC-драйверы. Компонент TADOConnection используется для создания объекта соединение при доступе через OLE DB, который инкапсулируется посредством A

Содержимое работы - 1 файл

Кыргызский государственный университет.doc

— 579.00 Кб (Скачать файл)

end; 

procedure TForm3.Button6Click(Sender: TObject);

begin

Form11.Show;

end; 

procedure TForm3.ADOTable1CalcFields(DataSet: TDataSet);

begin

adotable1Nalog.Value:=AdoTable1.FieldByName('Цена').Value*0.2;

end;

     На  форме «Продажа» также есть данные о продаже туров, где можно осуществить такие же процессы как и в предыдущих формах, также программы записанные в нем 

Рис. 7 Форма «Продажа»

procedure TForm6.Button1Click(Sender: TObject);

begin

Form6.Close;

end;

procedure TForm6.Button2Click(Sender: TObject);

begin

case RadioGroup1.ItemIndex of

0:AdoTable1.IndexFieldNames:='Туры';

1:AdoTable1.IndexFieldNames:='ДатаПродажи';

2:AdoTable1.IndexFieldNames:='Сотрудник';

3:AdoTable1.IndexFieldNames:='';

end;

End; 
 
 
 

Информация о работе База данных тур фирма “Мечта”