Delphi下 多显示器，将窗体显示于第二个显示器

Form1.MakeFullyVisible(screen.Monitors[1]); 

 

with Form1 do begin 
{ Position form } 
Top := 0 ; 
Left := 0 ; 
{ Go full screen} 
BorderStyle := bsNone ; 
WindowState := wsmaximized; 
ClientWidth := Screen.Width ; 
ClientHeight := Screen.Height; 
Refresh; 
SetForegroundWindow(Handle) ; 
SetActiveWindow(Application.Handle) ; 
end;

转载于:https://www.cnblogs.com/Values/p/5095907.html