任务栏的问题，敬请关注(100分)

L

libaoliang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #1

为使应用软件全屏化，使用了以下代码取消了windows的任务栏
但应用软件并没有占用原来任务栏所在的区域，使屏幕下方空出了一行，很难看，
请问如何解决？而用任务栏自动隐藏，则不出现此情况。
showwindow(findwindow('shell_traywnd',nil),sw_hide)

 

L

libaoliang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #2

jrd
不要开玩笑

 

J

jrq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #3

别用那个东东了～
我给你一段代码：
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.Left:=Screen.WorkAreaLeft;
Form1.Width:=Screen.Width;
Form1.Top:=Screen.WorkAreaTop;
Form1.Height:=Screen.Height;
end;
end.
－－－－－－－－－记得将form设为fsStayOnTop， 这样就轻松搞定！ [][]

 

D

DZHZH2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #4

用rxlib的托盘控件。很好用的。

 

S

sydanlong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #5

這個問題我覺得應該可以想通過在這個窗口一建立時就最大化來解決的要簡單又好!
最大化窗口:windowstate:=wsMaximized;

 

荷

荷塘新月

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #6

这个问题很好解决。假设你的程序主窗体是 form1，设置bordericons为
[biSystemMenu,biMinimize,biMaximize]。
在程序退出时加上：form1.WindowState:=wsMaximized;即可解决这个问题。

 

J

jrq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #7

to 荷塘新月：
不明白你是什么意思？ 能解决吗？ 奇怪！

 

J

jrq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #8

[] 没有开玩笑！
这么严肃的地方，我一般不会给人家开玩笑的！ 你试试就知道了！
另外，你将我的名字写错了！
－－－－－是jrq， 不是jrd，
－－－－－我在DFW这么久了，可不想改名字的哦！
to sydanlong：
》》通過在這個窗口一建立時就最大化來解決的要簡單又好!
》》最大化窗口:windowstate:=wsMaximized;
这样不行的！ 这样对任务栏是很无奈的！
如：
procedure TForm1.FormCreate(Sender: TObject);
var lpRect:tRect;
begin
SystemParametersInfo(SPI_GETWORKAREA,0,@lpRect,0);
Form1.Left :=lpRect.left;
Form1.Top :=lpRect.Top;
Form1.width :=(lpRect.right-lpRect.left);
Form1.Height:=(lpRect.bottom-lpRect.Top);
end;

[][]

 

W

wyh919

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #9

按jrq 说的就行，除非你还有更特别的要求

 

D

D影子D

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #10

不用设置任务栏!
改form的属性：
formstyle:fsnormal
windowstate:wsmaximized

 

J

jrq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #11

to D影子D：
》 改form的属性：
》formstyle:fsnormal
》windowstate:wsmaximized

这样不行吧～ 任务栏还是显示出来了啊！

 

荷

荷塘新月

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #12

试一试不就知道了！实践是检验真理的唯一标准！

 

J

jrq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #13

to 荷塘新月：
这样做任务栏还是显示出来了啊！
全屏的意思是不是指 除任务栏以外的地方？ 要是这样我的理解就错了！D影子D 的做法正确！
》》设置bordericons为[biSystemMenu,biMinimize,biMaximize]。
这是新建窗体默认的啊～
已经试验过了我才说的！
你说：－－－》》在程序退出时加上：form1.WindowState:=wsMaximized;即可解决这个问题。
我在程序退出的时候，加上了这句，窗体一闪就没有了～～ 再次启动时一样的！
这个最大化不知有何用？ 望赐教！谢谢！
》》实践是检验真理的唯一标准！
可你的代码用了， 看不出任何全屏的迹象！ [] 我接着实践！ []

 

W

wk_knife

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-27

• #14

：荷塘新月, 你是不是写错了，我试了一下，没什么效果，你最好贴点代码。

 

L

libaoliang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-11

• #15

没办法，
对结果虽不满意，
也该结束了

 

L

libaoliang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-11

• #16

多人接受答案了。