张志峰的博客

水滴石川,积少成多。

导航

2012年1月6日

摘要: 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;//单元格中的内容的 阅读全文

posted @ 2012-01-06 13:31 ╰★张志峰★╮ 阅读(2769) 评论(0) 推荐(0) 编辑

摘要: OptionsEh =dghExtendVertLines 就会有这个效果, 去掉就会没有这个效果 阅读全文

posted @ 2012-01-06 12:18 ╰★张志峰★╮ 阅读(1067) 评论(3) 推荐(0) 编辑