Jump to content

MainmForm.VertScroll.position:=0 raise AV


Abaksoft

Recommended Posts

Hello Sherzod,

If you don't mind, i can't return to the top of a MainmForm after scrolling (bottom).

Settings

procedure TMainmForm.UnimFormCreate(Sender: TObject);
begin
// to Get a vertical Scroll (without UnimScrollBox)
  MainmForm.AutoHeight:=False;
  MainmForm.Scrollable:=True;
end;
procedure TMainmForm.UnimButton1Click(Sender: TObject);
begin
 // Raise AV
 MainmForm.VertScrollBar.Position:=0;

 // Maybe something like ?
 //  UniMemo1.JSInterface.JSCall('inputEl.scrollTo', ['top']);
end;

Build 1535

Thx.

Project1.7z

Link to comment
Share on other sites

  • 3 months later...
×
×
  • Create New...