am using the nice TVirtualModeData
and successfully use
Code: Select all
procedure GetCell(Sender:TObject; const AColumn:TColumn; const ARow:Integer; var AValue:String);
so that the whole row gets hidden.
So obviously, the following doesn't work since the row gets included with blank values..
Code: Select all
if AColumn.Index = column_i Then
Avalue := '';
being displayed), which has been created normally like so:
Code: Select all
// Create data, with 10 columns, lots of rows, (optionally: a default column width = 60)
Data:=TVirtualModeData.Create(10,20000,60);
Sami