Rectangle

Aus API-Wiki
Version vom 7. Oktober 2016, 21:24 Uhr von Jochen Wierum (Diskussion | Beiträge)

(Unterschied) ← Nächstältere Version | Aktuelle Version (Unterschied) | Nächstjüngere Version → (Unterschied)
Wechseln zu: Navigation, Suche

Die API-Funktion Rectangle zeichnet ein Rechteck.

Declare Function Rectangle Lib "gdi32" ( _
                 ByVal hDC As Long, _
                 ByVal X1 As Long, _
                 ByVal Y1 As Long, _
                 ByVal X2 As Long, _
                 ByVal Y2 As Long) As Long

Parameter:

hDC

Handle eines Device Contextes

X1

X-Koordinate oben links

Y1

Y-Koordinate oben links

X2

X-Koordinate unten rechts

Y2

Y-Koordinate unten rechts

Rückgabe(n):

War die Funktion erfolgreich, so erfolgt eine Übergabe eines Wertes ungleich 0. Sollte die Funktion fehlschlagen, so kann die Fehlerursache mittels GetLastError festgestellt werden.

Beispiel:

Dim lngReturn As Long

lngReturn = Rectangle(Picture1.hDC, 10, 10, 100, 100)

Hinweise:

Das Rechteck beginnt beim Punkt X1, Y1 (Koordinaten oben links) und endet beim Punkt X2, Y2 (Koordinaten unten rechts).

Es werden die aktuellen Stift-Einstellungen und Füllstile, bzw. Füllmuster verwendet. Erfolgt die Ausgabe in einer VB-Picturebox oder Form, so können die VB-Funktionen verwendet werden, um Einstellungen zu setzen. Andernfalls müssen API-Befehle (CreatePen, CreateBrush) verwendet werden.

Die Breite und Höhe eines mittels Rectangle gezeichneten Rechtecks ist um einen Pixel geringer als die eines mit dem VB-Befehl Line gezeichneten Rechtecks. Rectangle zeichnet nur bis zu den Pixeln X2-1 und Y2-1, während Line bis einschließlich X2 und Y2 zeichnet.

Illustration der Wirkunsweise des Rectangle-Befehls

Betriebssystem:

Die API-Funktion Rectangle ist unter folgenden Betriebssystemen funktionsfähig:

  • Windows 95 und später
  • Windows NT 3.1 und später