Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.12.06;
Скачать: CL | DM;

Вниз

Clientdatase + рисунок   Найти похожие ветки 

 
Oleg_teacher   (2009-01-04 16:28) [0]

Добавляю рисунок в базу ..
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);

Почему размер файла остайотся прежним, такой же как и перед удалением?


 
Виталий Панасенко(дом)   (2009-01-04 18:41) [1]

видимо, для того, чтобы в следующий раз не "дергать" файл(его размер) и использовать освобожденное место для новой картинки...


 
Oleg_teacher   (2009-01-04 19:03) [2]

Ето наверно  был прикол, но я его не понял. Как правильно ощищать поле tblob


 
Oleg_teacher   (2009-01-04 19:03) [3]

Удалено модератором


 
Oleg_teacher   (2009-01-04 19:03) [4]

Удалено модератором


 
Oleg_teacher   (2009-01-04 19:04) [5]

Удалено модератором


 
Oleg_teacher   (2009-01-04 19:04) [6]

Удалено модератором


 
Oleg_teacher   (2009-01-04 19:04) [7]

Удалено модератором


 
Oleg_teacher   (2009-01-04 19:04) [8]

Удалено модератором


 
Oleg_teacher   (2009-01-04 19:04) [9]

Удалено модератором


 
Oleg_teacher   (2009-01-04 19:04) [10]

Удалено модератором


 
Oleg_teacher   (2009-01-04 19:04) [11]

Удалено модератором


 
Oleg_teacher   (2009-01-04 19:04) [12]

Удалено модератором


 
Oleg_teacher   (2009-01-04 19:04) [13]

Удалено модератором


 
Oleg_teacher   (2009-01-04 19:04) [14]

Удалено модератором


 
Oleg_teacher   (2009-01-04 19:05) [15]

Удалено модератором


 
sniknik ©   (2009-01-04 19:37) [16]

для информации, это был НЕ прикол, а нормальный ответ. если не понимаешь то это твои проблемы.

а вот "прикол" с дублями, если повторится, приведет к закрытию ветки, будь внимательнее.


 
Oleg_teacher   (2009-01-04 19:49) [17]

Сори за повтор. Пишу с мобильного , почему сообщение повторяется не понимаю. Злого умысла не было, но все же какже очистить


 
Виталий Панасенко(дом)   (2009-01-04 20:07) [18]

так ты ж его и очистил... просто смысл весь файл перелопачивать, чтобы уменьшить его размер?.. это ж, если удали в первой записи все остальные данные нужно "подтянуть".. а если их много? и на каждый твой чих это делать?



Страницы: 1 вся ветка

Текущий архив: 2009.12.06;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.035 c
15-1255001989
картман
2009-10-08 15:39
2009.12.06
"Служба XXX неожиданно прервана" Service Control Manager код 7034


6-1210247266
laao
2008-05-08 15:47
2009.12.06
как корректно завершать работу с поднятым IdHTTPServer ?


15-1252098770
Кто б сомневался
2009-09-05 01:12
2009.12.06
Мультиязык в проектах на Delphi 2009


2-1255948890
VGK
2009-10-19 14:41
2009.12.06
Нужна помощь: получить все четырехзначные натуральные числа...


8-1201846793
ZMRaven
2008-02-01 09:19
2009.12.06
Картинка с экрана