[RISOLTO] Problema TextBox.Select

[tornu]

Buonasera a tutti,
ho neccessità che nella routine TextBox1_MouseDown() venga selezionato
l'eventuale testo contenuto, questo il codice che stò testando:

Codice: [Seleziona]

' Gambas class file

Public Sub _new()

End

Public Sub Form_Open()

End

Public Sub TextBox1_MouseDown()
  TextBox1.Alignment = 1
'   TextBox1.SelectAll()  ' *** Non funziona ***
  TextBox1.Select(0, Len(TextBox1.Text))  ' *** Non funziona   ***
End

Public Sub TextBox1_KeyPress()
  Dim s As String

  s = TextBox1.Text

  Select Key.code
    Case Key.Enter, Key.Return
      TextBox1.Text = Left(s, TextBox1.Pos)
      TextBox1.Alignment = 2
  End Select
End

Public Sub TextBox1_Activate()
  TextBox2.Text = TextBox1.Text
End

Se non dico cavolate le due istruzioni (una commentata), che ho inserito,
dovrebbero sortire lo stesso effetto, ma alla prova pratica così non è, non
viene selezionato nessun testo.
Che c'è di sbagliato in quelle istruzioni?

[Gianluigi]

Forse non ho capito, ma hai provato a cambiare in MouseUp?

 

[tornu]

Forse non ho capito, ma hai provato a cambiare in MouseUp?

 

Ciao Gianluigi,
funziona perfettamente.
Per cercare di capirci sempre qualcosa in più, mi spieghi che caspita di differenza c'è ?
Grazie

[Gianluigi]

...
Per cercare di capirci sempre qualcosa in più, mi spieghi che caspita di differenza c'è ?

Ciao Tornu,
ti dico quello che io penso, credo sia dovuto al fatto che quando ci si inserisce, si toglie il focus.
Infatti se tu entri in una textbox  già selezionata vedi che appena ci clicchi (tasto mouse giù) il focus sparisce.
Penso serva per la posizione dell'inserimento altrimenti ci sarebbero dei problemi, per esempio cancelleresti tutta la frase e non solo la lettera dopo o prima il cursore ecc.
Insomma quello del clic è il comportamento di base e se lo si vuole forzare occorre lavorare sul ritorno (MouseUp).
... forse.
 

[vuott]

...hai provato a cambiare in MouseUp?

Effettivamente con l'evento MouseUp() l'effetto della selezione viene 'conservato'.

Se non c'è una qualche ragione speciale per dover usare l'evento _MouseDown(), credo che l'evento _MouseUp() possa andare bene, essendo analogo all'evento _Click() degli oggetti che lo supportano.   

[tornu]

Grazie, per le spiegazioni