Rubrik: Verschiedenes / Sonstiges | VB-Versionen: VB4, VB5, VB6 | 23.11.00 |
Umrechnung Twips in Pixel und umgekehrt Die meisten Windows-API-Funktionen benötigen Größen- und Positionsangaben in der Einheit Pixel bzw. geben diese Angaben in Pixel zurück. Da Sie in d... | ||
Autor: Dieter Otter | Bewertung: | Views: 46.292 |
www.tools4vb.de | System: Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
Die meisten Windows-API-Funktionen benötigen Größen- und Positionsangaben in der Einheit Pixel bzw. geben diese Angaben in Pixel zurück. Da Sie in der Regel innerhalb Ihres VB-Projekts mit der Einheit Twips arbeiten, müssen Sie die entsprechenden Zahlenwerte von Pixel nach Twips oder umgekehrt umrechnen. Visual-Basic liefert von Haus aus entsprechende Umrechnungsfunktionen.
' Umrechnung Twips nach Pixel xPixel = xTwips / Screen.TwipsPerPixelX ' horizontal yPixel = yTwips / Screen.TwipsPerPixelY ' vertikal ' Umrechnung Pixel nach Twips xTwips = xPixel * Screen.TwipsPerPixelX ' horizontal yTwips = yPixel * Screen.TwipsPerPixelY ' vertikal