TopRow and LeftCol of TUniStringGrid

[Fujio]

In a TUniStringGrid with a 100x100 cell and a display area of 10x10, how can I display the cell with Row=50 and Col=50 in the upper left corner when I press the button?

[Sherzod]

3 hours ago, Fujio said:

In a TUniStringGrid with a 100x100 cell and a display area of 10x10, how can I display the cell with Row=50 and Col=50 in the upper left corner when I press the button?

Hello,

This is not what you wanted, but a close solution for your case:

procedure TMainForm.UniButton1Click(Sender: TObject);
begin
  with UniStringGrid1 do
  begin
    Col := 50;
    Row := 50;

    JSInterface.JSCode('Ext.select("#"+'#1'.id+" .x-grid-cell-selected").elements[0].scrollIntoView();')
  end;
end;

 

[Fujio]

Thank you.
I tried it, but the cells with Row=50 and Col=50 are displayed in the upper right corner, not the upper left.
I wrote the following code, and immediately after execution it is 1.png and after pressing the button it is 2.png.

procedure TMainForm.UniButton2Click(Sender: TObject);
begin
  UniStringGrid1.Row:=50;
  UniStringGrid1.Col:=50;
  UniStringGrid1.JSInterface.JSCode('Ext.select("#"+'#1'.id+" .x-grid-cell-selected").elements[0].scrollIntoView();')
end;

procedure TMainForm.UniFormCreate(Sender: TObject);
var
  i,j:Integer;
begin
  for i := 0 to 99 do
  begin
    UniStringGrid1.Columns[i].Title.Caption:=IntToStr(i);
    for j := 0 to 99 do
    begin
      UniStringGrid1.Cells[j,i]:=IntToStr(j)+','+IntToStr(i);
    end;
  end;
end;

[Sherzod]

Hello,

2 hours ago, Fujio said:

I tried it, but the cells with Row=50 and Col=50 are displayed in the upper right corner, not the upper left.

Yes, I know.

2 hours ago, Fujio said:

I wrote the following code...

So, is it OK for you?

[Fujio]

Hello,

>This is not what you wanted, but a close solution for your case:
I overlooked this. I'll see if I can't get it to be upper left somehow.

[Sherzod]

12 minutes ago, Fujio said:

I'll see if I can't get it to be upper left somehow.

I will check too.

[Sherzod]

4 hours ago, Fujio said:

I'll see if I can't get it to be upper left somehow.

Did some tests...