Хочу, чтобы при выборе в DBGrid выделялась не отдельная ячейка, а вся строка. Каким-нибудь цветом... Кажется, что не сложно, но не пойму как
Код:
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;
Admin: Пользуемся тегами!
КОгда использую эту процедуру пишет что, Undeclared identifier: 'TField'