数据显示问题 各位同门高手:请问delphi怎样能将数据以不同的字体显示,就是说用什么控件将不同字体表示出来显示在一列中? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 设置Font不就可以了 ,是不是 ? 姓名 性别 备注 me .. .. you ... ... зув .. .. цц .. .. 就是这样的显示数据,第三行和第四行是俄文,第一行和第二行是英文。 对每个Column设置Font不可以 ? 设置每行Font可以在 DrawColumnCell 事件中写 如, 数量 <0 的用红色显示 procedure TForm1.DBGridEh1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumnEh; State: TGridDrawState);begin if QueryName.FieldByName('FieldNameString').AsFloat < 0 then DBGridEh1.Canvas.Font.Color := clRed; DBGridEh1.DefaultDrawColumnCell(Rect, Datacol, Column, State);end; 请问,如何限制ComboBox 不能编辑? Delphi7怎样连接到SQL2000? 高手们,帮帮忙!!!马上结贴 用ado连接sybase数据库 如何用代码模拟鼠标点击某按钮的Click动作? 关于quickrep报表设计的问题! 如何实现一表的行列转换--在线等待 密码问题 请问Delphi 5.0 试用版的注册码是什么?(我是从新浪下载的!) delphi的OCX能调用 asp.net的web服务吗? 这个insert into 语句这么写不行吗?急 不用存储过程,怎样用在前台用ADOquery内嵌的SQL语句实现以下功能?
me .. ..
you ... ...
зув .. ..
цц .. ..
就是这样的显示数据,第三行和第四行是俄文,第一行和第二行是英文。
const Rect: TRect; DataCol: Integer; Column: TColumnEh;
State: TGridDrawState);
begin
if QueryName.FieldByName('FieldNameString').AsFloat < 0 then
DBGridEh1.Canvas.Font.Color := clRed;
DBGridEh1.DefaultDrawColumnCell(Rect, Datacol, Column, State);
end;