Форум: "Потрепаться";
Текущий архив: 2003.06.02;
Скачать: [xml.tar.bz2];

Вниз

CheckBox в DBGrid   Найти похожие ветки 

← →
Yakudza   (2003-05-14 14:52) [0]

Как-то можно вставить CheckBox в DBGrid ?

---

← →
clickmaker   (2003-05-14 14:57) [1]

1. Использовать готовый. Например, из EhLib (есть на torry.net)
2. Обрабатывать OnDrawColumnCell, рисовать примерно так:
if Column.Field.AsBoolean then
style := DFCS_CHECKED
else
style := DFCS_BUTTONCHECK;
DrawFrameControl(TBDGrid(Sender).Canvas.Handle, Rect, DFC_BUTTON, style or DFCS_FLAT);

---

← →
Hint   (2003-05-14 14:58) [2]

procedure TformColorGrid.DBGridDrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
Var Style : Integer;
Begin
IF { рисуется колонка, в которую мы хотим поместить TCheckBox }
Then IF { значение поля TRUE }
Then Style := DFCS_CHECKED
Else Style := DFCS_BUTTONCHECK;
End;

DrawFrameControl(TDBGrid(Sender).Canvas.Handle, Rect, DFC_BUTTON, Style);
End;
Функция DrawFrameControl рисует на канве в определенном прямоугольнике стандартный windows-control, тип и состояние которого определяется передаваемыми параметрами.
BOOL DrawFrameControl(

HDC hdc, // handle to device context
LPRECT lprc, // pointer to bounding rectangle
UINT uType, // frame-control type
UINT uState // frame-control state
);
Подробнее о том, что еще может рисовать эта функция, смотрите help по Windows API (или MSDN или win32.hlp в поставке Delphi) .
(c)Елена Филиппова

---

← →
p@s   (2003-05-15 07:29) [3]

А че вопрос то в потрепатся перенесли?

---

Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2003.06.02;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.007 c