[VB6] AutoSize in PictureBox

[satriano]

Salve.
Se io carico una immagine in un picturebox, come faccio a farla automaticamente adattare alla grandezza di quel picturebox, e che venga mostrata nella sua totalità?
Certe volte se il picture box é più piccolo dell'immagine, allora quest'ultima non viene visionata integralmente. Con quale controlo/proprietà o metodo si puo ottenere questo ? Ho provato autosize ma non va..

[oregon]

L'oggetto Picture non ridimensiona le immagini da se' (al contrario di Image che ha una proprieta' specifica).

Per farlo, inserisci un altro controllo Picture non visibile (diciamo Picture2) carica in quest'ultimo l'immagine e usa il codice

Picture1.PaintPicture Picture2.Picture, 0, 0

per trasferire l'immagine ridimensionata nel primo controllo.

[satriano]

ho appena provato, ma il risultato non cambia in picture1
L'immagine caricata NON si adatta alla grandezza del controllo picture1

[oregon]

Beh ... a me funziona ...

Mi fai vedere *tutto* il codice?

[satriano]

Ho inserito sul form
un picturebox 2
un picturebox 1
un command button
un CommonDialogControl


e nel CommandButton ho scritto:
-----------
Private Sub Command1_Click()
CommonDialog1.ShowOpen
Picture2.Picture = LoadPicture(CommonDialog1.filename)

Picture1.PaintPicture Picture2.Picture, 0, 0


End Sub
--------------------------
Posso caricare qualsiasi immagine in picturebox 2 ma in picturebox 1 non cambia nulla, se l'immagine é troppo grande mi viene mostrata parzialmente come in picturebox2

[oregon]

Ok ... scrivi

CommonDialog1.ShowOpen
Picture2.Picture = LoadPicture(CommonDialog1.FileName)
Picture2.AutoSize = True
Picture1.AutoRedraw = True
Picture1.PaintPicture Picture2.Picture, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight, 0, 0, Picture2.ScaleWidth, Picture2.ScaleHeight

[alka]

Originariamente inviato da satriano
Salve.

La volta scorsa era l'ennesima che correggevo, questa invece è l'ultima: se le discussioni che apri non hanno linguaggio e versione nel titolo, come le altre, e non sono nel posto giusto, le chiudo semplicemente.

[satriano]

Alka,
Guarda che all'inizio il titolo l'ho ben messo:
Autosize in PictureBox
é vero che ho omesso di menzionare VB e la versione, ma poiché ho postato nella sezione VisualBasic e .Net Framework pensavo (penso) che sia sottinteso che qui si parli di vb6.
La prossima volta ci mettero' più precisione allora.

Ciao.

[alka]

Originariamente inviato da satriano
Guarda che all'inizio il titolo l'ho ben messo:
Autosize in PictureBox

Quello è il titolo modificato da me.

Originariamente inviato da satriano
é vero che ho omesso di menzionare VB e la versione, ma poiché ho postato nella sezione VisualBasic e .Net Framework pensavo (penso) che sia sottinteso che qui si parli di vb6.
La prossima volta ci mettero' più precisione allora.

Al di là del fatto che non si parla solo di VB6, ti avverto che la discussione si trova nel forum giusto perchè ce l'ho spostata io.

:rollo:

[satriano]

Ah, se é cosi ACCETTO il rimprovero, non mi ero accorto dello 'spostamento' .
Beh scusa.

Ciao