DBAdvGrid rowselect disappear

VCL TMS VCL UI Pack
1
Hi

Put to the form a query, datasource.
Put to the form a DBAdvGrid, options.goRowselect=true, connect to the query.

Query.open: DBAdvGrid perfect, rowselect ok.

Query open again: DBAdvGrid perfect, rowselect ok.

But, if change the query's SQL (eg. the where filter), to get other records, and open again, the rowselect disappear.


Came about from TMS CP 8.1.4.0, still in TMS CP 8.2.1.0.

Thanks in advance.

Win7, Delphi XE7, TMS CP 8.2.1.0.
2

I have retested this here with our demo ADOQuery in the DBAdvGrid demos folder with setting goRowSelect = true in Options and I cannot see an issue. 

How exactly can this issue be reproduced with this demo?
3

Yes, your demo work perfect, I search for the differents.

4

I found the different.

Put a Edit for filtering.

procedure TForm1.Edit1Change(Sender: TObject);
begin
  ADOQuery1.SQL.Text:=
    'select * from cars'+
    '  where cyl='+Edit1.Text;

  ADOQuery1.Open;
end;

That' work perfect.

If add columns to dbadvgrid, work perfect.
If add columns with db fields, work wrong, the rowselect disappear.

5

How do you add columns with DB fields? Programmatically? I retested this here changing the query so that DB fields would be added and I can still not see an issue.

6

In design time, with quick config/add all db fields.

Default, dbadvgrid has no columns in design time.
Run the demo, click show button, filter with edit1 eg. press 4. Everything ok.

In design time, with quick config/add columns with all db fields.
Run the demo, click show button, filter with edit1 eg. press 4. Where is the rowselect ?

http://kepfeltoltes.hu/160503/Clipboard01_1_www.kepfeltoltes.hu_.jpg
http://kepfeltoltes.hu/160503/Clipboard02_1_www.kepfeltoltes.hu_.jpg
http://kepfeltoltes.hu/160503/Clipboard03_1_www.kepfeltoltes.hu_.jpg
http://kepfeltoltes.hu/160503/Clipboard04_1_www.kepfeltoltes.hu_.jpg

7

I did all these steps but I'm still unable to see this problem.

I can only assume you do not inform about all exact settings or steps.
Please send us some sample source project with exact steps how to reproduce this issue here.
8

Hmm.
I used your demo ADOQuery.

The plus only a TEdit with OnEdit1Change, see above.

Run, show.
If you test the filtering with Edit1 without columns (no colums: picture1) everything ok.

Click twice in design time the DBAdvGridquick config/add all db fields (picture3).
Run, show.
If you test the filtering with Edit1 with columns NO rowselect (picture4).

Click in design time the DBAdvGridquick config/remove all colums.
Run, show.
If you test the filtering with Edit1 again, without columns everything ok..

9

That is exactly the scenario I tested but I cannot see such behavior here.

10

Other PC, other operating system (win10), other delphi version (10seattle), the problem same.

If I will have enough time, i make a video.

11

Hi

I sent the behaviour of the dbadvgrid video.

Steps for DbAdvGrid.ADOQuery demo:

1, Set DbAdvGrid.Options.goRowSelect:=true;

2, Put a Edit, with OnChange for filtering.

procedure TForm1.Edit1Change(Sender: TObject);
begin
  ADOQuery1.SQL.Text:=
    'select * from cars'+
    '  where cyl='+Edit1.Text;

  ADOQuery1.Open;
end;

3, Run, Show. RowSelect OK. Filter with Edit1. RowSelect OK.

4, Click to DbAdvGrid.Quick config.Add all db field    twice.

5, Run, Show. RowSelect OK. Filter with Edit1. RowSelect ??

Thanks for advance.

Win10, Delphi XE10, TMS CP 8.3.00
12

We received your project via email and will followup via email.