PageRenderTime 14ms CodeModel.GetById 7ms app.highlight 2ms RepoModel.GetById 1ms app.codeStats 0ms

/client/Plugin/LocalModuleLoader/LocalModuleLoader.dpr

http://drcp.googlecode.com/
Pascal | 36 lines | 19 code | 8 blank | 9 comment | 0 complexity | 030e6d5e34b2590119969325194c5b60 MD5 | raw file
 1library LocalModuleLoader;
 2
 3{ Important note about DLL memory management: ShareMem must be the
 4  first unit in your library's USES clause AND your project's (select
 5  Project-View Source) USES clause if your DLL exports any procedures or
 6  functions that pass strings as parameters or function results. This
 7  applies to all strings passed to and from your DLL--even those that
 8  are nested in records and classes. ShareMem is the interface unit to
 9  the BORLNDMM.DLL shared memory manager, which must be deployed along
10  with your DLL. To avoid using BORLNDMM.DLL, pass string information
11  using PChar or ShortString parameters. }
12
13uses
14  ShareMem,
15  uPluginIntf,
16  uFormPlugin,
17  uFormMain in 'uFormMain.pas' {Form_Main};
18
19  
20function CreateAPlugin:IPlugin;
21var
22  lFormPlugin : TFormPlugin;
23begin
24  lFormPlugin := TFormPlugin.Create(nil);
25  lFormPlugin.ForceSetMDIChild := false;
26  lFormPlugin.SetFormClass(TForm_Main);
27
28  Result := lFormPlugin;
29end;
30
31exports
32  CreateAPlugin;
33
34begin
35  
36end.