Das weiß ich
Abgesehen davon dass du keine ScrollView auf dem Form hast fehlt das
Initialize;
Delphi-Quellcode:
procedure TForm1.TMSFMXNativeUIButton1Click(Sender: TObject);
var n: Integer;
Y: Integer;
orgHeight: double;
begin
Y:=0;
orgHeight := scrollView1.Height;
for n:= 0 to 9 do
begin
View1.Height := (n+1)*40;
View1.Initialize;
scrollView1.Height := (n+1)*40;
scrollView1.Initialize;
with TTMSFMXNativeUIButton.Create(View1) do
begin
Parent:= View1;
Position.Y:= Y;
Position.X:= 50;
Text:= 'Button Nr.'+n.ToString();
Initialize;
end;
Inc(Y,40);
end;
scrollView1.Height := orgHeight;
end;
Habs Dir auch mal hochgeladen.