"FreeLibrary" - pitanje...
03.11.2012. u 19:43 · pre 170 meseci
#1
Code:
var
LibHandle: THandle;
Bitmap: Tbitmap;
begin
Bitmap := nil;
LibHandle:=Loadlibrary('media.dll');
try
if LibHandle<>0 then
begin
Bitmap:=TBitmap.Create;
Bitmap.LoadFromResourceName(LibHandle,'slika_1');
Image1.Canvas.Draw(0,0,Bitmap);
end;
finally
Bitmap.Free;
FreeLibrary(LibHandle);
end;
var
LibHandle: THandle;
Bitmap: Tbitmap;
begin
Bitmap := nil;
LibHandle:=Loadlibrary('media.dll');
try
if LibHandle<>0 then
begin
Bitmap:=TBitmap.Create;
Bitmap.LoadFromResourceName(LibHandle,'slika_1');
Image1.Canvas.Draw(0,0,Bitmap);
end;
finally
Bitmap.Free;
FreeLibrary(LibHandle);
end;
Da li trebam da koristim "Bitmap.Free" ili je dovoljno samo "FreeLibrary(LibHandle)" ?