如何Form全屏显示一幅图片，任务栏不显示？ ( 积分: 3 )

S

softyes

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-15

• #1

如何Form全屏显示一幅图片，任务栏不显示？

 

A

ANiDelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-15

• #2

procedure TForm1.FormCreate(Sender: TObject);
begin
BorderStyle := bsNone;
SetWindowPos(Handle, HWND_TOPMOST, 0, 0, Screen.Width, Screen.Height, SWP_SHOWWINDOW);
end;

 

S

softyes

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-15

• #3

状态栏还是显示

 

R

rtl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-11-16

• #4

ShowWindow(Application.Handle, SW_HIDE);

--------------------------------
www.waibaoinfo.com