32 lines
373 B
PHP
32 lines
373 B
PHP
|
{TODO}
|
||
|
|
|
||
|
|
{$ifdef readinterface}
|
||
|
|
|
||
|
|
|
||
|
|
type
|
||
|
|
TLibHandle = Longint;
|
||
|
|
|
||
|
|
const
|
||
|
|
NilHandle = 0;
|
||
|
|
|
||
|
|
|
||
|
|
{$else}
|
||
|
|
|
||
|
|
|
||
|
|
function LoadLibrary(Name: AnsiString): TLibHandle;
|
||
|
|
begin
|
||
|
|
Result := 0;
|
||
|
|
end;
|
||
|
|
|
||
|
|
function GetProcedureAddress(Lib: TLibHandle; ProcName: AnsiString): Pointer;
|
||
|
|
begin
|
||
|
|
Result := nil;
|
||
|
|
end;
|
||
|
|
|
||
|
|
function UnloadLibrary(Lib: TLibHandle): Boolean;
|
||
|
|
begin
|
||
|
|
Result := False
|
||
|
|
end;
|
||
|
|
|
||
|
|
{$endif}
|