diff --git a/lcl/grids.pas b/lcl/grids.pas index 0b1818b31d..c02646941d 100644 --- a/lcl/grids.pas +++ b/lcl/grids.pas @@ -7087,6 +7087,7 @@ end; procedure TCustomGrid.DoEditorShow; var ParentChanged: Boolean; + Column: TGridColumn; begin {$ifdef dbgGrid}DebugLnEnter('grid.DoEditorShow [',Editor.ClassName,'] INIT');{$endif} ScrollToCell(FCol,FRow, True); @@ -7103,8 +7104,9 @@ begin Editor.Parent:=Self; if (FEditor = FStringEditor) or (FEditor = FButtonStringEditor) then begin - if FCol-FFixedColsnil then + FStringEditor.Alignment:=Column.Alignment else FStringEditor.Alignment:=taLeftJustify; end;