Deklaration: Declare Function PolyBezier Lib "gdi32.dll" ( _ ByVal hdc As Long, _ lppt As POINTAPI, _ ByVal cPoints As Long) As Long Beschreibung: Parameter:
Rückgabewert: Beispiel: Private Declare Function PolyBezier Lib "gdi32.dll" ( _ ByVal hdc As Long, _ lppt As POINTAPI, _ ByVal cPoints As Long) As Long Private Type POINTAPI x As Long y As Long End Type ' Bezier auf die Form zeichnen Private Sub Form_Paint() Dim Retval As Long, Pt(6) As POITNAPI Me.ScaleMode = vbPixels Me.Cls ' Kurven definieren With Pt(0) .x = 20 .y = 20 End With With Pt(1) .x = 200 .y = 200 End With With Pt(2) .x = 120 .y = 300 End With With Pt(3) .x = 120 .y = 80 End With With Pt(4) .x = 200 .y = 120 End With With Pt(5) .x = 20 .y = 60 End With With Pt(6) .x = 20 .y = 20 End With ' Bezier zeichnen Retval = PolyBezier(Me.hdc, Pt(0), UBound(Pt) + 1) End Sub Diese Seite wurde bereits 7.309 mal aufgerufen. |
Neu! sevEingabe 3.0 Einfach stark! Ein einziges Eingabe-Control für alle benötigten Eingabetypen und -formate, inkl. Kalender-, Taschenrechner und Floskelfunktion, mehrspaltige ComboBox mit DB-Anbindung, ImageComboBox u.v.m. Buchempfehlung Tipp des Monats Juni 2024 Microsys Kramer Mausrad im Formular abschalten (Access) Deaktiviert das Mausrad in Access-Formularen. 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... |
||||||||||||||||
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. |