delphi7代码颜色（delphi 颜色值）

本篇文章给大家谈谈delphi7代码颜色，以及delphi 颜色值对应的知识点，希望对各位有所帮助，不要忘了收藏本站喔。

本文目录一览：

• 1、delphi7 dbgrideh表格 表头改变颜色怎么弄
• 2、delphi7 怎么改stringgrid 单元格背景颜色
• 3、delphi7怎么设置一个有颜色属性的按钮控件
• 4、delphi7 点button改变dbgrid选中行的字体颜色
• 5、delphi7 怎样设置代码窗口颜色

delphi7 dbgrideh表格 表头改变颜色怎么弄

dbgrideh 表格的表头颜色设置，需要修改 FixedColor 属性，建议试试在代码或是面板属性里修改 FixedColor 属性为合适的颜色值。

delphi7 怎么改stringgrid 单元格背景颜色

procedure TForm1.FormShow(Sender: TObject);

var I,K:integer;

begin

//这里是给Stringgrid赋值,你那里得改成从Adoquery.fields中循环取值赋上了

for I:=0 to 3 do

for K:=0 to 5 do

Stringgrid1.Cells[I,K]:=inttostr(I)+inttostr(K);

end;

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;

Rect: TRect; State: TGridDrawState);

begin

//这里是判断当前单元格的值,并修改颜色,你那里都没有对Stringgrild赋值.Adoquery中的值是不会自动到Stringgrid中去的.

//另外,你判断也不应该拿Adoquery中的值来判断,其实这个方法StringGrid1DrawCell并不是执行一次,是执行多次,Stringgrid 有多少个Cells这个事件就执行多少次,所以我们只要判断当前Cells值并给上不同颜色即可.

if Stringgrid1.Cells[Acol,ARow]'00' then

begin

StringGrid1.Canvas.Font.Color := clred; //字体颜色为红的

StringGrid1.Canvas.Brush.color:=clMoneyGreen; //背景为 美元绿色

StringGrid1.Canvas.FillRect(Rect);

StringGrid1.Canvas.TextOut(Rect.Left+2,Rect.Top+2,StringGrid1.Cells[acol,ARow]);

end;

end;

delphi7怎么设置一个有颜色属性的按钮控件

TButton可以设置颜色

在TButton 的属性TintColor属性可以手动设置按钮颜色，也可以通过代码来设置颜色

button1.TintColor := TApachColorec.Red

delphi7 点button改变dbgrid选中行的字体颜色

操作步骤如下：

1、选择DBGrid，并双击进行事件OnDrawDataCell进行代码编辑；

2、输入代码如下：

if (qyDetail.FieldByName('field1').AsCurrency 0) or

(qyDetail.FieldByName('field2').AsCurrency 0) then //符合条件的字段

begin

ABrush.Color := clred ; //字体颜色，当前设置为红色

end;

3、编译后查看效果即可。

delphi7 怎样设置代码窗口颜色

你这里的代码窗口颜色：tools-----editoroptions-color 选择自己喜欢的

delphi7代码颜色的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于delphi 颜色值、delphi7代码颜色的信息别忘了在本站进行查找喔。