TableView and category caption

FMX TMS FMX UI Pack
1

After several hours of battle I give up. I have tried all settings but the caption of the last category is not shown. The demo of TableView works fine but I don't succeed in finding the problem in my code


.

The last category caption


Here is the link to the simple test program that produces this result

Any idea?

Thank you

Library used TMS Pack for Firemonkey V.3.2.6.1
with Delphi 10 update1
tested also in Delhi XE7, same results


2

Category indexing starts at zero. Change your code to:


begin
 TMSFMXTableView1.BeginUpdate;
 TMSFMXTableView1.Items.Clear;
 TMSFMXTableView1.Categories.Clear;
 TMSFMXTableView1.CategoryType:=ctCustom;
 with TMSFMXTableView1.Categories.Add do
  begin
   Caption:='C1';
   ID:=0;
  end;

 with TMSFMXTableView1.Items.Add do
  begin
   Caption := 'A1';
   CategoryID := 0;
  end;

 with TMSFMXTableView1.Categories.Add do
  begin
   Caption:='C2';
   ID:=1;
  end;

 with TMSFMXTableView1.Items.Add do
  begin
   Caption := 'A2';
   CategoryID := 1;
  end;

 with TMSFMXTableView1.Categories.Add do
  begin
   Caption:='C3';
   ID:=2;
  end;

 with TMSFMXTableView1.Items.Add do
  begin
   Caption := 'A3';
   CategoryID := 2;
  end;

 TMSFMXTableView1.EndUpdate;
end;
3

Ah! It was so easy.


Thank you