Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

отображение подгружаемых картинок [D7, WinXP]


GekaNaz ©   (2005-06-12 08:52:00) 

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

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


Antonn   (2005-06-12 17:15:00) [1]

Image1.refresh
?


GekaNaz   (2005-06-12 16:57:00) [2]

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


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

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


GekaNaz   (2005-06-12 10:16:00) [4]

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

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


-=XP=-   (2005-06-12 09:37:00) [5]

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

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

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

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


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


Наверх

Титульная страница Поиск, карта сайта Написать письмо