PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : Image zentrieren


beenal
09.02.2002, 15:47
Hi Leute!
Hab mal wieder ne frage...habe eine Form, maximiert + BorderStyle = 0. dazu kommt noch ein Image. also, hier ist mal der code den ich zusammengebracht habe...aber ds Bild wird trotzdem nicht horizontal + vertikal zentriert dargestellt! jemand ne ahnung??


Private Sub Form_Load()
Image1.Picture = LoadPicture(CurDir & "\abc.jpg")

Image1.Left = ((Me.Width / Screen.TwipsPerPixelX) - Image1.Width) / 2
Image1.Top = ((Me.Height / Screen.TwipsPerPixelY) - Image1.Height) / 2
End Sub


cYrus
09.02.2002, 16:01
wenn du das richtig berechnest klappst sogar ;) (Mathematik 1. Klasse :D )

Private Sub Form_Load()
Image1.Picture = LoadPicture(CurDir & "\abc.jpg")

Image1.Left = (Me.Width - Image1.Width) / 2
Image1.Top = (Me.Height - Image1.Height) / 2
End Sub

so long
cYrus

beenal
09.02.2002, 16:05
ähm, so wie du hab ich es zu beginn auch gehabt...
das problem is dass
Me.Width pixels zurückgibt
und
Image1.Width twips zurückgibt!

aber so wies aussieht habe ich gerade vorhin (nach 2 stunden suchen + posting hier :rolleyes: ) den richtigen code gefunden...braucht mier also nicht weiterzuhelfen!!! :D

grüzzle
beenal