Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.01.30;
Скачать: CL | DM;

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.049 c
1-1105772635
Шишкин Илья
2005-01-15 10:03
2005.01.30
TShellListView


1-1105791544
Sicilla
2005-01-15 15:19
2005.01.30
Память


14-1105282639
DillerXX
2005-01-09 17:57
2005.01.30
У кого есть Rambler телесеть (это по ящику канал вместо культуры)


1-1106179977
_Дельфин_
2005-01-20 03:12
2005.01.30
String и Char


6-1100015933
MIchael
2004-11-09 18:58
2005.01.30
Получение списка пользователей