OCX percorso file

[IKON]

Sto progettando un semplice OCX.
Vorrei aggiungere una proprietà Picture e dare perciò all'utente la possibilità di scegliere un'immagine, così come si fa con il controllo PictureBox o Image.

La domanda è semplice:
Che tipo di dati devo utilizzare per dichiarare le sub Property Get e Let in modo che nella finestra proprietà il sistema mi dia la possibilità di scegliere un file dall' HD?

Grazie a tutti

[xegallo]

Originariamente inviato da IKON
Sto progettando un semplice OCX.
Vorrei aggiungere una proprietà Picture e dare perciò all'utente la possibilità di scegliere un'immagine, così come si fa con il controllo PictureBox o Image.

La domanda è semplice:
Che tipo di dati devo utilizzare per dichiarare le sub Property Get e Let in modo che nella finestra proprietà il sistema mi dia la possibilità di scegliere un file dall' HD?

Grazie a tutti

string

[IKON]

Ho gia provato, ma così se ricordo il percorso esatto dell'immagine sul mio HD allora è OK. Ma io vorrei poter selezionare il file proprio come faccio quando associo (in fase di progettazione) un file immagine a un oggetto PictureBox.
Tanto per intenderci in questo caso nella finestra proprietà del PictureBox alla voce Picture compare il pulsantino con "..." che ti lancia la finestra di dialogo Apri..... ecco io vorrei la stessa cosa

[chipdb]

Public Property Get Picture() As Picture
    Set Picture = Picture1.Picture
End Property

Public Property Set Picture(ByVal New_Picture As Picture)
    Set Picture1.Picture = New_Picture
    PropertyChanged "Picture"
End Property

Ciao

[IKON]

Grazie per l'interessamento.

Una cosa non mi è chiara, cosa devo scrivere in UserControl_ReadProperties e UserControl_WriteProperties ?

[chipdb]

'Carica i valori della proprietà dalla memoria
Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
    Set Picture1.Picture = PropBag.ReadProperty("Picture", Nothing)
End Sub

'Scrive i valori della proprietà in memoria
Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
    Call PropBag.WriteProperty("Picture", Picture1.Picture, Nothing)
End Sub

Ciao

[IKON]

Grazie 100000000000!!!!!

[IKON]

Mi sono accorto ora che utilizzando il codice sopra anche se tutto funziona succede una cosa strana
Quando lancio il mio form di prova in progettazione, nella finestra proprietà alla voce Picture compare "(nessuna)" invece di "(bitmap)", eppure l'immagine che abbina è quella giusta!!!

Qualuno saprebbe spiegarmi il perchè?? :master: :master: :master:

[IKON]

Ragazzi ma nessuno sa aiutarmi???
Mi appello ai moderatori!!! Please