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

Вниз

Разноцветные строки в DBCtrlGrid   Найти похожие ветки 

 
Helen   (2006-02-21 10:36) [0]

Добрый день. Подскажите, пожалуйста, как изменить цвет строки в DBCtrlGrid в зависимости от значения поля.


 
Amoeba ©   (2006-02-21 10:45) [1]

В DBCtrlGrid строк нет.


 
Helen   (2006-02-21 10:49) [2]

Извините, панели, соответствующие строке из таблице


 
Spieler   (2006-02-21 10:52) [3]

Че-то вроде такого:
Событие OnDrawColumnCell
procedure TForm1.DBGridDrawColumnCell(Sender: TObject;
 const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
 DrawColor: TColor;
begin
 if not Table.Fields.Fields[0].AsBoolean then DrawColor:= clTeal
 else DrawColor:= Column.Color;
 if (Column.Color <> DBGrid.Color) then DrawColor:= DrawColor and Column.Color;
 DrawGridColumn(DBGrid, Rect, Column, DataCol, State, DrawColor);
end;


 
Spieler   (2006-02-21 10:54) [4]

ой!!! это в TDBGrid... простите


 
Helen   (2006-02-21 11:00) [5]

На панелях таблицы лежат компоненты DBText, может быть можно изменить их цвет?


 
Sergey13 ©   (2006-02-21 11:06) [6]

OnPaintPanel event (TDBCtrlGrid) - не то?


 
Lexer ©   (2006-02-21 11:09) [7]

Разрисовку грида уже давно бы пора в FAQ занести...


 
Helen   (2006-02-21 11:18) [8]

>>OnPaintPanel event (TDBCtrlGrid) - не то?

Может быть и то, но мне что-то не понятно как?



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

Форум: "Начинающим";
Текущий архив: 2006.03.12;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.011 c
6-1132763970
Дмитрий_05
2005-11-23 19:39
2006.03.12
Ошибка при отправке ServerSocket-ом ClientSocket-у


15-1139842073
Хинт
2006-02-13 17:47
2006.03.12
Программа для сравнения файлов


15-1139936618
API
2006-02-14 20:03
2006.03.12
Гостья из будущего/2


15-1139936989
PARUS
2006-02-14 20:09
2006.03.12
Загрузка...


15-1139936340
DillerXX
2006-02-14 19:59
2006.03.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
Английский Французский Немецкий Итальянский Португальский Русский Испанский