Ошибка при удалении картинки

← →
Zif © (2004-08-24 15:55) [0]

Столкнулся с такой проблемой:
Удаляю файл изображения при помощи кода:

procedure TFormMain.ButtonClick(Sender: TObject); begin DataModule1.ADOQuery1.Edit; DataModule1.ADOQuery1Image.Clear; //ADOQuery1Image - название поля DataModule1.ADOQuery1.Post; end;

Всё удаляется (картинка не отображается и поле в БД Access пустое), НО размер базы остаётся прежним!!!
КАК УДАЛИТЬ КАРТИНКУ ФИЗИЧЕСКИ (что б уменьшился размер БД)
И что это такое вообще происходит???

← →
Sergey13 © (2004-08-24 15:58) [1]

>И что это такое вообще происходит???
Ничего не происходит. Все нормально. 8-)

← →
Ega23 © (2004-08-24 16:00) [2]

Это тебе, брат, надо сжимать базу время-от-времени.
Из оболочки Access: Сервис->Служебные программы->Сжать и восстановить базу...
По запросу - поищи по FAQ, здесь несколько раз такой вопрос проскакивал

← →
roottim © (2004-08-24 16:02) [3]

> КАК УДАЛИТЬ КАРТИНКУ ФИЗИЧЕСКИ

поскрябать винт отверточкой имхо *-)

← →
Desdechado © (2004-08-24 16:09) [4]

Место в БД освободилось для новых данных. Зачем же его отдавать системе, если через минуту снова просить придется :)

Действительно, "Сервис->Служебные программы->Сжать и восстановить базу..."
Но как это делать програмно с помощью Delphi?

var JetEngine: olevariant; begin JetEngine:= CreateOleObject("JRO.JetEngine"); JetEngine.CompactDatabase("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+OldName+";", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+ NewName +";"); JetEngine:=unassigned; end;

Ошибка при удалении картинки Найти похожие ветки