Results 1 to 3 of 3

Thread: Runtime panels verwisselen op een Form

  1. #1

    Runtime panels verwisselen op een Form

    Hallo allemaal,

    Op het Form staan meerdere Panels.
    Hoe kan ik op een Form in Runtime panels verwisselen? Dus Panel1 gaat naar de plaats van Panel2 en Panel2 komt op de plaats van Panel1 te staan.

    Met een vriendelijke groet, Frans

  2. #2
    Dit werkt bij mij (in Lazarus):
    Code:
    procedure TForm1.btnPanelsClick(Sender: TObject);
    var
      Links,
      Boven : Integer;
    begin
      Links := Panel1.Left;
      Boven := Panel1.Top ;
      Panel1.Left := Panel2.Left;
      Panel1.Top := Panel2.Top;
      Panel2.Left := Links;
      Panel2.Top := Boven ;
    end;

  3. #3
    Gebruik je ook nog alignment van die panels? Als ze bijvoorbeeld op Align = alLeft staan, dan kan je Rechter.Left := Linker.Left doen om ze te verwisselen.
    1+1=b

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •