Главная страница
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.024 c
1-1101502027
leonidus
2004-11-26 23:47
2004.12.12
ToolBar`ы с изменяющимся в run-time набором кнопок


3-1100498357
Фазер
2004-11-15 08:59
2004.12.12
Приветствую всех! Вопрос по обработке except при коннекте в БД


6-1095392327
сигишник
2004-09-17 07:38
2004.12.12
CGI + IIS


14-1101266176
ИМХО
2004-11-24 06:16
2004.12.12
Динамо Киев - Рома Италия 2-0


3-1100174069
Layner
2004-11-11 14:54
2004.12.12
При вставке новой строки в DBGrid, при переходе на рядом