Designing table for entering data

[wp]

Why are you using the OnSetEditText event? This is meant for passing data to/from the cell editor...

Simply set the alignment when you fill the cell texts, in any order:

Code: Pascal  [Select][+][-]

1. procedure TForm1.FormCreate(Sender: TObject);
2. begin
3.   sWorksheetGrid1.HorAlignment[1, 1] := haCenter;
4.   sWorksheetGrid1.Cells[1, 1] := 'centered';
5.  
6.   sWorksheetGrid1.Cells[2, 2] := 'centered';
7.   sWorksheetGrid1.HorAlignment[2, 2] := haCenter;
8. end;  

[amir.eng]

Why are you using the OnSetEditText event? This is meant for passing data to/from the cell editor...

Simply set the alignment when you fill the cell texts, in any order:

Code: Pascal  [Select][+][-]

1. procedure TForm1.FormCreate(Sender: TObject);
2. begin
3.   sWorksheetGrid1.HorAlignment[1, 1] := haCenter;
4.   sWorksheetGrid1.Cells[1, 1] := 'centered';
5.  
6.   sWorksheetGrid1.Cells[2, 2] := 'centered';
7.   sWorksheetGrid1.HorAlignment[2, 2] := haCenter;
8. end;  

Thanks, Is it possible to define a range of cells, like this :
sWorksheetGrid1.HorAlignment[A1:D10] := haCenter;

[wp]

Read https://wiki.lazarus.freepascal.org/TsWorksheetGrid#Cell_formatting, watch out for the plural versions of the format properties (HorAlignments instead of HorAlignment).