如何得到机器的分辨率,如何程序中进行设置? 如题 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var x,y:integer;x:=getSystemMetrics(0)横坐标y:=getSystemMetrics(1)纵坐标label1.caption:='当前的显示的分辨率为'+IntToStr(x)+'*'+IntToStr(y); 动态创建的Timage图片更换问题 关于将grid里英文内容显示为对应中文的问题 各位兄弟,关于DBGRID不同值显示不同颜色问题 只有20分了,请教一个数据统计的问题? 与大家讨论一个是否值得使用第三方控件的问题,来者有分,分我多的是。 100一求!!! 在线等!!! 高手看看如下sql语句在delphi中运行为什么会出错? 我想精简我的主unit 如何实现用delphi完成Access数据库的备份 用DELPHI 4.0创建SPLASH窗口的费解现象 将代码转换成C++ Builder代码,在线等, 如何解决这样的dll释放问题,这个问题已经困扰好几天了,急!
x,y:integer;
x:=getSystemMetrics(0)横坐标
y:=getSystemMetrics(1)纵坐标
label1.caption:='当前的显示的分辨率为'+IntToStr(x)+'*'+IntToStr(y);