我正在学习包，那位仁兄给我一个例程 (100分)

Z

zhj_nc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-29

• #1

我正在学习包，那位仁兄给我一个例程
比如在一个工程中怎样调用一个含有窗体的包；

 

E

eric.youbin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-29

• #2

什么包？控件吗
安装之后用就行了

 

H

homejun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-30

• #3

留下mail

给你一个

 

B

blue_morning

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-30

• #4

blue_morning@sina.com

非常感谢。[][][]

 

C

coolbaby

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-01

• #5

cbychen@263.net
谢谢

 

Z

zhj.nc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-01

• #6

to homejun
请发一个给我吧，zhj_nc@21cn.com.

 

D

dongberlin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-01

• #7

请查收.

 

Z

zhj_nc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-03

• #8

to dongberlin
我在邮箱里下载不了，报错如下：
ERROR: No such file or directory,"/tmp/aimcwtmp/z/zhj_nc/1/309/李维关于动态"
请重发，在发一个到zhj.nc@163.net,谢谢！

 

向

向你学习

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-03

• #9

to dongberlin
给我一个谢谢[][]
wdl@idea-cc.com

 

L

linger_0

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-03

• #10

我也想要,可以吗?
linger-ok@263.net

 

L

liwens

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-03

• #11

最好能给我一个！^ _ ^
pkl888@sohu.com

 

H

hsw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-04

• #12

踢一下

 

F

fresh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-04

• #13

mail 一个给我好吗？
librama@21cn.com
thank you !!!!

 

D

djdsz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-05

• #14

很简单的啊。
如下：
package中
Tform1=class(TForm)
...
initialization
registerclass(TForm1);
finalization
unregisterclass(TForm1)
end.

project中
TFormClass=Class of TForm;
var
h:thandle;
forminstance:tform;
begin
try
h:=loadpackage(yourpkgname);
if h<>0 then
forminstance:=TFormClass(getClass('TForm1')).create(nil);
forminstance.showmodal;
unloadpackage(h);
except
showmessage('pkg not found');
end;

注意编译的时候，需要选择project/options/packages/build with runtime packages,不然
你什么也看不到。

 

Z

zhj_nc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-06

• #15

多人接受答案了。