Как в DBGrid изменить цвет выделения (select)

← →
bobtubob (2003-09-22 17:03) [0]

← →
MsGuns (2003-09-22 17:10) [1]

procedure TfrmOut.grOutProdDrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); var BkgColor: TColor; begin if gdSelected in State then OutRect := Rect; if not (gdSelected in State) then BkgColor := TDBGrid(Sender).Color else if TDBGrid(Sender).Focused then // Грид активен BkgColor := clActiveCaption // Синий для текущей строки else BkgColor := clMedGray; // Серый для текущей строки TDBGrid(Sender).Canvas.Brush.Color:=BkgColor; TDBGrid(Sender).DefaultDrawColumnCell(Rect,DataCol,Column,State); end;

← →
bobtubob (2003-09-23 10:04) [2]

Отрабатывают события только в двух случаях
-State =[gdSelected..Focused]
-State =[]
надо чтобы в трёх ато и в четырёх
-State =[gdSelected]
-State =[Focused]

← →
MsGuns (2003-09-23 12:41) [3]

Во-первых, если внимательно просмотреть код, то там анализируются 3 ситуации:
- грид не активен и строка текущая
- грид не активен и строка нетекущая
- грид активен и строка текущая
- грид активен и строка нетекущая

Во-вторых, тебе что, надо готовый код для твоей проги или подсказку где копать ? Если первое, то нет проблем - посылай на мыло условия задачи с указанием суммы, которую готов за это заплатить

← →
bobtubob (2003-09-24 12:53) [4]

чё ты кипешуеш
Спасибо за код!!!
Я конечно же в нём разобраля и всё зделал но я вёл разговор про то что вовремя выполнения программы у меня state принимал лиш два значения
-State =[gdSelected..Focused]
-State =[]
значения
-State =[gdSelected]
-State =[Focused]
state никогда не принимал
А за мысль спасибо - я чуть иначе переделал и всё заработало

← →
Alex_Raider (2003-09-24 12:58) [5]

Большими буквами нужно написать во всех конференциях по БД:

Прежде чем постить вопрос по гриду, следует учесть доступность бесплатного для русских разработчиков DBGridEH.

← →
MsGuns (2003-09-24 13:07) [6]

>Alex_Raider © (24.09.03 12:58) [5]
>Большими буквами нужно написать во всех конференциях по БД:
>Прежде чем постить вопрос по гриду, следует учесть доступность бесплатного для русских разработчиков DBGridEH.

А очень большими :
ПРЕЖДЕ ЧЕМ ИСКАТЬ И ВНЕДРЯТЬ НОВУЮ КОМПОНЕНТУ УБЕДИТЕСЬ В НЕОБХОДИМОСТИ И ЭФФЕКТИВНОСТИ !

ЗЫ.Я уж молчу о попытках открытой рекламы.

Как в DBGrid изменить цвет выделения (select) Найти похожие ветки