Centrare il testo nell'header di una GridView: differenze tra le versioni

Da Gambas-it.org - Wikipedia.
Vai alla navigazione Vai alla ricerca
Nessun oggetto della modifica
Nessun oggetto della modifica
 
(5 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
Uno dei problemi ricorrenti, affrontando le ''GridView'', è la gestione dell'allineamento del testo all'interno delle celle dell'Header.
Uno dei problemi ricorrenti, affrontando le ''GridView'', è la gestione dell'allineamento del testo all'interno delle celle dell'Header.
<BR>Per gestire l'allineamento del testo, per esempio per centrarlo, sarà sufficiente, dopo aver richiamato e definito l'Header in ''GridView'', stabilire quale colonna sarà interessata dalla impostazione dell'allineamento nella sua cella dell'Header.
<BR>Per gestire l'allineamento del testo, per esempio per centrarlo, sarà sufficiente, dopo aver richiamato e definito l'Header in ''GridView'', stabilire <U>quale colonna</u> sarà interessata dalla impostazione dell'allineamento nella sua cella dell'Header.


Ecco la soluzione:
Ecco la soluzione:
  '''Public''' Sub Form_Open()
  Public Sub Form_Open()
  Dim Gridview1 As GridView
  With Me
    .W = 450
    .H = 400
    .Padding = 5
    .Arrangement = Arrange.Fill
  End With
    
    
   With GridView1
   With GridView1 = New GridView(Me)
     .Columns.Count = 3                      <FONT color=gray>' ''La GridView avrà tre Colonne''</font>
     .Columns.Count = 3                      <FONT color=gray>' ''La GridView avrà tre Colonne''</font>
     .Rows.Count = 3                          <FONT color=gray>' ''La GridView avrà tre Righe''</font>
     .Rows.Count = 3                          <FONT color=gray>' ''La GridView avrà tre Righe''</font>
     .Header = GridView1.Horizontal          <FONT color=gray>' ''Richiama ed imposta l'header orizzontale''</font>
     .Header = GridView1.Horizontal          <FONT color=gray>' ''Richiama ed imposta l'header orizzontale''</font>
     .Columns[0].Alignment = Align.Center    <FONT color=gray>' ''Imposta l'allineamento del testo nell'header in modo "centrato"''</font>
     .Columns[0].Title = "centro"             <FONT color=gray>' ''Va a posizionarsi nella cella dell'header''</font>
    .Columns[0].W = 150
     .Columns[1].Alignment = Align.Right     <FONT color=gray>' ''Qui invece imposta il testo a destra''</font>
     <FONT Color=red>.Columns[0].Alignment = Align.'''Center'''</font>     <FONT color=gray>' ''Imposta l'allineamento del testo nell'header in modo "'''centrato'''"''</font>
     .Columns[1].Text = "destra"             <FONT color=gray>' ''Va bene anche .Text al posto di .Title''</font>
     .Columns[0].Title = "centro"
<FONT color=gray>' ''Mostra anche gli allineamenti a "sinistra" e a "destra":''</font>
     .Columns[1].W = 150
    .Columns[2].Alignment = Align.Leftt     <FONT color=gray>' ''Qui invece imposta il testo nell'header a "sinistra"''</font>
     .Columns[1].Text = "sinistra"
    .Columns[2].W = 150
    .Columns[2].Alignment = Align.Right      <FONT color=gray>' ''Qui invece imposta il testo nell'header a "destra"''</font>
    .Columns[2].Text = "destra"
   End With
   End With
    
    
  '''End'''
  End

Versione attuale delle 18:41, 31 ago 2025

Uno dei problemi ricorrenti, affrontando le GridView, è la gestione dell'allineamento del testo all'interno delle celle dell'Header.
Per gestire l'allineamento del testo, per esempio per centrarlo, sarà sufficiente, dopo aver richiamato e definito l'Header in GridView, stabilire quale colonna sarà interessata dalla impostazione dell'allineamento nella sua cella dell'Header.

Ecco la soluzione:

Public Sub Form_Open()

 Dim Gridview1 As GridView

 With Me
   .W = 450
   .H = 400
   .Padding = 5
   .Arrangement = Arrange.Fill
 End With
 
 With GridView1 = New GridView(Me)
   .Columns.Count = 3                       ' La GridView avrà tre Colonne
   .Rows.Count = 3                          ' La GridView avrà tre Righe
   .Header = GridView1.Horizontal           ' Richiama ed imposta l'header orizzontale

   .Columns[0].W = 150
   .Columns[0].Alignment = Align.Center     ' Imposta l'allineamento del testo nell'header in modo "centrato"
   .Columns[0].Title = "centro"


' Mostra anche gli allineamenti a "sinistra" e a "destra":
   .Columns[1].W = 150
   .Columns[2].Alignment = Align.Leftt      ' Qui invece imposta il testo nell'header a "sinistra"
   .Columns[1].Text = "sinistra"

   .Columns[2].W = 150
   .Columns[2].Alignment = Align.Right      ' Qui invece imposta il testo nell'header a "destra"
   .Columns[2].Text = "destra"
 End With
 
End