vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Zippen wie die Profis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2020
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Fortgeschrittene
Re: Bild auf Bild einblenden 
Autor: Dikn
Datum: 25.06.20 12:26

Hallo Manfred X!

Vielen, vielen Dank für Deine Mühe!!!
Ich hab's ausprobiert -> funktioniert prima

aber: Rechts ist ein Streifen in der Hintergrundfarbe sichtbar (Breite 1 Pixel)
verschwindet, wenn pic_size (1920, 1080) geändert in (1919, 1080)

Neu:
Ich möchte ein Bild von "Links" nach "Rechts" auf ein Bild einschieben
Mein Code Funktioniert, ist aber sehr langsam. (Timer.Interval = 10, Verschiebung: 20)

Private Sub FadeLR()
        i += 1
 
        Using bmp As New Bitmap(pic_size.Width, pic_size.Height), _
                                g As Graphics = Graphics.FromImage(bmp)
            g.DrawImage(bmp1, 0, 0)
 
            Dim r As New Rectangle(-pic_size.Width + i * 20, 0, _
                                   pic_size.Width, pic_size.Height)
 
            If i >= pic_size.Width / 20 Then
                r = New Rectangle(0, 0, pic_size.Width, pic_size.Height)
                Timer2.Enabled = False
            End If
 
            pb.Image = DirectCast(bmp.Clone, Bitmap)
            g.DrawImage(bmp2, r, 0, 0, pic_size.Width, pic_size.Height, _
                        GraphicsUnit.Pixel)
 
            If pb.Image IsNot Nothing Then pb.Image.Dispose()
            pb.Image = DirectCast(bmp.Clone, Bitmap)
        End Using
    End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Bild auf Bild einblenden138Dikn22.06.20 11:57
Re: Bild auf Bild einblenden68Manfred X22.06.20 13:14
Bild-Datei zentriert in eine vorgegebene Fläche einpassen63Manfred X22.06.20 14:15
Re: Bild auf Bild einblenden29Dikn23.06.20 13:41
Re: Bild auf Bild einblenden48Manfred X23.06.20 16:35
Re: Bild auf Bild einblenden17Dikn25.06.20 12:26
Animation: Bild in Picturebox verschieben29Manfred X25.06.20 13:34
Re: Bild auf Bild einblenden13Dikn26.06.20 08:48
Re: Bild auf Bild einblenden18Manfred X26.06.20 11:40
Animation: Bild über Bild schieben20Manfred X26.06.20 12:26
Re: Bild auf Bild einblenden15Dikn28.06.20 13:50
Re: Bild auf Bild einblenden11Dikn28.06.20 14:04

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

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2020 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