TWebStringGrid.LoadFromStrings adds extra (empty) row

The simple test project below shows the bug.

unit Unit1;

interface

uses
  System.SysUtils, System.Classes, JS, Web, WEBLib.Graphics, WEBLib.Controls,
  WEBLib.Forms, WEBLib.Dialogs, Types, Vcl.Controls, Vcl.Grids, WEBLib.Grids;

type
  TForm1 = class(TWebForm)
    WebStringGrid1: TWebStringGrid;
    procedure WebFormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.WebFormCreate(Sender: TObject);
var
  sl: TStrings;
begin
  sl := TStringList.Create;
  sl.Add('Fixed Row,Number');
  sl.Add('First String,1');
  sl.Add('Second String,2');
  sl.Add('Third String,3');
  WebStringGrid1.LoadFromStrings(sl,',',True);
  ShowMessage(sl.Count.ToString + ', ' + WebStringGrid1.RowCount.ToString);
end;
end.

When run, it displays
image

and

image

^bump. Will this bug be addressed in the next update (along with the lack of Manifest.json in the cached files list of PWA apps)?

We have fixed this. The next update will address this.

Confirmed. Thanks.

This topic was automatically closed 24 hours after the last reply. New replies are no longer allowed.