请教如何获取系统屏幕的分辨率？？？

您所在位置：社区首页 — Delphi讨论区 — 请教如何获取系统屏幕的分辨率？？？

主题：请教如何获取系统屏幕的分辨率？？？

lanjping [专家分：270] 发布于 2007-03-12 09:09:00

如题。
谢了各位大哥大姐

沙发

zaliang [专家分：1010] 发布于 2007-03-12 09:44:00

利用Delphi提供的SCREEN全局变量SCREEN
showmessage(inttostr(screen.width)+'*'+inttostr(screen.height));

板凳

长尾兔 [专家分：3630] 发布于 2007-03-12 09:47:00

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage( Format('%d*%d',[Screen.Width, Screen.Height]));
end;

您尚未登录，请登录后再回复。点此登录或注册