写好的程序有两个登陆界面,我只想显示一个,该怎么做啊,有两个mainform
解决方案 »
- 聊聊消息里的左键
- DELPHI编写中WINEXEC和BUTTON的问题
- 请问如何实现像用友 "工资管理" 的公式设置 ?????????????
- 如何检测所有打开的IE窗口,如果某一IE出现"无法显示网页"即打不开网页时,就把它刷新,重新访问该网页?
- 各位有没有制作帮作文件的软件?
- Delphi5+BDE+Sybase12,对数据库进行操作,带有中文字符报错,怎么解决?
- 大家有没有用过连在线帮助都是中文的delphi
- 各位高手望这里看!!!难题
- dll库在引用时,报错帮忙查一下
- 请问面向对象与面向结构两种编程思想之间的矛盾怎么解决?
- Delphi6突然不能使用了
- 新手的问题,高人不要见笑,关于DBGRID。
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.Title :='XXXXXXXXXXXX';
splashFM:=TsplashFM.Create(nil);
splashFM.Show;
splashFM.Update;
if 你的条件
LoginFM :=TLoginFM1.Create(nil) else
LoginFM :=TLoginFM2.Create(nil) ;
if LoginFM.ShowModal <>1 then
begin
splashFM.Update;
splashFM.Free;
LoginFM.Free;
Application.Terminate;
Exit;
end ;
splashFM.Free;
Application.CreateForm(TMtnPhoneTest, MtnPhoneTest); Application.Run;
end.
其中LoginFM : TForm LoginFM :=TLoginFM1.Create(nil)
LoginFM :=TLoginFM2.Create(nil)
是用你的不同的LoginFM来构建LoginFM。
类的多态