| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как в DBGrid изменить цвет выделения (select)
bobtubob © (2003-09-22 17:03:00)
Как в DBGrid изменить цвет выделения (select)
MsGuns (2003-09-24 13:07:00) [1]
>Alex_Raider © (24.09.03 12:58) [5]
>Большими буквами нужно написать во всех конференциях по БД:
>Прежде чем постить вопрос по гриду, следует учесть доступность бесплатного для русских разработчиков DBGridEH.
А очень большими :
ПРЕЖДЕ ЧЕМ ИСКАТЬ И ВНЕДРЯТЬ НОВУЮ КОМПОНЕНТУ УБЕДИТЕСЬ В НЕОБХОДИМОСТИ И ЭФФЕКТИВНОСТИ !
ЗЫ.Я уж молчу о попытках открытой рекламы.
Alex_Raider (2003-09-24 12:58:00) [2]
Большими буквами нужно написать во всех конференциях по БД:
Прежде чем постить вопрос по гриду, следует учесть доступность бесплатного для русских разработчиков DBGridEH.
bobtubob (2003-09-24 12:53:00) [3]
чё ты кипешуеш
Спасибо за код!!!
Я конечно же в нём разобраля и всё зделал но я вёл разговор про то что вовремя выполнения программы у меня state принимал лиш два значения
-State =[gdSelected..Focused]
-State =[]
значения
-State =[gdSelected]
-State =[Focused]
state никогда не принимал
А за мысль спасибо - я чуть иначе переделал и всё заработало
MsGuns (2003-09-23 12:41:00) [4]
Во-первых, если внимательно просмотреть код, то там анализируются 3 ситуации:
- грид не активен и строка текущая
- грид не активен и строка нетекущая
- грид активен и строка текущая
- грид активен и строка нетекущая
Во-вторых, тебе что, надо готовый код для твоейпроги или подсказку где копать ? Если первое, то нет проблем - посылай на мыло условия задачи с указанием суммы, которую готов за это заплатить
bobtubob (2003-09-23 10:04:00) [5]
Отрабатывают события только в двух случаях
-State =[gdSelected..Focused]
-State =[]
надо чтобы в трёх ато и в четырёх
-State =[gdSelected]
-State =[Focused]
MsGuns (2003-09-22 17:10:00) [6]
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;
| |
