"EhLib.Com" https://forum.ehlib.com/ru/ |
|
Чекиты без значений https://forum.ehlib.com/ru/viewtopic.php?f=4&t=3080 |
Страница 1 из 1 |
Автор: | orange [ 18 фев 2021, 06:54 ] | ||
Заголовок сообщения: | Чекиты без значений | ||
Есть столбец с булевыми значениями в строках в которых нет никакого значения отображается серый не активный чекит можно его вообще не отображать чтобы была пустая ячейка?
|
Автор: | EhLibSupport [ 26 фев 2021, 12:53 ] |
Заголовок сообщения: | Re: Чекиты без значений |
Добрый день. Для отображения пустой ячейки можно использовать событие TColumnEh.OnAdvDrawDataCell следующим образом. Код: type
TDBGridEhCrack = class(TDBGridEh); procedure TForm1.DBGridEh1Columns5AdvDrawDataCell(Sender: TCustomDBGridEh; Cell, AreaCell: TGridCoord; Column: TColumnEh; const ARect: TRect; var Params: TColCellParamsEh; var Processed: Boolean); begin if (Column.Field.IsNull) then begin //DBGridEh1.DefaultDrawColumnDataCell(Cell, AreaCell, Column, ARect, Params); DBGridEh1.DrawColumnDataCellBackground(Cell, AreaCell, Column, ARect, Params); TDBGridEhCrack(DBGridEh1).DrawCellDataBackground(Cell.X, Cell.Y, AreaCell.X, AreaCell.Y, Column, ARect, Params.State, dgRowSelect in DBGridEh1.Options); Processed := True; end; end; |
Страница 1 из 1 | Часовой пояс: UTC |
Powered by phpBB® Forum Software © phpBB Group http://www.phpbb.com/ |