abv

Member | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Цитата: Приведите пожалуйста пример как это сделать. В дельфи или билдере, мне всё равно. Главное понять механизм как раскрасить всю строку в таблице в зависимости от внешних данных. | Если данные, по которым нужно раскрашивать, показываются в гриде, то все просто: procedure TForm1.GridGetCellColor(Sender: TObject; ARow, ACol: Integer; AState: TGridDrawState; ABrush: TBrush; AFont: TFont); begin // Определяем индекс столбца с нужными данными //раскрашиваем строку красным, если значение в столбце=0 if StrToIntDef(Grid.Cells[7, ARow], 1)=0 then AFont.Color := clred; inherited; end; Если же не показываются, тогда все хуже, до нужного поля базы просто так не добраться, похоже. В этом случае проще сделать столбец невидимым (HideColumn[7]), а потом обрабатывать его также, как и в предыдущем случае. PS. Если остались вопросы, лучше в личку или в аську. | Всего записей: 268 | Зарегистр. 23-08-2001 | Отправлено: 12:54 28-11-2007 | Исправлено: abv, 12:55 28-11-2007 |
|