Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.12;
Скачать: CL | DM;

Вниз

DBGrid. Отображение данных в полях   Найти похожие ветки 

 
Death ©   (2004-11-15 11:28) [0]

Есть БД (файл DBF). Есть в нем поле, тип-Logical.
Таблица DBGrid это поле отображает как false или true.
Как сделать чтобы в таблице это поле отображалось в виде птички в квадратике?


 
Соловьев ©   (2004-11-15 11:37) [1]

http://www.delphikingdom.ru/asp/viewitem.asp?catalogid=168


 
Vlad ©   (2004-11-15 11:51) [2]


> птички в квадратике

хм... не сразу понял что имелся ввиду CheckBox :-)
вот небольшой примерчик:

procedure DrawGridCheckBox(Canvas: TCanvas; Rect: TRect; Checked: boolean);
var
 DrawFlags: Integer;
 tmpRect: TRect;
begin
 tmpRect := Rect;
 InflateRect(tmpRect, -2, -2);
 Canvas.FillRect(Rect);
 DrawFrameControl(Canvas.Handle, Rect, DFC_BUTTON, DFCS_BUTTONPUSH or DFCS_ADJUSTRECT);
 DrawFlags := DFCS_BUTTONCHECK or DFCS_ADJUSTRECT;// DFCS_BUTTONCHECK
 if Checked then
   DrawFlags := DrawFlags or DFCS_CHECKED;
 DrawFrameControl(Canvas.Handle, tmpRect, DFC_BUTTON, DrawFlags);
end;

Вызывать в событии грида OnDrawColumnCell



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

Текущий архив: 2004.12.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.028 c
14-1100852166
msguns
2004-11-19 11:16
2004.12.12
"Потрепанный орешник"


1-1101084247
Кто---то
2004-11-22 03:44
2004.12.12
Почему не срабатывает OnClick, когда кликаем по заголовку столбца


1-1101888171
cvg
2004-12-01 11:02
2004.12.12
Помогите разобраться с порядком выполнения проги. pls!


1-1101502027
leonidus
2004-11-26 23:47
2004.12.12
ToolBar`ы с изменяющимся в run-time набором кнопок


14-1101183994
VMcL
2004-11-23 07:26
2004.12.12
Tech. support