LilyStilson

procedure TTabControl.SetActiveTabWithTransitionAsync(const ATab: TTabItem; const ATransition: TTabTransition;
  const ADirection: TTabTransitionDirection; const AType: TAnimationType; const AInterpolation: TInterpolationType; const ADuration: Single; const AOnFinish: TProc);

  procedure AnimateControlPositionX(AParent: TFmxObject; const NewValue: Integer;
    const AProgressHandler: TNotifyEvent; const AFinishHandler: TNotifyEvent);
  var
    A: TIntAnimation;
  begin
    TAnimator.StopPropertyAnimation(AParent, 'Position.X');

LilyStilson

uses
  System.SysUtils, System.Classes, System.Threading,
  {$IFDEF MSWINDOWS}
  Winapi.Windows;  
  {$ELSE POSIX}
  Posix.Base;
  {$ENDIF}

type
  TConsoleCallback<T> = reference to procedure(Line: T);

LilyStilson

// RAD Studio 10.4
unit Unit1;

uses
  FMX.Types, FMX.Controls, FMX.Forms, FMX.ComboEdit, FMX.Text;

type
  TComboEdit = class(TCustomComboEdit)
  procedure OnValidateEvent(Sender: TObject; var Text: string);
  procedure OnValidatingEvent(Sender: TObject; var Text: string);

LilyStilson

<ResourceDictionary
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" 
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml">
    <!-- Favorite/Unfavorite button style. Text are predefined and thus shall not be changed. -->
    <Style x:Key="FavoriteButtonRevealStyle" TargetType="AppBarToggleButton">
        <Setter Property="Foreground" Value="{ThemeResource AppBarToggleButtonForeground}"/>
        <Setter Property="BorderBrush" Value="{ThemeResource AppBarToggleButtonRevealBorderBrush}"/>
        <Setter Property="BorderThickness" Value="{ThemeResource AppBarToggleButtonRevealBorderThemeThickness}"/>
        <Setter Property="HorizontalAlignment" Value="Left"/>
        <Setter Property="VerticalAlignment" Value="Top"/>

LilyStilson

//Forked from freeonterminate (Hosokawa Jun)
//Translated by LilyStilson

unit uNSAppSample;

interface

implementation

{$IFDEF MACOS}