layouts VertScrollBox dont show scroll bars after adding elements dynamically

Asked Apr 28 '16 at 21:35

Active Sep 02 '16 at 06:58

Viewed 495 times

i have a blank vertscrollbox at design time. the vertscrollbox have client align into the expander3 :

at run time i will add some button to vertscrollbox by this code:

  btnSelect := TButton.Create(VertScrollBox2);
  btnSelect.OnClick:= btnSelectCick;
  btnSelect.Parent := VertScrollBox2;
  btnSelect.Align := TAlignLayout.Scale;
  btnSelect.Position.X := cng*70;
  btnSelect.Position.Y := bng*70;
  btnSelect.Width := 60;
  btnSelect.Height := 60;
  btnSelect.text := 'Select'+bng.ToString+cng.ToString;
  btnSelect.name := 'Select'+bng.ToString+cng.ToString;

after 9 time run the above code it be like this:

you can see there is no scrollbar and some part of buttons is hiding under the border

how can i force vertscrollbox layout to show scrollbars? or update the alignment in runtime!?

edited Sep 02 '16 at 06:58

asked Apr 28 '16 at 21:35

peiman F.

1,648
1
19
42

Assuming that you have ShowScrollBars set to TRUE (the default) you could try VertScrollBox2.InvalidateContentSize. – Dsm Apr 29 '16 at 13:14
@Dsm ShowScrollBars is true and i tried InvalidateContentSize and not working for increase the scroll bars size!! – peiman F. Apr 29 '16 at 21:24
Please add the firemonkey tag. – Sertac Akyuz Sep 01 '16 at 23:09

layouts VertScrollBox dont show scroll bars after adding elements dynamically

0 Answers0