[200分]有个BPL的实例想改一下(100分)

W

wstgfx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-10

• #1

Delphi Package 使用集锦
http://www.delphibox.com/article.asp?articleid=985
里边有个Pkgdemo4,那位高手可以把动态调用的BPL窗口由模式窗口(showmodal)改成非模式窗口(show)?
分不够再加200.

 

W

wooiguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-15

• #2

PkgUtils.pas中:
function ShowModalFormByClassName(const Classname:string):integer;
...
try
Result:=frm.ShowModal;//改为"frm.Show;"
finally
frm.Release;//删除此句
...

 

W

wstgfx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-15

• #3

已经解决了,不过还是要谢谢.