dimensioni immagine (picture) vb6

[bako]

.. è un porblema stupido ma nn riesco a trovare le dimensioni di un immagine carcata in un image.. se faccio image.picture.width mi restituisce un valore tipo 20300 .. perchè?

[hunt]

ti restituisce quel valore xchè il valore è in twip...

esempio:

px = twip/15

quindi...

20300/15 = 1353,3 px

Spero che il problema era questo, altrimenti mi sa che nn ho capito!

ciaooo

[bako]

problema risolto ... basta modificare il campo scale e scegliere pixel

[Melly]

io ho fatto una prova con due immagini 10X4 cm realizzate con prodotti grafici diversi e mi restituiscono heigt e widh differenti

inoltre non ho la proprietà scale sul controllo image :master:

[buba88]

la proprietà scale è del controllo form in cui è inserita l image

[Melly]

Originariamente inviato da buba88
la proprietà scale è del controllo form in cui è inserita l image

ha ecco

[Melly]

proprio non capisco

io devo avere un'immagine che ha al massimo una dimensione di 10 X 4 cm

Image2.Picture = LoadPicture(Txt_patfoto.text)
Me.ScaleMode = 7
If Image2.Picture.Width > 10 Or Image2.Picture.Height > 4 Then
    MsgBox "No"
    Image2.Picture = Nothing
End If
Me.ScaleMode = 1

cosa c'è di sbagliato? :master:

[buba88]

con questo codice cosa ti dice il prog?

[lufo5]

Originariamente inviato da Melly
proprio non capisco

io devo avere un'immagine che ha al massimo una dimensione di 10 X 4 cm



cosa c'è di sbagliato? :master:

Senza cambiare lo scalemode che non ha effetto sul width e height del controllo image, prova così:

If ScaleX(Image2.Picture.Width, vbHimetric, vbCentimeters) > 10 Or ScaleY(Image2.Picture.Height, vbHimetric, vbCentimeters) > 4 Then
    MsgBox "No"
    Image2.Picture = Nothing
End If
Me.ScaleMode = 1

occhio però! Le dimensioni in centimetri non sono quelle effettive di stampa, ma quelle logiche. Secondo me ti ocnviene basarti sui pixel.