Subject | Re: [IBO] ib_grid.ondrawcell and ongetcellprops |
---|---|
Author | james_027 |
Post date | 2003-07-12T03:12:29Z |
Hi thanks for your explanation. I greatly appreciate it. I now
understand what those code does. Perhaps after more experience in
customizing my ib_grids color I could fully understand them.
I have now change my code and my column doesnt change its color
anymore. But I still have this problem. That I mention in my last
part of my message. Here is the code you have requested.
procedure TForm_request.IB_Grid2GetCellProps(Sender: TObject; ACol,
ARow: Integer; AState: TGridDrawState; var AColor: TColor; AFont:
TFont);
begin
if usage.Active then
begin
if not (gdfixed in AState) then
begin
if usage.bufferFieldByName('Status').AsString = 'CAN' then
afont.Color:=clred;
end; // if not astate = gdfixed then
end; // if usage.active then
end;
From my observation if the I from one record to another with the last
record has different color to the present record what happen is that
the first column of the resent record change its color to the last
records color. Hope you understand my english, please bear with me.
thanks in advance.
james
understand what those code does. Perhaps after more experience in
customizing my ib_grids color I could fully understand them.
I have now change my code and my column doesnt change its color
anymore. But I still have this problem. That I mention in my last
part of my message. Here is the code you have requested.
procedure TForm_request.IB_Grid2GetCellProps(Sender: TObject; ACol,
ARow: Integer; AState: TGridDrawState; var AColor: TColor; AFont:
TFont);
begin
if usage.Active then
begin
if not (gdfixed in AState) then
begin
if usage.bufferFieldByName('Status').AsString = 'CAN' then
afont.Color:=clred;
end; // if not astate = gdfixed then
end; // if usage.active then
end;
From my observation if the I from one record to another with the last
record has different color to the present record what happen is that
the first column of the resent record change its color to the last
records color. Hope you understand my english, please bear with me.
thanks in advance.
james