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
- [RAP] ODATA V4 Service und Fiori Elements App implementieren
- [ABAP] Übernahme von Dokumenteninfosätzen beim Anlegen von Einkaufsbelegen unterdrücken
- [ABAP] OpenSQL: Stringfunktionen
- [ABAP] OpenSQL: NULL-Indicator zum Anzeigen von leeren Rückgabemengen
- [ABAP] OpenSQL: Set-Indicator für das Aktualisieren von Spalten
- [ABAP] Repository-Infosystem: Views zu Objekten
- [ABAP] SALV-Table – Gruppen für Spaltenvorrat im SALV-Layout
- [ABAP] Retourenumlagerungsbestellungen lesen
- [SAP] Fabrikkalender / Feiertagskalender einrichten
- [ABAP] ABAP2XLSX: CSV-Datei schreiben