commondialog property

[emerson74]

ciao a tutti, quando mando in esecuzione queste istruzioni incappo in un errore.
Istruzioni:

Me.CommonDialog1.ShowFont
text1.SelFontName CommonDialog1.ShowFont

Errore:

! Errore di compilazione
Utilizzo non valido di property (selezionandomi .SelFontName )

eppure la proprietà dopo il punto è nella lista dell'autocompletamento, dove sbaglio?

Grazie!

[ladyBlu]

ora non ho vb sotto mano, quindi vado un po' ad intuito e a memoria, anche se non ho mai usato le finestre per i font.
cmq io penserei ad una cosa del genere:

CommonDialog1.ShowFont 
Text1.SelFontName = CommonDialog1.FontName

che dici, può andare? :master:

[emerson74]

...non è cambiato nulla, esce sempre il simpatico errore

[ladyBlu]

prova così:

CommonDialog1.ShowFont
Text1.FontName = CommonDialog1.FontName

[emerson74]

impossibile trovare il metodo o il membro dei dati, le proprietà non erano comprese neppure nell'elenco, io ho bisogno di qualcuno che lo sappia risolvere, di fare tentativi "tanto per", sono capace anche io
Grazie!!

[ladyBlu]

Originariamente inviato da emerson74
impossibile trovare il metodo o il membro dei dati, le proprietà non erano comprese neppure nell'elenco, io ho bisogno di qualcuno che lo sappia risolvere, di fare tentativi "tanto per", sono capace anche io
Grazie!!

ah beh, sai che c'è, me ne torno al lavoro mio invece di perdere tempo a cercare di risolverti il problema. non sei per niente carino e la prossima volta me ne guardo bene dal cercare di darti una mano, anche se ho la soluzione al tuo eventuale problema.

[emerson74]

non è assolutamente mia intenzione ne essere maleducato ne mancare di rispetto, proprio per questo motivo quando io rispondo ad un messaggio di aiuto non lo faccio tirando a caso perchè so che la gente come me non ha tempo da perdere.
Se la soluzione non la so io non rispondo e credo che il mio comportamento serva sia a risparmiare il database del form da inutili messaggi, sia alle persona che chiedono aiuto che si ritrovano al punto di partenza.
può darsi che taluni trovino maliziose le mie parole, non è così, sono semplicemente sincere.
Mi spiace che ti sia sentita offesa, non era mia intenzione.
Buona serata a tutti/e

[ale500]

vedi se ti può essere d'aiuto.....e ricorda tentar non nuoce, il fumo si!!!!!

In questo esempio viene visualizzata la finestra di dialogo Carattere e gli attributi del carattere di una casella di testo vengono impostati in base alle selezioni dell'utente:

Private Sub Command1_Click()
    ' Imposta CancelError su True.
    CommonDialog1.CancelError = True
    On Error GoTo ErrHandler
    ' Imposta la proprietà Flags.
    CommonDialog1.Flags = cdlCFEffects Or cdlCFBoth
    ' Visualizza la finestra di dialogo Carattere.
    CommonDialog1.ShowFont
    Text1.Font.Name = CommonDialog1.FontName
    Text1.Font.Size = CommonDialog1.FontSize
    Text1.Font.Bold = CommonDialog1.FontBold
    Text1.Font.Italic = CommonDialog1.FontItalic
    Text1.Font.Underline = CommonDialog1.FontUnderline
    Text1.FontStrikethru = CommonDialog1.FontStrikethru
    Text1.ForeColor = CommonDialog1.Color
    Exit Sub
ErrHandler:
    ' L'utente ha scelto il pulsante Annulla.
    Exit Sub
End Sub 

[emerson74]

.....infinite Ale500, funziona perfettamente