Нда-с, давненько не брал я в руки шашек
1. Попробуйте создать не Paradox, а какой-нибудь dBase. На парадокс много жалоб (вроде как).
2. При закрытии формы проделайте что-то вроде
Код:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var Loop: Integer;
begin
{Generic way of ensuring all table changes are saved when form is closed}
for Loop := 0 to ComponentCount - 1 do
if Components[Loop] is TDataSet then
with TDataSet(Components[Loop]) do
if State in dsEditModes then
Post;
end;
3. Я не вижу, в каком месте Вы открываете базу. Может, Вы пишите не в new.db, а в какой-нибудь new1.db
?
