Автор работы: Пользователь скрыл имя, 13 Декабря 2010 в 09:25, лабораторная работа
Цель работы: Знакомство с транзакциями и механизм их применения в Delphi
Оборудование: ПЭВМ IBM PC-AT 486 и выше.
Программные средства: ОС Windows XP, Borland Delphi 7.0, электронное пособие по курсу "Базы данных".
1. Ознакомиться с основами применения транзакций в СУБД.
2. Изучить возможности BDE по управлению транзакциями.
3. Ознакомиться с использованием транзакций в Delphi.
4.Добавить в приложение механизм локальных транзакций.
5. Выявить и исправить ошибки, создать удобный интерфейс, расставить по тексту программы комментарии
Цель работы: Знакомство с транзакциями и механизм их применения в Delphi
Оборудование: ПЭВМ IBM PC-AT 486 и выше.
Программные
средства: ОС Windows XP, Borland Delphi 7.0, электронное
пособие по курсу "Базы данных".
Задание
Доработать программу, разработанную в лабораторных работах №6 и№7, используя механизм локальных транзакций.
Программа работы
1. Ознакомиться с
основами применения
2. Изучить возможности BDE по управлению транзакциями.
3. Ознакомиться с использованием транзакций в Delphi.
4.Добавить в приложение механизм локальных транзакций.
5. Выявить и исправить ошибки, создать удобный интерфейс, расставить по тексту программы комментарии.
Выполнение работы.
Настройка компонентов:
TDataBase: Свойство Connected необходимо установить в True – процедура соединения с БД будет выполняться при запуске программы. Свойство KeepConnection нужно установить в True.
TTable –Выбираем
локальный псевдоним базы данных (в нашем
случае Автор блюда).
Листинг программы.
unit
Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, DBTables, ExtCtrls, DBCtrls, Grids, DBGrids;
type
TForm1 = class(TForm)
Table1: TTable;
DBGrid1: TDBGrid;
DBNavigator1: TDBNavigator;
DataSource1: TDataSource;
Database1: TDatabase;
Button1: TButton;
Button2: TButton;
Button3: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure FormActivate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R
*.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
Database1.
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Database1.Rollback;
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
Database1.Commit;
end;
procedure TForm1.FormActivate(Sender: TObject);
begin
Table1.Open;
end;
end.
Настройка
компонента TDataBase:
Создание
формы:
Результат
работы программы:
Вывод: В данной лабораторной работе я познакомился с транзакциями и изучил механизм их применения в Delphi. Составил программу по управлению транзакциями при помощи методов объекта TDataBas: StartTransaction, Commit, RollBack.
Ответы на контрольные вопросы.
Транзакция
– это последовательность операций
над базой данных, рассматриваемых
СУБД как единое целое.
Транзакции
в Delphi бывают явные и неявные.
TDataBase служит для:
- создания постоянного соединения с БД;
-
определения собственного
-
создание локального
-
изменения параметров при
- управление транзакциями.
В
лабораторной работе использовались такие
методы объекта TDataBase как: StartTransaction,
Commit, RollBack.
Локальные транзакции имеют ряд ограничений по сравнению с транзакциями в системе “клиент/сервер”:
- не обеспечен автоматический откат при крахе системы;
- транзакции не могут быть запущены для временных таблиц.
- для таблиц в формате Paradox транзакции могут быть приведены только для таблиц с правильно заданным индексом; для таблиц без индексов откат не может быть реализован.
-
ограниченное число записей
Журнал
транзакций - это служебный файл
(или группа файлов), в котором
хранятся записи обо всех завершенных
транзакциях с привязкой по времени
(системному или относительному). Обеспечивает
защиту данных БД.
Выполнил: Лагутин
В.Ю.
Принял: Георгица И.В.