wladid / anyiquack Goto Github PK

I have created an example application and it works OK, when I use the library in a 'real' application, I get several compilation errors

[dcc32 Error] AnyiQuack.pas(2484): E2506 Method of parameterized type declared in interface section must not use local symbol 'PrimaryRetakeCheck'
[dcc32 Error] AnyiQuack.pas(2713): E2250 There is no overloaded version of 'SpinUntil' that can be called with these arguments
[dcc32 Error] AnyiQuack.pas(2802): E2250 There is no overloaded version of 'SpinUntil' that can be called with these arguments

It might be that there are options that need to be set in the project - please can you advise?

Hi,
that's great library.
Would it work in Firemonkey? Or can it be converted?
Thanks

I have been playing with you examples here, and am having issues with examples once they have VCL Styles added to them, is it possible that it could be my examples, or is there any examples available

can we hope this beautiful framework work with FMX?

Hello there!

Delphi 10.2.1 (25.0.27659.1188) + today's AnyiQuack:

1. Open project from \Examples\SlidingForm\
2. Add ReportMemoryLeaksOnShutdown := True; to SlidingForm.dpr:

program SlidingForm;

uses
Forms,
Main in 'Main.pas' {Form1},
AQPControlAnimations in '....\AQPControlAnimations.pas',
AnyiQuack in '....\AnyiQuack.pas',
Vcl.Themes,
Vcl.Styles;

{$R *.res}

begin
ReportMemoryLeaksOnShutdown := True;
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.

3. Press F9
4. Click on the form...
5. Close application
6. Now check out the file in attach:
   

Could you fix it please?

Hi

I was looking at this lib but I got a build error in AnyiQuack.pas

[dcc32 Fatal Error] AnyiQuack.pas(45): F2613 Unit 'System.Contnrs' not found. I think this is an old obsolete unit.
Is this not compatible with Rio ?

Not an issue. The animations are not fluid when the interval is set to the default 15. If the interval is set to 2 it is really nice and fluid. You can especially notice this when the duration of the animation is set to 3 seconds or so.

Hello,

I'm not sure why, but once TNotificationWindow is used in a DLL( an Office ActiveX add-in), it'll cause the host program (winword.exe for example) won't close, hang in the memory in the Task Manager.

Everything's ok with an VCL EXE. Do you have any hint for me? I tried commenting out the UseThreadTimer compiler directive but no change.

PS, I'm still using this commit before your big changes for FMX.

Hi there! Is it possible to animate Font.Size? 🤔

uses
  Vcl.StdCtrls

...

    function FontSizeAnimation(FromSize, ToSize, Duration: Integer; ID: Integer = 0;
      const EaseFunction: TEaseFunction = nil; const OnComplete: TAnonymNotifyEvent = nil): TAQ;

...

function TAQPControlAnimations.FontSizeAnimation(FromSize, ToSize, Duration, ID: Integer;
  const EaseFunction: TEaseFunction; const OnComplete: TAnonymNotifyEvent): TAQ;
begin
  Result := Each(
    function(AQ: TAQ; O: TObject): Boolean
    begin
      Result := True;

      Take(O)
        .EachAnimation(Duration,
          function(AQ: TAQ; O: TObject): Boolean
          begin
            TLabel(O).Font.Size := Byte(TAQ.EaseInteger(
              FromSize, ToSize, AQ.CurrentInterval.Progress,
              EaseFunction));

            if Assigned(OnComplete) and (AQ.CurrentInterval.Progress = 1) then
              OnComplete(O);

            Result := True;
          end);
    end);
end;

F9:

procedure Button1Click(Sender: TObject);
begin
  Take(Label1)
     .Plugin<TAQPControlAnimations>
     .FontSizeAnimation(Label1.Font.Size, 12, 1, 1000);
end;

Result: