Форум: "Основная";
Текущий архив: 2004.02.13;
Скачать: [xml.tar.bz2];
ВнизВыделение строки в RxDBGrid другим цветом Найти похожие ветки
← →
СержК (2004-02-04 09:50) [0]У важаемые мастера, подскажите можно-ли в RxDBGrid выделить строку другим цветом. Если можно, то как это сделать?
← →
Ega23 (2004-02-04 09:51) [1]метод OnGetCellParams
← →
СержК (2004-02-04 09:54) [2]Я не особый в этом спец. Если можно по-подробней.
← →
Ega23 (2004-02-04 09:56) [3]
procedure TFMain.rxgCardsGetCellParams(Sender: TObject; Field: TField;
AFont: TFont; var Background: TColor; Highlight: Boolean);
var
clr:Integer;
begin
clr:=AFont.Color;
if Field.FieldName="CardTypNam" then
begin
if (DMpas.RQAllCards.FieldByName("CardTypCl").AsInteger=0) then AFont.Color:=clr
else AFont.Color:=DMpas.RQAllCards.FieldByName("CardTypCl").AsInteger;
end;
if Field.FieldName="CardStatNam" then
begin
if (DMpas.RQAllCards.FieldByName("CardStatCl").AsInteger=0) then AFont.Color:=clr
else AFont.Color:=DMpas.RQAllCards.FieldByName("CardStatCl").AsInteger;
end;
if (Highlight) or (Background=clHighlight) then AFont.Color:=clWhite;
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.02.13;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.011 c