如何释放引用的图片内存?(100分)

  • 主题发起人 主题发起人 阿当
  • 开始时间 开始时间

阿当

Unregistered / Unconfirmed
GUEST, unregistred user!
; ; ; Image1.Picture.Bitmap.handle:=NViewLibLoad(fileName:Pchar;
; ; ; ; ; ; Prograss:Boolean); ; ;
; ; ; ;之后如何释放内存?
; ; ; ;非常感谢! ; ;
 
用Image1.Picture.Bitmap:=nil;试试.
我查看了工作管理员,内存是释放了的.
 
非常感谢zhangkan!
; ;但我用系统监视器的内存管理程序:未使用的物理内存且更新间隔设为最快内存并没有
释放。
; ;我的程序是一个图片浏览器当浏览了很多图片之后内存即被占光。
代码如下:
procedure TForm1.FileListBoxChange(Sender: TObject);
var
; p: PChar;
; i: integer;
; s: string;
begin
; GetMem(p,100);
; s:=ExtractFileExt(FileListBox.FileName);
; if(s='.jpg')or(s='.bmp')or(s='.gif')then
; try
; ; StrPCopy(p,FileListBox.FileName);
; ; HB:=NViewLibLoad(p,false);
; ; Image1.Picture.Bitmap:=nil;
; ; Image1.Picture.Bitmap.Handle := HB;
; finally
; ; FreeMem(p,100);
; end;
; FName:=FileListBox.FileName;
end;

是不是用别的监视方法?
 

Similar threads

D
回复
0
查看
926
DelphiTeacher的专栏
D
D
回复
0
查看
880
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
后退
顶部