Differenze tra le versioni di "Scrivere in un TextBox dalla posizione manualmente mutata del cursore"

Da Gambas-it.org - Wikipedia.
(Creata pagina con "Di regola, dopo aver scritto un testo all'interno di un ''TextBox'', se si sposta manualmente (con il mouse o con i tasti freccia a destra e a sinistra) il cursore nel ''TextB...")
 
 
Riga 1: Riga 1:
 
Di regola, dopo aver scritto un testo all'interno di un ''TextBox'', se si sposta manualmente (con il mouse o con i tasti freccia a destra e a sinistra) il cursore nel ''TextBox'' e si continua a scrivere, il primo carattere verrà scritto nella nuova posizione impostata manualmente, ma il secondo e gli ventuali successivi caratteri si potranno scrivere solo alla fine del testo, poiché il cursore si sarà spostato automaticamente alla fine del testo presente nel ''TextBox''.
 
Di regola, dopo aver scritto un testo all'interno di un ''TextBox'', se si sposta manualmente (con il mouse o con i tasti freccia a destra e a sinistra) il cursore nel ''TextBox'' e si continua a scrivere, il primo carattere verrà scritto nella nuova posizione impostata manualmente, ma il secondo e gli ventuali successivi caratteri si potranno scrivere solo alla fine del testo, poiché il cursore si sarà spostato automaticamente alla fine del testo presente nel ''TextBox''.
  
Per far sì, invece, che dopo lo spostamentpo manualmente del cursore nel ''TextBox'', si possa continuare a scrivere ''dalla'' nuova posizione, ossia quella ove è stato spostato manualmente il cursore del ''TextBox'', si adotterà il seguente codice: <SUP>&#091;[[#Note|Nota 1]]&#093;</sup>
+
Per far sì, invece, che dopo lo spostamentpo manualmente del cursore nel ''TextBox'', si possa continuare a scrivere ''dalla'' nuova posizione, ossia quella ove è stato spostato manualmente il cursore del ''TextBox'', si adotterà il seguente codice: <SUP>&#091;[[#Note|nota 1]]&#093;</sup>
  '''Public''' Sub TextBox1_Change()
+
  Public Sub TextBox1_Change()
 
    
 
    
  Dim iPs As Integer
+
  Dim iPs As Integer
 
    
 
    
 
   iPs = TextBox1.Pos
 
   iPs = TextBox1.Pos
Riga 12: Riga 12:
 
   TextBox1.Pos = iPs
 
   TextBox1.Pos = iPs
 
    
 
    
  '''End'''
+
  End
  
  

Versione attuale delle 15:56, 1 lug 2024

Di regola, dopo aver scritto un testo all'interno di un TextBox, se si sposta manualmente (con il mouse o con i tasti freccia a destra e a sinistra) il cursore nel TextBox e si continua a scrivere, il primo carattere verrà scritto nella nuova posizione impostata manualmente, ma il secondo e gli ventuali successivi caratteri si potranno scrivere solo alla fine del testo, poiché il cursore si sarà spostato automaticamente alla fine del testo presente nel TextBox.

Per far sì, invece, che dopo lo spostamentpo manualmente del cursore nel TextBox, si possa continuare a scrivere dalla nuova posizione, ossia quella ove è stato spostato manualmente il cursore del TextBox, si adotterà il seguente codice: [nota 1]

Public Sub TextBox1_Change()
 
  Dim iPs As Integer
 
  iPs = TextBox1.Pos
  
  TextBox1.text = Upper(TextBox1.Text)
  
  TextBox1.Pos = iPs
  
End


Note

[1] Il codice è stato suggerito dal membro tornu del forum gambas-it.org