Subject | RE: [IBO] How to change Color of selected (=highlited) row ? |
---|---|
Author | Ralf R. |
Post date | 2001-06-12T07:43:11Z |
Hi Geoff
See the Contact sample application which demonstrates the use of
OnGetCellProps including the GridFields property mentioned above.
I did so, and I see no differences between my code and the Contact sample.
MY Contact sample:
---snip---
BufferRowNum := grContact.DataRow[ ARow ];
if BufferRowNum > 0 then begin
// This provides an example of how colors can be customized on an
// individual cell basis.
tmpFld := grContact.GridFields[ grContact.DataCol[ ACol ]];
if Assigned( tmpFld ) and ( tmpFld.FieldName = 'LASTNAME' ) then
begin
dat := BufferFieldByName('CON_TYPE').AsString;
if dat = 'FAMILY' then
begin
if AColor = grContact.Color then
AColor := clLime;
end;
end;
---snap---
HTH
Geoff Worboys
Telesis Computing
Yahoo! Groups Sponsor
Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
See the Contact sample application which demonstrates the use of
OnGetCellProps including the GridFields property mentioned above.
I did so, and I see no differences between my code and the Contact sample.
MY Contact sample:
---snip---
BufferRowNum := grContact.DataRow[ ARow ];
if BufferRowNum > 0 then begin
// This provides an example of how colors can be customized on an
// individual cell basis.
tmpFld := grContact.GridFields[ grContact.DataCol[ ACol ]];
if Assigned( tmpFld ) and ( tmpFld.FieldName = 'LASTNAME' ) then
begin
dat := BufferFieldByName('CON_TYPE').AsString;
if dat = 'FAMILY' then
begin
if AColor = grContact.Color then
AColor := clLime;
end;
end;
---snap---
HTH
Geoff Worboys
Telesis Computing
Yahoo! Groups Sponsor
Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.