Добавить комментарий

Delphi

Изменить цвет фона у заголовков cxGrid

Как правило, изменить внешний вид заголовков столбиков через стили не удаётся. Остаётся только полностью заменить обработчик рисования заголовка.
Например, так:

procedure TMain.cxGrid1DBTableView1CustomDrawColumnHeader(
        Sender: TcxGridTableView; 
        ACanvas: TcxCanvas; 
        AViewInfo: TcxGridColumnHeaderViewInfo; 
  var ADone: Boolean);
begin
  with AViewInfo do
  begin
    LookAndFeelPainter.DrawHeader(ACanvas, Bounds, TextBounds, Neighbors,
               Borders, ButtonState, AlignmentHorz,  AlignmentVert, MultiLine,
               False, Text, Params.Font, Params.TextColor , Params.Color);

    ACanvas.FillRect(cxRectInflate(Bounds, 0,0,-1,-2), clRed);
    ACanvas.DrawText(Text, TextBounds, AlignmentHorz, AlignmentVert, MultiLine, False);
    ADone := True;
  end;
end;
Метки:

Filtered HTML

  • Адреса страниц и электронной почты автоматически преобразуются в ссылки.
  • Допустимые HTML-теги: <a> <em> <strong> <cite> <blockquote> <code> <ul> <ol> <li> <dl> <dt> <dd>
  • Строки и абзацы переносятся автоматически.
  • Вы можете цитировать другие сообщения, используя тэг [quote]

Plain text

  • HTML-теги не обрабатываются и показываются как обычный текст
  • Адреса страниц и электронной почты автоматически преобразуются в ссылки.
  • Строки и абзацы переносятся автоматически.