请教如何实现双屏显示问题 请问谁知道如何实现多屏显示??我的程序需要实现这样的功能,笔记本的VGA连接了电视机显示器,这样跟笔记本的显示屏构成双显示屏.有部分数据是不能给客户看到的,这部分数据显示在电视机显示器部分.笔记本的显示屏可看到所有数据,请问程序部分我应该如何实现??谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 把电视机显示器设置为桌面扩展,位置在笔记本的显示屏左边。此时,你的Windows桌面的宽度就是两个显示屏的总宽度了。然后,你的程序里建立两个窗体,一个放在Windows桌面的左边,一个放在右边,两个窗体显示不同的内容。 如2楼所说的,先设置为扩展桌面显示然后可以通过程序去判断哪个是主显示器,再将你的窗体位置设置为各个显示器所在的桌面位置 var i : Integer;begin for i := 0 to Screen.MonitorCount - 1 do begin if Screen.Monitors[i].Primary then//表示是否为主显示器 begin Screen.Monitors[i].BoundsRect;//该显示器所占桌面的位置 end; end; 看这里:http://hi.baidu.com/0xcea4/blog/item/a0c9688a4d7ef914c9fc7a29.html 怎么设置TLable 的行间距? 这个函数执行有误,但是try except end不起作用,一直报错,请高手帮忙处理下吧,谢谢了! 简单问题,但我不会,高手帮忙~!! 如何控制resourcestring里面的定义? 呵呵,类库的新含义 如何给VCL组件加上面板图标 请问StringGrid中可以填东西,然后发到数据库吗 求助:应用代理防火墙方面的知识 如何有效测试DELPHI写的ERP系统?? 在pascal中,为什么针对文件操作的writeln,其内容要在屏幕中显示出来? delphi中出现Undeclared identifier: 'FieldValues'错误,为啥? 求购这本书
然后可以通过程序去判断哪个是主显示器,再将你的窗体位置设置为各个显示器所在的桌面位置
var i : Integer;
begin
for i := 0 to Screen.MonitorCount - 1 do
begin
if Screen.Monitors[i].Primary then//表示是否为主显示器
begin
Screen.Monitors[i].BoundsRect;//该显示器所占桌面的位置
end;
end;