求,谢(50分)

  • 主题发起人 主题发起人 mydd888
  • 开始时间 开始时间
M

mydd888

Unregistered / Unconfirmed
GUEST, unregistred user!
简单问题,别笑我
1。如何使窗体不在任务栏显示?类似VB窗体SHOWINTASKBAR属性
2。如何启动一个窗体,在此窗体显示完毕(或达到条件)后装载显示其他窗体?类似VB由MAIN启动,a.show:load b,在a中再unload a:b.show
 
1:http://www.baidu.com/baidu?word=delphi%2C%B4%B0%CC%E5%B2%BB%D4%DA%C8%CE%CE%F1%C0%B8%CF%D4%CA%BE&cl=3
 
1。如何使窗体不在任务栏显示?类似VB窗体SHOWINTASKBAR属性
setwindowlong(application.handle,gwl_exstyle,ws_ex_toolwindow);
2:你可以把第一个窗体显示完毕后(满足条件),执行装载下一个窗体,不满足,application.terminate;
比如:
if mainform.ShowModal=mrok then{满足条件的时候,把窗体的ModalResult属性设置成mrok,因为mainform.showmodal这个对象方法返回的值就是读的modalresult属性的值,都是mrok,表明符合,执行下一个窗体加载。}
//显示下一个窗体
else//不符合条件,也就是说窗体的modalresult的属性不为mrok,退出程序。
application.terminate;
 
1。如何使窗体不在任务栏显示?类似VB窗体SHOWINTASKBAR属性
我不知道VB的效果是什么,再给你补充一个。
application.ShowMainForm:=false;//程序窗体隐藏,两状态栏按纽都隐藏。
 
非常感谢您的回答,对于第2个问题能否稍微举例
比如窗体A,B,如何能让程序启动时仅显示A
当A中的按狃按下时,卸载A,显示B
 
问题1我也试了,对于窗体BORDERSTYLE属性为bsSizeable,任务栏仍然显示
 
晕啊。昨天晚上写好了,结果发出去的时候,网掉线,白写了。
1。如何使窗体不在任务栏显示?类似VB窗体SHOWINTASKBAR属性
setwindowlong(application.handle,gwl_exstyle,ws_ex_toolwindow);
application.ShowMainForm:=false;//
这两个方法都必须放在 fromcreate事件中才有效。
///工程文件中
{$R *.res}
var
denglu:Tdenglu;
begin
Application.Initialize;
denglu:=Tdenglu.create(application);//建立登陆窗体实例
if denglu.ShowModal=mrok then//登陆成功
begin
denglu.free;
Application.CreateForm(TmainForm, mainForm);
Application.Run;
end
else//登陆失败
begin
application.Terminate;
end;
end

 
denglu.ShowModal=mrok这个我还是不太懂,可否讲解一下,假如就是用户登陆,用户在denglu窗体中点确定,判断登陆成功与否不是在denglu窗体中吗,如何判断并显示另外一个窗体呢,谢谢谢谢真是好人
 
我使的是D7,窗体没有ModalResult属性
 
明白了,谢谢你
 
denglu窗体验证通过后,在释放前把该窗体的modalresult属性(运行时属性)设置为mrok.
denglu.ShowModal返回值就是modalresult中的值。相等,释放---》创建主窗体--》显示主窗体。。。。。。。。
 
后退
顶部