Главная страница
    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.101 c
1-1105701874
Axeman
2005-01-14 14:24
2005.01.30
Как закрыть???


1-1106181479
Алексей
2005-01-20 03:37
2005.01.30
Как удалять объекты, связаные с TTreeNode.Data


14-1105364312
vecna
2005-01-10 16:38
2005.01.30
как перевести


1-1106062824
Dracula
2005-01-18 18:40
2005.01.30
перехват ошибок


4-1102869574
Evgeny2004
2004-12-12 19:39
2005.01.30
WinAPI





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