if not assigned(Form1) then Form1:=TForm.create(application);
Form1.Show;
Form1.Show;
解决方案 »
- 请问exe资源内嵌的mp3或wma,如何并且“流”的方式直接播放呢?盼赐例子(送100分):)
- 打个源程序,报"could not create output file'..\obj\mesg_stru.dcu'"
- 这个问题很难吗?
- 高手进来。。在线等 急呀
- 有关通过DELPHI解析表达式的,大家进来讨论讨论啊
- 在clientdataset的Aggregates求和Active以设为true记录也不为空。。。。。
- 高分求急:如何将Char型(或Int)转换为Byte型????
- 高分求助注册表
- 哪里有Rxlib for Delphi6.0下载,谢谢!
- adoconnection的问题,也可能是ole,我没碰它,ado,ole如此脆弱?
- Delphi中出现([Fatal Error] Internal error: BC2241)!!!!
- edit中的文本怎样居中?
....
end;childform: TfrmTest;MDI主窗体中,要调用时:
if not assigned(childform) then childform:=TfrmTest.Create(Self)(不用Show也可以)还要记得在TfrmTest的.Destroy事件中或释放childform的什么地方:childform:=nil
以保证下次执行if not assigned(childform) then childform:=TfrmTest.Create(Self) 能正确。