这个Form如何Show?(100分)

Y

ywj1997

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-16

• #1

把Form的name放在表sys的fname字段里，如何实现双击fname打开相应的form呢?
form1.show
(sys('fname').asstring)=form1

 

B

bsense

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-16

• #2

复杂一点的是,你需要
registerclass
unregisterclass 函数,google查这两个,就能找到例子
另外一个简单方法是,多个if语句
if fname='form1' then
form1.show

 

Y

ywj1997

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-16

• #3

用IF太死板了

 

B

bsense

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-18

• #4

其实差别不大

 

A

andyzhouap98111

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-25

• #5

(Application.FindComponent('Form2') as TForm ).Show;

 

J

jxyghm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-26

• #6

用if还嫌死板，dlphi不支持运行时的反射机制，你不能根据类的名字实例化类。所以用if算是个不错的选择了。