🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.cppbuilder.nativeapi
Article #15665

Re: How to use LoadPackage in BCB ?

#15665
From: Remy Lebeau (TeamB)
Date: Fri, 20 Jun 2003 06:35
24 lines
1608 bytes
"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
Technical Details
Message-ID: <3ef2aa44$1@newsgroups.borland.com>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-04!sn-xit-01!sn-xit-08!supernews.com!newsfeed.wirehub.nl!news.kweb.on.ca!KWeb!newsgroups.borland.com!not-for-mail
References: <3ef2a233@newsgroups.borland.com>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 10cc67,2a0bcef6d2779e50
X-Google-Attributes: gid10cc67,public
X-Google-Thread: 102541,2a0bcef6d2779e50
X-Google-Attributes: gid102541,public
X-Google-ArrivalTime: 2003-06-19 23:38:05 PST
From: "Remy Lebeau \(TeamB\)" <gambit47@yahoo.com>
Newsgroups: borland.public.cppbuilder.nativeapi,borland.public.cppbuilder.students
References: <3ef2a233@newsgroups.borland.com>
Subject: Re: How to use LoadPackage in BCB ?
Date: Thu, 19 Jun 2003 23:35:33 -0700
Lines: 26
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1158
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1165
NNTP-Posting-Host: 207.175.226.26
Message-ID: <3ef2aa44$1@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1056090692 207.175.226.26 (19 Jun 2003 23:31:32 -0700)
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-03!sn-xit-04!sn-xit-01!sn-xit-08!supernews.com!newsfeed.wirehub.nl!news.kweb.on.ca!KWeb!newsgroups.borland.com!not-for-mail