[Support]

Hello

Colums fonts are not changed, because this color may be changed only in the DBAdvGrid.Columns[0].HeaderFont.Color seems.

Maybe you know other way for fonts colors changing?

[alweis]

Hi Serge,

I think I have a workaround that works for most skins. Is this a reasonably efficient way to do it?

Code:

procedure TTrackPro.FormCreate(Sender: TObject);
var
i : integer; // Loop Counter
begin
if sSkinManager1.Active then
for i := 1 to DBAdvGrid1.ColCount – 1 do
begin
DBAdvGrid1.Columns.HeaderFont.Color :=
sSkinProvider1.SkinData.SkinManager.GetGlobalFontColor;
DBAdvGrid1.Columns.HeaderFont.Style := [fsbold];
end;
end;

Thanks in advance for any comments or suggestions that you may have.

[Support]

Hello

Yes, you can use this code in the sSkinManager1.OnAfterChange event.

Color of font will be changed after each skin changing in this case.

[alweis]

Serge,

Thanks for the advice, this case is closed.

Thanx

[Author]

Posts