FMX.Forms.TCustomPopupForm.AniPosition

• Übergeordnet: TCustomPopupForm

Delphi

property AniPosition: Single read FAniPosition;

C++

__property float AniPosition = {read=FAniPosition};

Eigenschaften

Typ	Sichtbarkeit	Quelle	Unit	Übergeordnet
property	public	FMX.Forms.pas FMX.Forms.hpp	FMX.Forms	TCustomPopupForm

Beschreibung

Hat keine vordefinierte physische Definition. Sie können AniPosition in einer OnAniTimer-Ereignisbehandlungsroutine verwenden.

Der Wert von AniPosition wechselt zwischen 0 und 1.

AniPosition hat keine vordefinierte physische Interpretation. Sie können eine eigene physische Interpretation von AniPosition in einer OnAniTimer-Ereignisbehandlungsroutine implementieren. Beispielsweise können Sie AniPosition in Breiten- und Höhen-Parametern der Größe des Popup-Formulars oder als Transparenz des Formulars interpretieren. Sie können zum Beispiel Folgendes schreiben:

...
procedure TForm1.AniTimerProc(Sender: TObject);
begin
  if Sender is TCustomPopupForm then
  begin
//    TCustomPopupForm(Sender).ContentControl.Opacity := TCustomPopupForm(Sender).AniPosition;
    TCustomPopupForm(Sender).Size := TSize.Create(Round(200 * TCustomPopupForm(Sender).AniPosition), 100);
  end;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  R: TRectangle;
begin
  R := TRectangle.Create(Self);
  F := TCustomPopupForm.Create(Self);
  F.AniDuration := 0.5;
  F.ContentControl := R;
  F.OnAniTimer := AniTimerProc;
  F.PlacementTarget := Button1;
  F.Show;
end;
...

Siehe auch

• FMX.Forms.TCustomPopupForm.OnAniTimer
• FMX.Forms.TCustomPopupForm.Size
• FMX.Forms.TCustomPopupForm.AniDuration