Issue editing cell with an EditLink

VCL TMS VCL UI Pack
1

Hi,
Delphi XE10 update 1
TMS Component Pack 8.0.7.0

When editing a cell with an EditLink and clicking on another cell while editing, the newly selected cell content changes to the content of the cell that was previously being edited.

To repdroduce:
Create a new project with an AdvStringGrid and a AdvEditEditLink (the issue also happen with ColumnComboEditLink and possibly other EditLinks).

Add the following code:

procedure TForm1.FormCreate(Sender: TObject);
begin
   AdvStringGrid1.Options := AdvStringGrid1.Options + [goEditing];
   AdvStringGrid1.LinearFill;
end;

procedure TForm1.AdvStringGrid1GetEditorType(Sender: TObject; ACol, ARow: Integer; var AEditor: TEditorType);
begin
   AEditor := edCustom;
   AdvStringGrid1.EditLink := AdvEditEditLink1;
end;

Click cell 1:1 to enter edit mode
While still in edit, click on cell 1:2
Notice that the content of cell 1:2 became 1:1


2

I have retested this here but could not reproduce this. Any other TAdvStringGrid properties set to non default values?

3

Appears to be Delphi version specific. We traced & solved it. We'll release an update asap.

4

I sent a video to your email support so that you can see the issue.

Thanks

5

Thanks but the issue is fixed now.