?dbgrid

[koorosh-kabir-2564]

آیا می توان هر سطر از dbgrid را در هنگام نمایش با یک رنگ دید ؟ برای مثال سطر های فرد سفید و سطر های زوج خاکستری روشن.

[mzjahromi]

procedure TForm1.DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if ((Sender as tdbgrid).DataSource.DataSet.RecNo mod 2) = 0 then
TDBGrid(Sender).Canvas.Brush.Color := clinfobk; //or any color
if not(GDSelected in State) Then
TDBGrid(Sender).DefaultDrawColumnCell(rect, datacol, column, state);
end;

[ehsane]

یه جستجو کوچولو = نتایج کامل در این زمینه