F frankie_24 Unregistered / Unconfirmed GUEST, unregistred user! 2007-05-10 #2 检测实例是否存在 Assigend（窗体名）
D dennyshao001 Unregistered / Unconfirmed GUEST, unregistred user! 2007-05-10 #3 在窗体的onshow事件中写showmessage('正在运行');
Y Yang.SZ Unregistered / Unconfirmed GUEST, unregistred user! 2007-05-10 #4 请问 frankie_24 具体怎么用啊?? 写个实例我看看吧!!
Y ysp娃娃 Unregistered / Unconfirmed GUEST, unregistred user! 2007-05-10 #5 if Form.Showing then showmessage('正在运行')
F frankie_24 Unregistered / Unconfirmed GUEST, unregistred user! 2007-05-10 #7 if Assigned(Form1) then Showmessage('正在运行')； 你OnShow事件,或是Create事件写都可以.. 这个主要是检测是否存在实例,你要是就是看这个程序是否运行,你就用上面的朋友说的就可以
if Assigned(Form1) then Showmessage('正在运行')； 你OnShow事件,或是Create事件写都可以.. 这个主要是检测是否存在实例,你要是就是看这个程序是否运行,你就用上面的朋友说的就可以
Y Yang.SZ Unregistered / Unconfirmed GUEST, unregistred user! 2007-05-10 #8 是这样的 我是把窗体加到panel里的 然后点按钮的时候 在panel里显示新窗体 但如果用户多次点击的话就会打开许多个同一窗体 我写的代码是 form2:=tform2.create(panel1); form2.parent:=panel1; if ... then form2.show; 现在就是想判断出窗体是否已经运行 如果没有运行就显示窗体 如果把你这段代码加在create事件里 创建的时候它会自动关闭吗??
是这样的 我是把窗体加到panel里的 然后点按钮的时候 在panel里显示新窗体 但如果用户多次点击的话就会打开许多个同一窗体 我写的代码是 form2:=tform2.create(panel1); form2.parent:=panel1; if ... then form2.show; 现在就是想判断出窗体是否已经运行 如果没有运行就显示窗体 如果把你这段代码加在create事件里 创建的时候它会自动关闭吗??
F frankie_24 Unregistered / Unconfirmed GUEST, unregistred user! 2007-05-10 #10 你要是这样的话,就是按照我说的就可以了 if Not Assigned(form2) then 创建窗体 else From2.BringToFront；
