🚀 go-pugleaf

Dear Remy Lebeau (TeamB),

Thank you for the Delphi to BCB convertion of the code.

This code generates two error messages one in compile time and the other at
run time.

Compile time error message is on the UnloadPackage(PackageModule) line.
I've tried UnloadPackage( reinterpret_cast<unsigned>(PackageModule)) to
clear the compile time error message. (I'm not sure if this is right way to
do)

The runtime error is on the LoadPackage line. This line causes
'InvalidPointerOperation' run-time error message.

Would you recommend further how to solve this problems?
Is there any BCB example code somewhere in this universe showing how to use
dynamic package loading in BCB?

Thanks.

Pang Fu
pangfu@hotmail.com



"Remy Lebeau (TeamB)" <gambit47@yahoo.com> wrote in message
news:3ef2aa44$1@newsgroups.borland.com...
>
> "Pang Fu" <pangfu@hotmail.com> wrote in message
> news:3ef2a233@newsgroups.borland.com...
>
> >    (3) Can some one convert the following Delphi code
> > into BCB
>
>     typedef void __fastcall (*TProc00)(void);
>
>     HMODULE PackageModule;
>     TProc00 Proc00;
>
>     PackageModule =
reinterpret_cast<HMODULE>(LoadPackage("Package1.bpl"));
>     if( PackageModule )
>     {
>         Proc00 = reinterpret_cast<TProc00>(GetProcAddress(PackageModule,
> "ProC00"));
>         if( Proc00 )
>             Proc00();
>         UnloadPackage(PackageModule);
>     }
>
>
> Gambit
>
>