var
MyCol: TColumnEh;
begin
with DBGridEh_DWUser do
begin
Columns.Clear;
MyCol := Columns.Add;
MyCol.FieldName := 'USER_CODE';
MyCol.Title.Caption := '用户编码';
MyCol.Width := 120;
MyCol.ReadOnly := True; //只读
MyCol.Alignment := taCenter; //单元格中的内容对齐状态
MyCol.Layout := tlCenter;//单元格中的内容的布局