TStringGrid隐藏列时避免黑边问题
摘要:当要隐藏一列时,要么设置这列的宽度为0要么为1: 当为0的时候: 1 procedure TfrmServerTopLogisticsCompany.FormShow(Sender: TObject); 2 begin 3 {表格的宽度} 4 TopLogisticsCompanyShow_stg.
阅读全文
posted @
2012-10-18 21:31
del88
阅读(18)
推荐(0) 编辑
StringGrid cell中文字居中显示
摘要:在OnDrawCell中加入如下代码: procedure TForm1.Stringgrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);begin with Sender a
阅读全文
posted @
2011-12-29 10:47
del88
阅读(14)
推荐(0) 编辑
StringGrid指定某行列的背景和字体颜色
摘要:procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);vars: String;R: TRect;beginwith StringG
阅读全文
posted @
2011-12-29 10:46
del88
阅读(17)
推荐(0) 编辑
StringGrid的显示速度竟然比DBGrid显示速度快将近10倍
摘要:最近接了个小活让导入excel 发现和标题一样 程序 上传 上来了 DBGrid的 http://files.cnblogs.com/del88/%E5%AF%BC%E5%85%A5Excel_DBgrid%E5%81%9A%E5%AF%BC%E5%85%A5%E6%98%BE%E7%A4%BA.r
阅读全文
posted @
2011-12-21 16:58
del88
阅读(58)
推荐(0) 编辑
StringGrid Options 属性
摘要:本例运行效果图: 一般修改 TStringGrid 的 Options 直接在设计时选一下 True 或 False 就行了; 代码中可以像下面操作: StringGrid1.Options := [goFixedVertLine]; StringGrid1.Options := [goFixedV
阅读全文
posted @
2011-11-24 17:02
del88
阅读(28)
推荐(0) 编辑
StringGrid的按列取值、按行取值、按列赋值、按行赋值
摘要:须知: TStringGrid 的每行、每列都是一个 TStrings 对象. 本例功能: 1、分别按列与行修改; 2、分别按列与行读取 运行效果图: //本例代码: unit Unit1; interface uses Windows, Messages, SysUtils, Variants,
阅读全文
posted @
2011-11-24 10:10
del88
阅读(19)
推荐(0) 编辑