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

Вниз

отображение подгружаемых картинок   Найти похожие ветки 

 
GekaNaz ©   (2005-06-12 08:52) [0]

Подскажите пожалуйста,
после каждого вызова данной процедуры программа съедает дополнительную память,
как можно освободить память, при условии, что освобождать надо перед новой загрузкой картинки, то есть

   {Здесь}
   BlField:= TBlobField(Query.Fields[2]);
   Image1.Picture:= TPicture(TJPEGImage.Create);
   Image1.Picture.Graphic.Assign(BlField);


 
-=XP=- ©   (2005-06-12 09:37) [1]

В конструкторе (формы?) создавать TJPEGImage:

Image1.Picture:= TPicture(TJPEGImage.Create);

Тогда приведенный Вами код будет выглядеть так:

BlField:= TBlobField(Query.Fields[2]);
Image1.Picture.Graphic.Assign(BlField);


P.S. Помните про деструктор.


 
GekaNaz ©   (2005-06-12 10:16) [2]

без
Image1.Picture:= TPicture(TJPEGImage.Create);
картинку не видно

может конечно вопрос и глупый, но где его искать ? конструктор?
в
procedure TForm30.FormCreate(Sender: TObject); попробовал запихать, ошибку выдает при запуске программы


 
GekaNaz ©   (2005-06-12 11:22) [3]

подскажите, как решить проблему ?


 
GekaNaz ©   (2005-06-12 16:57) [4]

Я знаю, что это не трудно, но догадаться никак не могу :(


 
Antonn ©   (2005-06-12 17:15) [5]

Image1.refresh
?



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

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

Наверх




Память: 0.47 MB
Время: 0.029 c
3-1127828240
msguns
2005-09-27 17:37
2005.11.06
Access+Обновление с подсчетом агрегатов


14-1129277723
cyborg
2005-10-14 12:15
2005.11.06
СмЯшно :)


14-1129283945
Fin
2005-10-14 13:59
2005.11.06
Квоты на ПАПКИ под NTFS?


8-1118385459
Chaser
2005-06-10 10:37
2005.11.06
Глюк или не глюк TImage?


9-1118065319
Gashish
2005-06-06 17:41
2005.11.06
Перенос модели в из 3d max в Delphi