Последние записи

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

20th
Июл

Как выделить последнюю строку в DBGrid?

Posted by Chas under Пост-обзор

volod3000:
само выделение строки, приблизительно так :



procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject;// событие ТDBGrid OnDrawColumnCell

  const Rect: TRect; DataCol: Integer; Column: TColumnEh;

  State: TGridDrawState);

begin

  if ( Rect.Top = DBGrid1.CellRect( DBGrid1.Col, DBGrid1.Row ).Top ) and

     ( not ( gdFocused in State ) or not DBGrid1.Focused ) then begin

     DBGrid1.Canvas.Brush.Color := clRed;

  end;

  DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);

end;

тема на форуме