[TEXTBOX]Proprieta'

[Toeke]

Ho la necessita' di rendere modificabile una Textbox solo mediante il doppioclik sulla stassa.
Ho provato con la proprieta locked ed enable, ma entrambe nn mi clikkabile la text.
E' giovedi e domani e' l'ultima mezza giornata prima delle ferie, nessuno sa aiutarmi cosi vo' a casa contenta?




Toe

[xegallo]

credo che l'unica soluzione sia il subclassing sulla form in questione intercettando le coordinate e gli eventi mouse sulla form nell'area dove si trova la text

[Full79]

' dichiari una variabile Globale
Dim var1 As Boolean

' quando clicchi sulla text cambia valore alla variabile
Private Sub Text1_DblClick()
If (var1 = False) Then
var1 = True
Text1 = ""
Else
var1 = False
End If
End Sub

' se la variabile = true non permette di scrivere
Private Sub Text1_Change()
If var1 = True Then
Text1 = ""
End If
End Sub

L'ho testato, dovrebbe funzionare...

[optime]

Originariamente inviato da xegallo
credo che l'unica soluzione sia il subclassing sulla form in questione intercettando le coordinate e gli eventi mouse sulla form nell'area dove si trova la text

quando una lavora all'UCAS... :gren:

a design-time metti la proprieta' locked a true, poi:

se vuoi che il doppio click abiliti e disabiliti

Private Sub Text1_DblClick()
   Text1.Locked = Not (Text1.Locked)
End Sub

se invece vuoi solo abilitare

Private Sub Text1_DblClick()
   Text1.Locked = False
End Sub

[xegallo]

Originariamente inviato da xegallo
credo che l'unica soluzione sia il subclassing sulla form in questione intercettando le coordinate e gli eventi mouse sulla form nell'area dove si trova la text

mmh già si poteva farla decisamente + semplice