关于~~全屏~~的技术问题(50分)

  • 主题发起人 主题发起人 guojinbin
  • 开始时间 开始时间
G

guojinbin

Unregistered / Unconfirmed
GUEST, unregistred user!
如何实现全屏,不是最大化,即要屏蔽任务栏又要屏蔽系统菜单,就是播放MTV时那种全屏
 
BorderStyle := bsNone
然后最大化

或者用DirectX
 
Height := Screen.Height;
Width:= Screen.Width
BorderStyle :=bsNone;
Position :=poScreenCenter;
 
procedure TForm1.FormCreate(Sender: TObject);
begin

form1.Top:=0;
form1.Left:=0;
form1.Width:=screen.Width;
form1.Height:=screen.Height;
BorderStyle:= bsNone;
FormStyle:= fsStayOnTop;

end;
 
上面几位说的都可以的啊,你可以结分了
 
to:木子
如何用DirectX,能具体一点吗
 
也不知道DirectX怎么做,高手赐教啊
 
多人接受答案了。
 
后退
顶部