dephi7动态加载bpl里面的类失败 ( 积分: 100 )

A

apathyboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #1

动态加载bpl
我在程序中用LoadLibary加载bpl成功（返回非0句柄）
然后用GetClass去获取类，但是每次都返回nil
我在bpl包里面也有对类进行注册，
有没有人知道原因呢

 

B

bbscom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #2

PackageHandle := LoadPackage('BPL.bpl');
AClass := GetClass('TfrmBPLForm');
if AClass <> nil then begin
Application.CreateForm(TComponentClass(AClass), AForm);
AForm.Show;
end;

 

A

apathyboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #3

我的做法也是这样，但是返回回来的AClass是nil的，我想知道有什么会影响到这个返回结果，我确定在bpl对这个Class进行过注册，而且也确认过bpl的加载是正确的

 

B

bbscom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #4

那是要在BPL里先要注册，然后再用我们后面的调用就行了。

 

A

apathyboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #5

我在类的单于中已经对类注册过了。除了这个原因，还有其他可以导致出错的么？

 

S

SFG

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #6

'TfrmBPLForm'要注册..有没有注册

 

S

SFG

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #7

例如象这样:
procedure Register;
begin
RegisterComponents('WiseONE', [TfrmSMD0008Main])
end;

 

H

HNXXCXG

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #8

主程序设为build with runtime packages，运行通过

 

A

apathyboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #9

to SFG：
我是用RegisterClass在bpl里面对类进行注册的

to HNXXCXG
我主程序倒没有设置成build with runtime packages，晚上试验下

如果可以，晚上就来散分

 

X

xingkong97

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #10

我给你解决。
在BPL窗体的最后面 end的前面写语句：
initialization
RegisterClass('TfrmBPLForm');
记住选中Rutime Package!!!

 

A

apathyboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #11

除了runtime packet，注册上我应该是没错的

 

X

xingkong97

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #12

问题解决了吧

 

A

apathyboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-01

• #13

多人接受答案了。