2.2 hello module now loads under win32

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@19 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
sekelsenmat
2006-09-28 11:47:56 +00:00
parent fa2df4341f
commit 30a226681c
5 changed files with 281 additions and 231 deletions

View File

@@ -51,7 +51,7 @@ uses
const const
{$IFDEF WINDOWS} {$IFDEF WINDOWS}
LibAPR = 'libapr.dll'; LibAPR = 'libapr-1.dll';
{$ELSE} {$ELSE}
LibAPR = ''; LibAPR = '';
{$ENDIF} {$ENDIF}

View File

@@ -65,7 +65,7 @@ type
* The default hash function. * The default hash function.
} }
function apr_hashfunc_default(const key: PChar; klen: Papr_size_t): cuint; function apr_hashfunc_default(const key: PChar; klen: Papr_size_t): cuint;
cdecl; external LibAPR name LibNamePrefix + 'apr_hashfunc_default' + LibSuff8; cdecl; external LibAPR name 'apr_hashfunc_default';
{ {
* Create a hash table. * Create a hash table.

View File

@@ -9,6 +9,25 @@
<TargetFileExt Value=".exe"/> <TargetFileExt Value=".exe"/>
<ActiveEditorIndexAtStart Value="0"/> <ActiveEditorIndexAtStart Value="0"/>
</General> </General>
<VersionInfo>
<UseVersionInfo Value="False"/>
<AutoIncrementBuild Value="False"/>
<CurrentVersionNr Value="0"/>
<CurrentMajorRevNr Value="0"/>
<CurrentMinorRevNr Value="0"/>
<CurrentBuildNr Value="0"/>
<ProjectVersion Value="1,0,0,0"/>
<Language Value="0409"/>
<CharSet Value="04E4"/>
<Comments Value=""/>
<CompanyName Value=""/>
<FileDescription Value=""/>
<InternalName Value=""/>
<LegalCopyright Value=""/>
<LegalTrademarks Value=""/>
<OriginalFilename Value=""/>
<ProductName Value=""/>
</VersionInfo>
<PublishOptions> <PublishOptions>
<Version Value="2"/> <Version Value="2"/>
<IgnoreBinaries Value="False"/> <IgnoreBinaries Value="False"/>
@@ -26,7 +45,7 @@
<Filename Value="loadmod.lpr"/> <Filename Value="loadmod.lpr"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<UnitName Value="loadmod"/> <UnitName Value="loadmod"/>
<CursorPos X="12" Y="15"/> <CursorPos X="55" Y="12"/>
<TopLine Value="1"/> <TopLine Value="1"/>
<EditorIndex Value="0"/> <EditorIndex Value="0"/>
<UsageCount Value="21"/> <UsageCount Value="21"/>

View File

@@ -9,7 +9,7 @@ uses Classes, Windows, sysutils;
var var
Lib, Lib2: HINST; Lib, Lib2: HINST;
begin begin
Lib := LoadLibrary('C:\Programas\Apache\httpd\mod_example.so'); Lib := LoadLibrary('C:\Programas\Apache\lazarus-ccr\httpd\mod_hello.so');
// Lib2 := LoadLibrary('C:\Programas\Apache\pmodules\newlib2.dll'); // Lib2 := LoadLibrary('C:\Programas\Apache\pmodules\newlib2.dll');
WriteLn(Lib); WriteLn(Lib);
WriteLn(Lib2); WriteLn(Lib2);

File diff suppressed because it is too large Load Diff