DBGrin

← →
moor_38 (2002-03-04 13:00) [0]

Как в Delphi 5 программным путем выделить ячейку в определенной колонке?

← →
ruslan_as © (2002-03-04 13:18) [1]

Введите следующий код в обработчике события OnDrawDataCell:

procedure TForm1.DBGrid1DrawDataCell(Sender: TObject;
const Rect: TRect; Field: TField; State: TGridDrawState);
begin
if gdFocused in State then
with (Sender as TDBGrid).Canvas do
begin
Brush.Color := clRed;
FillRect(Rect);
TextOut(Rect.Left, Rect.Top, Field.AsString);
end;
end;

Установите свойство DefaultDrawing в True. Здесь перерисовывается только выделенная ячейка. Если установить DefaultDrawing в False, то вы должны самостоятельно перерисовать все ячейки аналогично примеру.

← →
Nest © (2002-03-04 15:49) [2]

Если на самом деле нужно было установить фокус(
"выделить"),
то
dbgrid1.SelectedIndex:=1; //вместо 1-номер нужной колонки,
dbgrid1.setfocus;

Может ещё нужно установить на нужную строку...

← →
moor_38 (2002-03-05 15:09) [3]

Большое спасибо, очень помогло!!!!!!!!!!!

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