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

Da Gambas-it.org - Wikipedia.
Vai alla navigazione Vai alla ricerca
(Creata pagina con "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 te...")
 
Nessun oggetto della modifica
 
(6 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 mostrata per Gambas 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 = New GridView(Me)
    .Columns.Count = 3                      <FONT color=gray>' ''La GridView avrà tre Colonne''</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>
    .Columns[0].W = 150
    <FONT Color=red>.Columns[0].Alignment = Align.'''Center'''</font>    <FONT color=gray>' ''Imposta l'allineamento del testo nell'header in modo "'''centrato'''"''</font>
    .Columns[0].Title = "centro"
   
   
  With GridView1
  <FONT color=gray>' ''Mostra anche gli allineamenti a "sinistra" e a "destra":''</font>
  .Columns.Count = 3
     .Columns[1].W = 150
  .Rows.Count = 3
    .Columns[2].Alignment = Align.Leftt     <FONT color=gray>' ''Qui invece imposta il testo nell'header a "sinistra"''</font>
  .Header = 1                              <FONT color=gray>' ''o anche "GridView.Horizontal": richiama ed imposta l'header orizzontale''</font>
    .Columns[1].Text = "sinistra"
  .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[1].Alignment = Align.Right     <FONT color=gray>' ''qui invece imposta il testo a destra''</font>
  .Columns[1].Text = "destra"             <FONT color=gray>' ''va bene anche .Text al posto di .Title''</font>
End With
   
   
'''End'''
    .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

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