[android] resize component runtime

[danten]

Hi, I need to resize all TRectangle in TFlowLayout on android.
It doesn't work for me.

Delphi-Quellcode:

procedure TfrmMain.FormResize(Sender: TObject);
var
  i: integer;
begin
  FlowLayout1.BeginUpdate;
  for I := 0 to FlowLayout1.ComponentCount -1 do
  begin
    if Components[i] is TRectangle then
    begin
      TRectangle(Components[i]).BeginUpdate;
      TRectangle(Components[i]).Width := (FlowLayout1.Width / 3) -10;
      TRectangle(Components[i]).EndUpdate;
    end;
  end;
  FlowLayout1.EndUpdate;
end;

Thank you

[TurboMagic]

Two things:

1. What does happen for you? "It doesn't work" is a bit generic as a "failure message"
2. You are sure you want to öpost in English in the German branch of Delphipraxiy?

Regards
TurboMagic

[danten]

Zitat:

Zitat von TurboMagic (Beitrag 1448993)

Two things:

1. What does happen for you? "It doesn't work" is a bit generic as a "failure message"
2. You are sure you want to öpost in English in the German branch of Delphipraxiy?

Regards
TurboMagic

And you program in German or English?
I'm not German or American.
Delphipraxis is a good forum, only some users can not advise, but only spam.
I've already advised someone on the forum and I expect someone to advise me too!

Delphi-Quellcode:

var
  i: integer;
  Item : TControl;
begin

    for I := FlowLayout1.ControlsCount -1 downto 0 do
    begin
      Item := FlowLayout1.Controls[i];
      Item.Width := (FlowLayout1.Width / 3) -10;
      Item.Height := Item.Width;
    end;

[tggmx]

If you change your for loop from

Delphi-Quellcode:

FlowLayout1.ComponentCount

to

Delphi-Quellcode:

FlowLayout1.ControlsCount

then it should work.

[QuickAndDirty]

Zitat:

Zitat von tggmx (Beitrag 1448997)

If you change your for loop from

Delphi-Quellcode:

FlowLayout1.ComponentCount

to

Delphi-Quellcode:

FlowLayout1.ControlsCount

then it should work.

I support this .

[Rollo62]

Sometimes UI changes not always trigger a repaint for me.
An explicit .Repaint; might help to clarify.

[TurboMagic]

Zitat:

Zitat von danten (Beitrag 1448996)

And you program in German or English?
I'm not German or American.
Delphipraxis is a good forum, only some users can not advise, but only spam.
I've already advised someone on the forum and I expect someone to advise me too!

I program in Delphi ;-)
And I usually do advise. But since there is an English speaking Delphipraxis
branch available I see not much reason to post in English in the German one.

I'm quite sure you would have gotten similar advice as you got here over there.
There's simply no use having German forums when everybody starts talking in English
there even when English ones do exist!