delphi - Delphi7-TDBGridスタイル

Question

Delphi 7で定型化されたテーブルを使用するにはどうすればよいですか？例えば：

Answer 1

TDbGridコンポーネントをテーマにする場合は、JeremyNorthとAndreasHausladenThemed DBGrid runtime replacementのを使用できます。

Answer 2

Delphi7とWindows8.1でこの例を作成し、テストしました

イベントDrawColumnCellを使用して、色などを変更します。

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
  try
    if Column.FieldName = 'FIRST_NAME' then
      DBGrid1.Canvas.Brush.Color := clGreen;
  finally
    DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
  end;
end;

完全な例をダウンロード： ファイル