AnimShowControl() -> AnimHideControl()?

Viewing 4 posts - 1 through 4 (of 4 total)
  • Author
    Posts
  • #39844
    Support
    Keymaster

    Hello
    Hiding will be possible in the next release I think by using a function like this :

    CODE
    procedure FadeControls(ctrl : Array of TwinControl; IsVisible : boolean);
    var element : TwinControl;
    begin
      for element in ctrl do
      begin
        PrepareForAnimation(element);
        element.Visible := IsVisible;
        AnimShowControl(element, 250);
      end;
    end;

    #39893
    JohnBank
    Participant

    QUOTE (Support @ Jul 10 2009, 08:44 AM)
    Hello
    Hiding will be possible in the next release I think by using a function like this :

    CODE
    procedure FadeControls(ctrl : Array of TwinControl; IsVisible : boolean);
    var element : TwinControl;
    begin
      for element in ctrl do
      begin
        PrepareForAnimation(element);
        element.Visible := IsVisible;
        AnimShowControl(element, 250);
      end;
    end;


    I have another question.Delphi VCL isn't thread safe and I can't do it with original delphi VCL,so I ask about your controls:

    Can I create a thread for each control in the loop so the gui doesn't freeze when I call the function? When I call the function with two controls,it freezes for 500 ms.

    Could you add this in the next release too? <img src="style_emoticons//wub.gif” style=”vertical-align:middle” emoid=”:wub:” border=”0″ alt=”wub.gif” />

    #39904
    JohnBank
    Participant

    6.40 stable just got released.

    Tell me did you add the feature? Please say “yes”. <img src="style_emoticons//a3.gif” style=”vertical-align:middle” emoid=”:a3:” border=”0″ alt=”a3.gif” />

    #39915
    Support
    Keymaster

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

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