| |
Visual-Basic EinsteigerWIN 7 - kleine, mittlere, hohe Auflösung | | | Autor: LesPaul | Datum: 25.09.15 08:59 |
| moin VB6 Gemeinde
kann man ab WIN 7 abfragen ob der User die kleine (100%) - mittlere (125%) oder hohe (150%) Bildschirmauflösung gewählt hat?
Gruß, LesPaul | |
Re: WIN 7 - kleine, mittlere, hohe Auflösung | | | Autor: visualfx | Datum: 26.09.15 00:32 |
| Hallo,
ich programmiere zwar nicht mit VB6 sondern mit Microsoft Visual FoxPro, sinngemäß ist das aber absolut das gleiche und funktioniert für alle (!!!) Windows-Versionen:
#DEFINE LOGPIXELSX 88
#DEFINE LOGPIXELSY 90
FUNCTION screenResGet( screenResX, screenResY )
LOCAL hDC
LOCAL result
DECLARE INTEGER GetDC IN WIN32API;
INTEGER hWnd
DECLARE INTEGER ReleaseDC IN WIN32API;
INTEGER hWnd,;
INTEGER hDC
DECLARE INTEGER GetDeviceCaps IN WIN32API;
INTEGER hDC,;
INTEGER nIndex
hDC = GetDC( 0 )
IF hDC = 0
lastError()
RETURN .F.
ENDIF
screenResX = GetDeviceCaps( hDC, LOGPIXELSX )
screenResY = GetDeviceCaps( hDC, LOGPIXELSY )
result = ReleaseDC( 0, hDC )
IF result = 0
lastError()
RETURN .F.
ENDIF
RETURN .T.
ENDFUNC
Hierbei gelten für screenResX bzw. screenResY folgende Zuordnungen:
- 96 dpi => 100 %
- 120 dpi => 125 %
- 144 dpi => 150 %
- 192 dpi => 200 %
Hinweis: der User kann aber auch beliebige andere dpi- bzw. %-Werte eingestellt haben!
Gruß, Stefan | |
Re: WIN 7 - kleine, mittlere, hohe Auflösung | | | Autor: LesPaul | Datum: 26.09.15 10:27 |
| Hallo Stefan,
DANKE dafür!
Neue Bitte an das Forum:
habe versucht es VB6 kompatibel zu schreiben und bin leider gescheitert,
vielleicht kann ja jemand helfen.
Gruß, LesPaul
| |
Re: WIN 7 - kleine, mittlere, hohe Auflösung | | | Autor: LesPaul | Datum: 30.09.15 08:21 |
| Guten Morgen Dieter,
funktioniert - Vielen Dank!
Gruß, LesPaul | |
| Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
|
|
Neu! sevDTA 3.0 Pro
SEPA mit Kontonummernprüfung
Erstellen von SEPA-Dateien mit integriertem BIC-Verzeichnis und Konto- nummern-Prüfverfahren, so dass ungültige Bankdaten bereits im Vorfeld ermittelt werden können. Weitere InfosTipp des Monats TOP Entwickler-Paket
TOP-Preis!!
Mit der Developer CD erhalten Sie insgesamt 24 Entwickler- komponenten und Windows-DLLs. Die Einzelkomponenten haben einen Gesamtwert von 1605.50 EUR...
Jetzt nur 599,00 EURWeitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|