bool __fastcall TForm1::IsBigFont() { bool bRetVal = true; HWND lHwnd; long lPrevMapMode; HDC hdc; TEXTMETRIC tm; lHwnd = GetDesktopWindow(); hdc = GetWindowDC(lHwnd); if (hdc) { lPrevMapMode = SetMapMode(hdc, MM_TEXT); GetTextMetrics(hdc, &tm); lPrevMapMode = SetMapMode(hdc, lPrevMapMode); ReleaseDC(lHwnd, hdc); bRetVal = (tm.tmHeight -> 16); // true == große Schriftarten, false == kleine Schriftarten } return bRetVal; }
Kategorien
-
Neueste Beiträge
- Warum Krebspatienten so viel Gewicht verlieren
- [SAP Fiori] ABAP RESTful Application Programming Model (RAP)
- [SAP] Events und Typkoppelungen
- [SAP Gateway] Daten versenden über einen eventbasierten Aufruf einer OData-Funktion
- [ABAP] SE80: Tricks für den ABAP-Editor
- [SAP] Kurz- und Langtexte in Objekten suchen
- [SAP] Buchungskreis, Werk, Bewertungskreis, Kostenrechnungskreis, Einkaufsorganisation, Lagerort
- [ABAP] SAP-Workdir ermitteln
- [ABAP] SELECT-OPTIONS: Möglichkeiten, um Variablen zu definieren
- Bluttest erkennt Demenz bis zu 15 Jahre vor Diagnose