Jeg prøver at få et billede, i en picbox til at bevæge sig. Dvs. ikke en animation, men et BMP billede.
Jeg ønsker blot at det bevæger sig lidt hen af x-aksen og lidt ned af y-aksen, men det skal foregå inde i picboxen, altså uden at selve boksen bevæger sig.
Billeder vil altid pr. default tegnes fra 0,0 dvs øverste venstre hjørne. Hvis du vil have billedet flyttet inden i picboxen er du nødt til selv at tegne billedet på picboxen manuelt. Det kan gøres med standardfunktionen PaintPicture eller med API'er som f.eks. BitBlt.
MHT til billedets størrelse kan du hente den med: Form1.Picture1.Picture.Width/Height (her antager jeg din form hedder Form1, og din Picbox hedder Picture1).
Det tal der kommer ud er imidlertid i et underligt format der hedder HiMetric, men du kan transformere det med funktionen ScaleX(Y): (Sæt også en Int på for at få et helt tal):
Bredde i pixels = Int(ScaleX(Form1.Picture1.Picture.Width, vbHimetric, vbPixels)) Højde i pixels = Int(ScaleY(Form1.Picture1.Picture.Height, vbHimetric, vbPixels))
Hvad så Jon? Har du brug for mere hjælp?............
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.