Вниз
Скачать: CL | DM;

Утечка памяти -помогите!   Найти похожие ветки 

← →
Unknown user ©   (2005-06-14 21:49) [0]

Подскажите почему в следующем коде при вызове процедуры Move диспетчер задач Windows показывает увеличение памяти занятой процессом, с каждым вызовом расход памяти увеличивается примерно на Size*1.5:

  if FFileType=ftBMP then begin
   RCnt:=FBMPBufSize div FBMPRowBytes;
   RInd:=(FHeight-Y-1) div RCnt;
   RBtm:=Min(RInd*RCnt,FHeight-RCnt);;
   RTop:=Min((RInd+1)*RCnt-1,FHeight-1);;
   RCnt:=RTop-RBtm+1;
   Size:=RCnt*FBMPRowBytes;
   FDIB.SetSize(FWidth,RCnt,FBPP);
   Src:=@(PByteArray(FBMPBits)[RBtm*FBMPRowBytes]);
   Dst:=FDIB.ScanLine[FDIB.Height-1];;

   //тут утечка
   Move(Src^,Dst^,Size);

   FLoadedRect:=Rect(0,FHeight-RTop-1,FWidth-1,
                     FHeight-RBtm-1);

процедура копирует область FLoadedRect из битмапа на диске отображенного в память процесса при помощи MapViewFile в битмап FDIB, ширина которого=ширине битмапа источника, а высота=RCnt. FDIB.SetSizes срабатывет только если параметры передаваемые в нее отличаются от уже установленных -в нашем случае она выделяет память под FDIB только раз.


← →
Unknown user ©   (2005-06-15 09:43) [1]

Никто ничего не подскажет?



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.022 c
14-1122016086
Дмитрий999
2005-07-22 11:08
2005.08.14
Запретить обьявление экземпляра класса


3-1120541834
paule
2005-07-05 09:37
2005.08.14
Отображение результата запроса ADOQuery в DBGrid


14-1122102943
NewWonder
2005-07-23 11:15
2005.08.14
Перспективы средств разработки.


3-1120746028
kivadim
2005-07-07 18:20
2005.08.14
Вызов опред. метода у Датаконтролов подключ. к DataSource


14-1122361714
Хинт
2005-07-26 11:08
2005.08.14
Как передать текст из Delphi в скрипт PHP?




   Наверх