PageControl

Viewing 5 posts - 1 through 5 (of 5 total)
  • Author
    Posts
  • #38740
    Support
    Keymaster

      Thank you very much for an example!
      This problem will be solved in the nearest release.

      #38746
      wsv
      Participant

        <img src="style_emoticons//a4.gif” style=”vertical-align:middle” emoid=”:a4:” border=”0″ alt=”a4.gif” />

        #38762
        Neon
        Participant

          Well that's strange… I'm using dynamically created sTabSheets quite often, but couldn't reproduce the problem you described.
          The one difference in my code from listed above is:

          CODE
          ts:=TsTabSheet.Create(Pager);
          ts.Parent:=Pager;
          ts.ImageIndex:=0;
          ts.PageControl:=Pager;

          This way it works well.

          #38763
          Neon
          Participant
            CODE
            procedure TForm1.Button2Click(Sender: TObject);
            begin
            with TsTabSheet.Create(self) do begin
            Caption:='Page '+inttostr(sPageControl1.PageCount);
            PageControl:=sPageControl1;
            Visible:=True;
            end;
            sPageControl1.ActivePageIndex:=sPageControl1.PageCount-1;
            end;

            And this works too, just make it visible after setting its PageControl.

            #38765
            wsv
            Participant

              QUOTE (Neon @ Apr 21 2009, 03:52 PM)
              just make it visible after setting its PageControl.

              Yes, thats work. But standart pagecontrol dsnt have this problem.

            Viewing 5 posts - 1 through 5 (of 5 total)
            • You must be logged in to reply to this topic.