Hello,
I am loading in some dlls into my main application and have
noticed I am getting what I think is a 4k memory leak. At least according to the
task manager.
Everytime I load an application with the following procedure I
lose memory. Can anyone spot anything?
Cheers,
Matt.
type
TStartProc = procedure(AppHandle: HWND); stdcall; procedure StartProject1;
var DllHandle: HMODULE; StartProc: TStartProc; begin DllHandle := LoadLibrary(pchar(form1.edit1.text)); if DllHandle <> 0 then begin try StartProc := GetProcAddress(DllHandle, 'Start'); if Assigned(StartProc) then begin StartProc(Application.Handle); end else showmessage('notassigned'); finally form1.listbox1.items.add('Freeing library'); FreeLibrary(DllHandle); end; end else showmessage('the big zero'); end; The Rules Have Changed...Get Paid to Surf the Web!
http://www.alladvantage.com/go.asp?refid=ggz487 |
- Re: [DUG]: memory loss. Matthew Comb
- Re: [DUG]: memory loss. Nigel Tavendale
- Re: [DUG]: memory loss. Leigh Wanstead