[VB6] Adattamento del testo a casella di testo

[giulio-g]

Salve a tutti!!
Avete qualche idea su come realizzare una casella di testo nella quale il testo al sua interno si adatti alle dimensioni della casella stessa?
Ad esempio , se in una casella di testo alta e stretta inserisco un testo lungo, questo viene visualizzato al suo interno schiacciato ed allungato....

[LMondi]

Ciao giulio-g,
non ho ben capito se vuoi adattare la sola larghezza (Width) del controllo Txt o anche l'altezza.
In ogni caso dovresti utilizzare le proprietà di una Label con AutoSize impostata su True, che si adatta al testo inserito, dopo passi le proprietà alla Txt. Ti posto un esempio:

Private Sub Command1_Click()
    Label1.AutoSize = True
    Label1.Caption = Text1.Text
        
    'Text1.Height = (Label1.Height)
    Text1.Width = (Label1.Width + 50)
    Text1.SelStart = 0
    Text1.Refresh
End Sub

[giulio-g]

Quello che non riesco a fare è adattare la larghezza/altezza del testo alle dimensioni della casella di testo.
Ecco perchè ho detto che se la casella di testo è piccola, il testo al suo interno deve comparire "pressato"....

[MItaly]

Non si può fare con i controlli nativi di VB (e quindi di Windows); devi scrivere qualcosa tu, magari creando un controllo personalizzato e un po' di API GDI.

[giulio-g]

Bene, almeno so che non si può fare...mi potresti indicare dove è possibile trovale della documentazione o degli esempi?
API GDI?
Grazie mille!!!

[MItaly]

Platform SDK