![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
EHlib [D7, dBase, FoxPro, Paradox]
Ag2002 © (2003-01-10 18:28:00)Помогите пожалуйста, как правильно сделать так чтобы в футаре таблицы DBGridEh при отрицательных значениях цвет шрифта был красный,как правельно оброботать OnGetFotterParams ?
я делаю так:
with DBGridEh2.Canvas do
begin
if (Column.Field.DataType=ftFloat)or(Column.Field.DataType=ftCurrency) then
if (column.Field.AsFloat<0)or(column.Field.AsCurrency<0)
then Font.Color := clred
else Font.Color := 0;}
if Column.Field.DataType=ftString then
TextOut(rect.Left+2,rect.Top+2,Column.Field.Text)
else DBGridEh2.DefaultDrawColumnCell(rect,datacol,column,state);
end
else DBGridEh2.DefaultDrawColumnCell(rect,datacol,column,state);
end;
Но красное становится только если я в колонке встану на отрицательное значение
TTCustomDelphiMaster (2003-01-14 18:08:00) [1]В отдельном запросе определяй минимальные значения в полях таблицы. Исходя из этих значений меняй цвет.
Ag2002 (2003-01-14 16:31:00) [2]Да но если так сделать происходит тоже самое в ФУТАРЕ таблице всё равно если в колонке есть хотябы одно положительное значение цвет становится чёрным (хотя само значение отрицательное)
TTCustomDelphiMaster (2003-01-10 19:00:00) [3]Убрать with DBGridEh2.Canvas do
Font заменить на AFont