delphi下要读取文件夹下的数据有不同的文件夹在网格中显示,文件类型是记录文件

 我来答
匿名用户
2011-05-06
展开全部
设置好你的dbgrid,显示数据后可做如下动作调节你的列宽:
1.双击dbgrid,出现一个编辑框:EDITING DBGRID1.COLUNMS
2.如果是空白的话,点击第三个图标: Add All Fields
3.选择需要设置的行,在它的属性栏,直接设置他了WINDTH值为你想要的.

dbgrid的option属性里有设置是否可编辑.

一些行的颜色修改,需要写代码:
下面的是数据库中kpsn字段为'NF1S660033AC0011'是改变颜色
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin

if oraquery1.FieldByName('kpsn').AsString='NF1S660033AC0011' then
begin
DbGrid1.Canvas.Brush.color:=clblack;
dbgrid1.Canvas.Font.Color:=clwhite;
end;

DbGrid1.Canvas.pen.mode:=pmmask;
dbgrid1.DefaultDrawColumnCell(rect,datacol,column,state);

end;

补充:
dbgrid的属性栏中有一个options属性,展开
有dgediting,dgrowselect..
dgediting就是控制是否可编辑的,rowselect是控制是否可选择全行的.
另外,虚机团上产品团购,超级便宜
百度网友10d405684
2011-04-26 · 超过13用户采纳过TA的回答
知道答主
回答量:100
采纳率:0%
帮助的人:42.3万
展开全部
不是很明白
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式