Hy,
ganz Einfach.
1. Weise im Form der Picture-Eigenschaft ein Bild zu z.B.
Form1.Picture = "c:\Test\Test.bmp"
Dannach folgender Code im Resize
Private Sub Form_Resize()
With Form1
.AutoRedraw = True
.PaintPicture .Picture, 0, 0, .ScaleWidth, .ScaleHeight
.AutoRedraw = False
End With
End Sub
FERTIG !!!
Dein Bild passt sich immer an.
ACHTUNG FUNKTION GEHT NICHT BEI EINEM MDI
Liebe Grüße
Frank
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!
