Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2004.12.12;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.54 MB
Время: 0.05 c
3-1100178213
Мирон
2004-11-11 16:03
2004.12.12
Как в триггере BeforeInsert корректно отменить вставку строки


14-1101315640
Logs
2004-11-24 20:00
2004.12.12
Форум c phpbb.com


14-1101131287
sniknik
2004-11-22 16:48
2004.12.12
жизнеописания умученных сиадминов ;о))


14-1100879366
Ilya___
2004-11-19 18:49
2004.12.12
У меня есть строковое значение 3294567000 Мне нужно его перевест


3-1100185653
gedd
2004-11-11 18:07
2004.12.12
Поместить файл в базу данных





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский