网上文摘 最近更新 下载排行 资源分类 下载指南
经典编程资源 精彩不容错过
设为首页
加入收藏
联系我们
当前位置:Delphi园地技巧文章编程心得 → Delphi编程中获取屏幕分辨率
Delphi编程中获取屏幕分辨率
日期:2004-12-28 作者: 人气: 查看:[大字体 中字体 小字体]

当我们需要获取所运行程序时计算机的分辨率时,有两种方法:①可以通过访问Delphi提供的SCREEN全局变量,即SCREEN.WIDTHSCREEN.HEIGHT以像素点给出屏幕的分辨率。②利用WindowsAPI函数GetDeviceCaps()来得到所用显示器的分辨率,源代码如下:

    Application.Initialize

    Application.CreateForm(TForm1 Form1)

    CASE GetDeviceCaps(GetDC(Form1.Handle)HORZRES) of

    640 //640×480分辨率进行处理的代码;

    800 //800×600分辨率进行处理的代码;

    1024 //1024×768分辨率进行处理的代码;

    1280 //1280×1024分辨率进行处理的代码;

END

(出处:www)

相关文章:
·动态调整显示器分辨率
 → 特别推荐
 → 热点TOP10
关于我们 | 广告服务 | 发布资源 | 联系站长 Copyright 2001-2012 Delphi园地 All Rights Reserved