Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как изменить цвет в TDBCtrlGrid? / 5 сообщений из 5, страница 1 из 1
10.11.2003, 16:44
    #32319182
Dnico
Dnico
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменить цвет в TDBCtrlGrid?
Здраствуйте!

У меня вот какая возникла проблема. Есть DBCtrlGrid.
На его панели установлены несколько контролов (DBEdit,DBText).
Хотелось бы изменять цвет шрифта DBText в зависимости от значения поля TYPES.
Сначала было все просто - использовал DBCheckBox, но теперь поле имеет несколько значений. Вот такая беда ...


Best regards,
Dnico.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.11.2003, 12:03
    #32322708
Dnico
Dnico
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменить цвет в TDBCtrlGrid?
Как я понял - никто с такой проблемой не сталкивался ... жалко ... :(

Best regards,
Dnico.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.11.2003, 12:25
    #32322775
Sclif
Sclif
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменить цвет в TDBCtrlGrid?
Рисуй на канвасе, проверенный способ ;)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.11.2003, 12:53
    #32322836
Sclif
Sclif
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменить цвет в TDBCtrlGrid?
RxDBGrid можно раскрашивать внахаляву еще. OnGetCellParam перегрузить, и задать там всякие TextColor, BackgroundColor (они передаются как параметры) по условию что поле содержит значение какое то или просто Selected.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.11.2003, 12:55
    #32322841
Dnico
Dnico
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменить цвет в TDBCtrlGrid?
Sclif
Слишком через одно место получается.

Вообщем-то решил полазить по юниту этому и вот что в итоге получилось:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
procedure TForm1.DBCtrlGrid1PaintPanel(DBCtrlGrid: TDBCtrlGrid;
  Index: Integer);
begin
  if DBCtrlGrid.DataSource.DataSet.FieldByName('TYPES').AsInteger =  0  then
    DBText1.Font.Color := clBlack
  else
    DBText1.Font.Color := clRed;
end;


Best regards,
Dnico.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как изменить цвет в TDBCtrlGrid? / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]