网上找了一圈关于delphi 分屏显示的文字,都说的不怎么详细,复制过来总是没有效果,整理后发布出来,其实分屏很简单,就是把delphi的窗体left属性值设置成主屏分屏率 假设是1366*768 就是设置left:=1366即可
上代码
var
from: TForm2;//需要在第二屏展示的窗体
begin
from := TForm2.Create(Self);
from.Top := Screen.Monitors[1].Top;
from.Left := Screen.Monitors[0].Width; // 重点是这个 需要把窗体的left 设置主屏的分辨率宽度
from.Width := Screen.Monitors[1].Width;
from.Height := Screen.Monitors[1].Height;
from.Show;
from.MakeFullyVisible(Screen.Monitors[1]);//重点二,需要加上这个语句,不然总是在主屏显示
自己项目中调用记得创建和释放对象哦,这里只是演示代码,没有释放窗体对象。