DBGrid

← →
Wolferio © (2006-01-25 09:50) [0]

Добрый день!

Подскажите пожалуйста:
1. Как в DBGrid указаные строки сделать перечеркнутыми
2. Как в DBGrid указаную ячейку сделать перечеркнутой

Спасибо!

← →
Ega23 © (2006-01-25 09:54) [1]

TDBGrid.OnDrawDataCell

← →
Wolferio © (2006-01-25 11:03) [2]

> TDBGrid.OnDrawDataCell

ну а параметры которые должны стоять, какие?

Спасибо!

← →
Ega23 © (2006-01-25 11:21) [3]

> ну а параметры которые должны стоять, какие?

Посмотри в демках Delphi

← →
nstur (2006-01-25 11:51) [4]

Даю пример из своего кода.
Тебе нужно изменить свойство Font по своему усмотрению или условию

DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
var
k: integer;
begin
with (Sender as TDBGrid).Canvas do begin
if (NOT(gdFocused in State)) then begin //если нужно сфокусированную строку, то это нужно убрать
k:= Column.Field.DataSet.FieldByName(flnISFOLDER).AsInteger;
if k = 1 then Brush.Color:= colorFolder;
if (Column.FieldName = "MONEY") then
if (Column.Field.AsCurrency < 0) then
Font.Color:= clRed;

FillRect(Rect);
if Column.Alignment = taRightJustify then
TextOut(Rect.Right-TextWidth(Column.Field.Text)-3, Rect.Top+2, Column.Field.Text)
else
TextOut(Rect.Left+2, Rect.Top+2, Column.Field.Text);

← →
Wolferio © (2006-01-27 14:32) [5]

<<nstur>> СПАСИБО!!!!! ПОМОГЛО!!!

Вопрос в догонку! :-)

Это код для выделения столбцов !? << nstur >>

Можна ли выделить отдельные строки за условием?

Заранее Благодарен!

← →
Ю.Ю. (2006-01-28 09:58) [7]

> Можна ли выделить отдельные строки за условием?

Можешь, причем не оьязательно, чтобы нужные для условия поля набора данных отображались в гриде. При вызове обработчика "текущей запистью" набора данных является рисуемая запись, поэтому независимо от того, какой столбец (поле) рисуется в данном вызове обработчика всегда можно написать:

if (Sender as TDBGrid).DataSource.DataSet.Fields[0].asInteger = 1 then ...

DBGrid Найти похожие ветки