Tipp 0018 Grafik drehen und spiegeln
Autor/Einsender:
Datum:
  Michael Werner
15.09.2003
Entwicklungsumgebung:   VB.Net 2002
Framework:   1.0
Um ein Bild zu drehen oder zu spiegeln, sind in VB die API-Funktion BitBlt bzw. die daraus abgeleitete Methode PaintPicture mit recht aufwendigen Parametern zu bemühen.
In VB.Net wird das nun ganz einfach. Ein Bitmap-Objekt kennt die RotateFlip-Methode (System.Drawing-Namespace). Diese Methode dreht und/oder kippt das Image-Objekt mit sofort verständlichen Members der RotateFlipType-Enumeration.
 
Public Class Form1
  Inherits System.Windows.Forms.Form
Vom Windows Form Designer generierter Code
  Dim b As Bitmap

  Private Sub Form1_Load(ByVal sender As System.Object, _
         ByVal e As System.EventArgs) Handles MyBase.Load
    b = PictureBox1.Image
  End Sub

  Private Sub Button1_Click(ByVal sender As System.Object, _
          ByVal e As System.EventArgs) Handles Button1.Click
    b.RotateFlip(RotateFlipType.Rotate180FlipX)
    PictureBox1.Image = b
  End Sub

  Private Sub Button2_Click(ByVal sender As System.Object, _
          ByVal e As System.EventArgs) Handles Button2.Click
    b.RotateFlip(RotateFlipType.Rotate90FlipXY)
    PictureBox1.Image = b
  End Sub

  Private Sub Button3_Click(ByVal sender As System.Object, _
          ByVal e As System.EventArgs) Handles Button3.Click
    Me.Close()
  End Sub
End Class
 
Links zum Thema
Grafik-Animation
Grafik in beliebigem Winkel drehen

Windows-Version
98/SE
ME
NT
2000
XP
Vista
Win 7


Download  (50,9 kB) Downloads bisher: [ 1285 ]

Vorheriger Tipp Zum Seitenanfang Nächster Tipp

Startseite | Tipps | Projekte | Tutorials | Bücherecke | VB-/VBA-Tipps | API-Referenz | Komponenten | VB.Net-Forum | VB/VBA-Forum | DirectX-Forum | Foren-Archiv | DirectX | Chat | Spielplatz | Links | Suchen | Stichwortverzeichnis | Feedback | Impressum

Seite empfehlen Bug-Report
Letzte Aktualisierung: Montag, 23. Januar 2012