Цитата:
Сообщение от Andrej-zhe
Чет я так и не разобрался. Вот файлик, как сделать (например на кнопке выход) чтобы после всех манипуляций над файлом закрыли программу и файл стал опять таким же как был до начала работы с программой.
|
Если тебе нужно очистить таблицу, то так:
Код:
1 2 3 4 5 6 | procedure TForm1 . Button1Click(Sender: TObject);
begin
Table1 . Close;
Table1 . EmptyTable;
Table1 . Open;
end ;
|
Если тебе нужно именно восстановить таблицу в первоначальное состояние, то лучше файл sbor.dbf вообще не трогать, а вместо этого создавать его копию типа sbor_temp.dbf и в программе работать с ним, а когда он больше не нужен, то просто удалять с диска.