Курсовая работа: Разработка и создание автоматизированной системы обработки информации

procedure TForm1.Button9Click(Sender: TObject);

begin

Table2.Last;

end;

Для управления базой данных компонент Button прописывается следующим образом:

Для добавления новой записи:

procedure TForm1.Button10Click(Sender: TObject);

begin

Table2.Insert;

end;

Для сохранения новой записи:

procedure TForm1.Button11Click(Sender: TObject);

begin

Table2.Refresh;

end;

Дляредактированиязаписи:

procedure TForm1.Button12Click(Sender: TObject);

begin

Table2.Edit;

end;

Для сохранения изменений в записи:

procedure TForm1.Button13Click(Sender: TObject);

begin

Table2.Post;

end;

Дляотменыизменений:

procedure TForm1.Button14Click(Sender: TObject);

begin

Table2.Cancel;