如何使运行DELPHI设计的程序不让它显示在状态栏上? ShowWindow(FindWindow('TForm1','Form1'),SW_Hide); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 对不起我说错了,我是想让这个程序不在windows任务栏上不显示。 Form.BorderStyle设置成bsToolWindow或者bsSizeToolWin即可 将dpr文件改为:begin Application.Initialize; Application.ShowMainForm:= False; IsLibrary:= False; Application.CreateForm(TForm1, Form1); Application.Run;end. 只有在窗体启动的建立的时候加上下面这句就行了。setwindowlong(application.handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW) TO:Idle_(阿呆)兄,你那个方法不行,我试了。to:zgb(疲疲)兄,你那个方法虽然任务栏上没显示,但连整个程序窗口界面都没了,这不符合我的要求。再说详细一点:一般运行程序时,会在windows的任务栏上显示,我现在要把它隐藏起来且我还要显示这个窗口。 use API:SetWindowlong(handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW)Handle refers to the window you want to hide. 就是NHJOY的方法啊,我都试过了,可以的(无论是98下还是2000下都可以) 在FormCreat中添加如下: SetWindowLong(Application.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW); delphi2010编写代码出现的问题. 奶奶的devexpress vcl太难装了.搞到深夜2点过还没装好. delphi返回值的问题 delphi工程师 在上海里的月薪是多少!希望大家多多发表建议 不能向数据表中插入数据 急急急!!!从字符串转换为datetime时发生语法错误 求救 怎样通过一个变量触发一个自己写的过程 各位高手:小弟使用dbexpress的问题,请帮忙 怎么知道是最后一条记录? 怎么强制中断???难! 关于shellexcute,如何动态调用写邮件?(分虽少,肯定送出)
begin
Application.Initialize;
Application.ShowMainForm:= False;
IsLibrary:= False;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
setwindowlong(application.handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW)
to:zgb(疲疲)兄,你那个方法虽然任务栏上没显示,但连整个程序窗口界面都没了,这不符合我的要求。
再说详细一点:一般运行程序时,会在windows的任务栏上显示,我现在要把它隐藏起来且我还要显示这个窗口。
SetWindowlong(handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW)Handle refers to the window you want to hide.
SetWindowLong(Application.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);