我想你说的是不是先查询出后,再用不同的颜色来显示所需要的数据吧》
如果是这样下面就行:
DBGrid控件是一个有许多用户接口的显示数据库的控件,以下的程序告诉您如何根据显示的内容改变字体的显示颜色。例如,如果一个城市的人口大于200万,我们就让它显示为蓝色。使用的控件事件为DBGrid.OnDrawColumeCell.procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect:TRect;DataCol: Integer; Column: TColumn; State: TGridDrawState);beginif Table1.FieldByName('Population').AsInteger > 20000000 thenDBGrid1.Canvas.Font.Color := clBlue;DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);end;
如果是这样下面就行:
DBGrid控件是一个有许多用户接口的显示数据库的控件,以下的程序告诉您如何根据显示的内容改变字体的显示颜色。例如,如果一个城市的人口大于200万,我们就让它显示为蓝色。使用的控件事件为DBGrid.OnDrawColumeCell.procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect:TRect;DataCol: Integer; Column: TColumn; State: TGridDrawState);beginif Table1.FieldByName('Population').AsInteger > 20000000 thenDBGrid1.Canvas.Font.Color := clBlue;DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);end;
解决方案 »
- 类的提前声明是什么
- 多线程调用时报"abstract error"!
- 关于参数传递的问题
- 关于控件的wndpro方法的用法:我的想法是“如何用wndproc来屏蔽掉Form上TreeView控件的WM_MOUSEMOVE等全部鼠标消息”
- 求win2000自动关机和重启的代码!
- 一个机房记费管理的软件—(100分)
- 请教两个问题,专家请进!
- 如何用fastreport或者QuickReport实现在一张纸上并排打印两张表,这两张表又是不同的数据源?很急
- 有关在程序中远程拨号联接的代码
- 请问这段SQL代码错在什么地方呢?请指教,谢谢!
- 关于internet的小问题,请高手指点!!!谢谢!!!
- 有没有好的代码排版软件可下载
第一次查询时,SQL为查询语句,后面查询动态使用UPDATE语
句,至于变色,我不知道该怎么实现
begin
if i then
begin
sql.clear;
sql.add('select name from table_name');
sql.add('where name =:name');
execsql;
end else begin
sql.clear;
sql.add('update table_name set name=:name');
execsql;
end
end;
i是全局布尔型变量,为true则是第一次查询
对不对,我不清楚啊!:)