-
Добавляю рисунок в базу .. if OpenPictureDialog1.Execute then begin Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
Form1.ClientDataSet1.Append; bs := Form1.ClientDataSet1.CreateBlobStream(Form1.ClientDataSet1.FieldByName('FPict'), bmWrite); Form1.Image1.Picture.Graphic.SaveToStream(bs); bs.Free; Form1.ClientDataSet1.Post; ClientDataSet1.SaveToFile(ClientDataSet1.FileName); end;
Все нормально, а как правильно удалять из бази? Form1.ClientDataSet1.Edit; Form1.ClientDataSet1.FieldByName('FPict').AsVariant:=''; Form1.ClientDataSet1.Post; ClientDataSet1.SaveToFile(ClientDataSet1.FileName);
Почему размер файла остайотся прежним, такой же как и перед удалением?
-
видимо, для того, чтобы в следующий раз не "дергать" файл(его размер) и использовать освобожденное место для новой картинки...
-
Ето наверно был прикол, но я его не понял. Как правильно ощищать поле tblob
-
Удалено модератором
-
Удалено модератором
-
Удалено модератором
-
Удалено модератором
-
Удалено модератором
-
Удалено модератором
-
Удалено модератором
-
Удалено модератором
-
Удалено модератором
-
Удалено модератором
-
Удалено модератором
-
Удалено модератором
-
Удалено модератором
-
для информации, это был НЕ прикол, а нормальный ответ. если не понимаешь то это твои проблемы.
а вот "прикол" с дублями, если повторится, приведет к закрытию ветки, будь внимательнее.
-
Сори за повтор. Пишу с мобильного , почему сообщение повторяется не понимаю. Злого умысла не было, но все же какже очистить
-
так ты ж его и очистил... просто смысл весь файл перелопачивать, чтобы уменьшить его размер?.. это ж, если удали в первой записи все остальные данные нужно "подтянуть".. а если их много? и на каждый твой чих это делать?
|