كيف يمكن معرفة قياس الشاشة بالإنش؟

[shagrouni]

السلام عليكم

باستخدام الدالة : GetDeviceCaps

والتي تقوم بارجاع قدرات الطرفية المراد الاستعلام عنها.

نمرر للدالة فهرس المعلومةHORZRES لتعطينا عرض الشاشة بالمليمتر، بعدها يمكن تحويلها إلى بوصة (بوصة = 25.4 ملم).

PHP كود :

procedure TForm1.bt2Click(Sender: TObject);
var
  Mlm: integer;
  Inch: single;
  Hwnd: integer;
begin
  Hwnd := GetDC(0);
  Mlm := GetDeviceCaps(Hwnd, HORZSIZE);
  Inch :=  Mlm /25.4;
  caption := FloatToStr(Inch);
  ReleaseDC(0, Hwnd);
end; 


يمكن الاستعانة بملف المساعـدة على GetDeviceCaps للاطلاع على فهارس القدرات التي يمكن الاستعلام عنها.