API

标签：style   io   os   ar   on   c   r   window   app   

//任务栏上不出现按钮
SetWindowLong(Application.Handle, GWL_STYLE, WS_EX_TOOLWINDOW);

//任务栏上不出现按钮,通过改变最小化后窗体的位置来实现
var
tPlacement: WINDOWPLACEMENT;
begin
SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);
GetWindowPlacement(Application.Handle, @tPlacement);
tPlacement.flags := WPF_SETMINPOSITION;
tPlacement.ptMinPosition.X := Screen.Width + 100;
tPlacement.ptMinPosition.Y := Screen.Height + 100;
SetWindowPlacement(Application.Handle, @tPlacement);
end;

//显示一个最大化窗体。
ShowWindow(Self.Handle, SW_SHOWMAXIMIZED);

API

标签：style   io   os   ar   on   c   r   window   app   

原文地址：http://www.cnblogs.com/spiritofcloud/p/3976189.html