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

Вниз

DBGrid - цветные строки   Найти похожие ветки 

 
aglar   (2004-12-19 14:31) [0]

Можно ли сделать так, что при значении поля в таблице "Payed" = true, эта запись выделялась бы отдельным цветом в DBGrid?


 
Алхимик ©   (2004-12-19 14:39) [1]

Можно.


 
aglar   (2004-12-19 14:59) [2]

Обхохотался. Как?


 
sniknik ©   (2004-12-19 16:16) [3]

зря, это довольно распространено, ответ именно на заданный вопрос
http://delphimaster.net/view/3-1103416263/

> Как?
в событии onDrawDataCell рисовать самому в "отдельном" свете, например.


 
sniknik ©   (2004-12-19 16:19) [4]

хотя нет, ведь "запись", удобнее в onDrawColumnCell.


 
dma   (2004-12-19 20:26) [5]

Держи кусок из одного проекта, корявый, но суть я думаю поймешь:
procedure TMainForm.MainGridGetCellParams(Sender: TObject; Field: TField;
 AFont: TFont; var Background: TColor; Highlight: Boolean);
 var Zakl, PrZakl : String;
begin
 Zakl:=(Sender as TrxDBGrid).DataSource.DataSet.FieldByName("TipZakl").AsString;
 PrZakl:=(Sender as TrxDBGrid).DataSource.DataSet.FieldByName("PrZakl").AsString;
 (Sender as TrxDBGrid).DataSource.DataSet.FieldByName("PrZakl").AsString;
 if PrZakl="На доработку" then AFont.Color := clRed;
 if PrZakl="Отрицательное" then AFont.Color := clBlue;

 if Zakl="Отрицательное" then AFont.Color := clMaroon;
 if Zakl="Положительное" then AFont.Color := clTeal;
 if Zakl="Положительное с мероприятиями" then AFont.Color := clGray;
 if Highlight then begin
   AFont.Color := clHighlightText;
   Background := clHighlight;
 end;
end;


 
sniknik ©   (2004-12-19 20:59) [6]

насколько понимаю это для RxDBGrid в DBGrid нету, зря только искать будеш (вместо смеха будет обыскался...).

dma   (19.12.04 20:26) [5]
код корявый ладно, но ответ еще "корявей".

вот кстати пример ответа на то о чем не спрашивали...


 
aglar   (2004-12-23 20:26) [7]

Кривой код было единственное, что решило задачу, спасибо.

Sniknik
Я последовал по ссылке, удивился знанию правильной русской речи и способности некоторых програмистов проникать в умы задающих вопросы...


 
sniknik ©   (2004-12-24 07:58) [8]

решило и решило, поздравляю. а че так долго? 4 дня в DBGrid-е событие onCellParams искал? ;о))

про русскую речь это отдельная песня... есть такие поборники ее, что не считают нужным общатся если у опонента запятая не на месте... я к этому помягче отношусь, много неруских, а опечатку так любой даже литературавед сделать может... единственное коробят некоторые выражения "по фене", от некоторых, на которой как они думают программисты разговаривают.



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

Форум: "Базы";
Текущий архив: 2005.01.30;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.035 c
1-1105784757
Separator
2005-01-15 13:25
2005.01.30
Автодозвон


14-1104219850
Satur
2004-12-28 10:44
2005.01.30
Что это за новый оператор в Украине рекламируют?


3-1103965097
Russko
2004-12-25 11:58
2005.01.30
Проблема с кирилицей


10-1082450797
Gauss
2004-04-20 12:46
2005.01.30
Не могу создать ком объект


14-1105516116
Anonimus
2005-01-12 10:48
2005.01.30
Windows XP home





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский