Jump to content

UnimList scroll


epos4u

Recommended Posts

Hi,

 

Try:

procedure TMainmForm.UnimButton1Click(Sender: TObject);
var
  ListJSName: string;
begin
  //scrollToTop
  ListJSName := UnimList1.JSName;
  UniSession.AddJS(ListJSName + '.select(0);' + ListJSName + '.getScrollable().getScroller().scrollToTop(true);');
end;

procedure TMainmForm.UnimButton2Click(Sender: TObject);
var
  ListJSName: string;
begin
  //scrollToEnd
  ListJSName := UnimList1.JSName;
  UniSession.AddJS(ListJSName + '.select(' + ListJSName + '.store.getCount() - 1);' + ListJSName + '.getScrollable().getScroller().scrollToEnd(true);');
end;

Best regards.

  • Upvote 1
Link to comment
Share on other sites

Delphi Developer,

 

A Big Thank you, it works,

 

i will have to try and learn some scripting

 

 

Hi,

 

Try:

procedure TMainmForm.UnimButton1Click(Sender: TObject);
var
  ListJSName: string;
begin
  //scrollToTop
  ListJSName := UnimList1.JSName;
  UniSession.AddJS(ListJSName + '.select(0);' + ListJSName + '.getScrollable().getScroller().scrollToTop(true);');
end;

procedure TMainmForm.UnimButton2Click(Sender: TObject);
var
  ListJSName: string;
begin
  //scrollToEnd
  ListJSName := UnimList1.JSName;
  UniSession.AddJS(ListJSName + '.select(' + ListJSName + '.store.getCount() - 1);' + ListJSName + '.getScrollable().getScroller().scrollToEnd(true);');
end;

Best regards.

Link to comment
Share on other sites

  • 4 years later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...