├── AppxManifest.xml
├── HelloWorldApp.pas
├── Logo.png
├── README
├── SampleWinRT.dpr
├── SampleWinRT.dproj
├── SmallLogo.png
├── SplashScreen.png
├── StoreLogo.png
├── System.WinrtHelpers.pas
├── Winapi.Winrt.pas
├── Winapi.Winrt_1.pas
└── deploy.bat


/AppxManifest.xml:
--------------------------------------------------------------------------------
 1 | <?xml version="1.0" encoding="utf-8"?>
 2 | <Package xmlns="http://schemas.microsoft.com/appx/2010/manifest">
 3 |   
 4 |   <Identity Name="Embarcadero.SampleWinrt"
 5 |             Publisher="CN=tgerdes"
 6 |             Version="1.0.0.0" />
 7 |   
 8 |   <Properties>
 9 |     <DisplayName>SampleWinrt</DisplayName>
10 |     <PublisherDisplayName>Thom Gerdes</PublisherDisplayName>
11 |     <Description>Sample Winrt app</Description>
12 |     <Logo>Logo.png</Logo>
13 |   </Properties>
14 |   
15 |   <Prerequisites>
16 |     <OSMinVersion>6.2</OSMinVersion>
17 |     <OSMaxVersionTested>6.2</OSMaxVersionTested>
18 |   </Prerequisites>
19 |   
20 |   <Resources>
21 |     <Resource Language="en-us"/>
22 |   </Resources>
23 |   
24 |   <Applications>
25 |     <Application Id="SampleWinRt"
26 |         Executable="SampleWinrt.exe"
27 |         EntryPoint="SampleWinrt.App">
28 |         <VisualElements
29 |             Logo="Logo.png"
30 |             SmallLogo="SmallLogo.png"
31 |             DisplayName="Sample Winrt"
32 |             Description="Sample Winrt App built in Delphi"
33 |             ForegroundText="light"
34 |             BackgroundColor="#222222">
35 |             <SplashScreen BackgroundColor="black" Image="SplashScreen.png" />
36 |         </VisualElements>
37 |     </Application>
38 |   </Applications>
39 | </Package>
40 | 
41 | 


--------------------------------------------------------------------------------
/HelloWorldApp.pas:
--------------------------------------------------------------------------------
  1 | {*******************************************************}
  2 | {                                                       }
  3 | {              WinRT Hello World XAML App               }
  4 | {                                                       }
  5 | { Copyright(c) 1995-2011 Embarcadero Technologies, Inc. }
  6 | {                                                       }
  7 | {*******************************************************}
  8 | 
  9 | unit HelloWorldApp;
 10 | 
 11 | interface
 12 | 
 13 | uses
 14 |   System.SysUtils,
 15 |   System.Win.ComObj,
 16 |   Winapi.Winrt,
 17 |   Winapi.Winrt_1,
 18 |   System.WinrtHelpers;
 19 | 
 20 | type
 21 |   TDerivedApp = class(TInspectableObject, Windows_UI_Xaml_IApplicationOverrides)
 22 |   private
 23 |     FInner: Windows_UI_Xaml_IApplicationOverrides;
 24 |   public
 25 |     { IApplication Overrides Interface }
 26 |     procedure OnInitialize; safecall;
 27 |     procedure OnActivated(args: Windows_ApplicationModel_Activation_IActivatedEventArgs); safecall;
 28 |     procedure OnLaunched(args: Windows_ApplicationModel_Activation_ILaunchActivatedEventArgs); safecall;
 29 |     procedure OnFileActivated(args: Windows_ApplicationModel_Activation_IFileActivatedEventArgs); safecall;
 30 |     procedure OnSearchActivated(args: Windows_ApplicationModel_Activation_ISearchActivatedEventArgs); safecall;
 31 |     procedure OnSharingTargetActivated(args: Windows_ApplicationModel_Activation_IShareTargetActivatedEventArgs); safecall;
 32 |     procedure OnFilePickerActivated(args: Windows_ApplicationModel_Activation_IFilePickerActivatedEventArgs); safecall;
 33 | 
 34 |     { Pointer event handers for Text }
 35 |     procedure OnPointerEntered(sender: IInspectable; e: Windows_UI_Xaml_Input_IPointerEventArgs);
 36 |     procedure OnPointerExited(sender: IInspectable; e: Windows_UI_Xaml_Input_IPointerEventArgs);
 37 | 
 38 |     property inner: Windows_UI_Xaml_IApplicationOverrides read FInner write FInner;
 39 |   end;
 40 | 
 41 |   TPointerEventHandler = class(TInspectableObject, Windows_UI_Xaml_Input_PointerEventHandler)
 42 |   private
 43 |     FProc: TProc<IInspectable, Windows_UI_Xaml_Input_IPointerEventArgs>;
 44 |   public
 45 |     constructor Create(Proc: TProc<IInspectable, Windows_UI_Xaml_Input_IPointerEventArgs>);
 46 |     { PointerEventHandler methods }
 47 |     procedure Invoke(sender: IInspectable; e: Windows_UI_Xaml_Input_IPointerEventArgs); safecall;
 48 |   end;
 49 | 
 50 | implementation
 51 | 
 52 | { TDerivedApp }
 53 | 
 54 | procedure TDerivedApp.OnActivated(
 55 |   args: Windows_ApplicationModel_Activation_IActivatedEventArgs);
 56 | begin
 57 |   FInner.OnActivated(args);
 58 | end;
 59 | 
 60 | procedure TDerivedApp.OnFileActivated(
 61 |   args: Windows_ApplicationModel_Activation_IFileActivatedEventArgs);
 62 | begin
 63 |   FInner.OnFileActivated(args);
 64 | end;
 65 | 
 66 | procedure TDerivedApp.OnFilePickerActivated(
 67 |   args: Windows_ApplicationModel_Activation_IFilePickerActivatedEventArgs);
 68 | begin
 69 |   FInner.OnFilePickerActivated(args);
 70 | end;
 71 | 
 72 | procedure TDerivedApp.OnInitialize;
 73 | begin
 74 |   FInner.OnInitialize;
 75 | end;
 76 | 
 77 | procedure TDerivedApp.OnSearchActivated(
 78 |   args: Windows_ApplicationModel_Activation_ISearchActivatedEventArgs);
 79 | begin
 80 |   FInner.OnSearchActivated(args);
 81 | end;
 82 | 
 83 | procedure TDerivedApp.OnSharingTargetActivated(
 84 |   args: Windows_ApplicationModel_Activation_IShareTargetActivatedEventArgs);
 85 | begin
 86 |   FInner.OnSharingTargetActivated(args);
 87 | end;
 88 | 
 89 | procedure TDerivedApp.OnLaunched(
 90 |   args: Windows_ApplicationModel_Activation_ILaunchActivatedEventArgs);
 91 | const
 92 |   content =  '<Grid xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation">' +
 93 |              '  <TextBlock Name="Text" TextAlignment="Center" HorizontalAlignment="Center" VerticalAlignment="Center" FontSize="56">' +
 94 |              '    <Run Text="Hello World"/>' +
 95 |              '    <LineBreak/>' +
 96 |              '    <Run Text="Delphi"/>' +
 97 |              '  <LineBreak/>' +
 98 |              '  <Run Text="Metro Native App (Xaml)"/>' +
 99 |              '  </TextBlock>' +
100 |              '</Grid>';
101 | var
102 |   insp: IInspectable;
103 |   WinStatic: Windows_UI_Xaml_IWindowStatics;
104 |   ReaderStatic: Windows_UI_Xaml_Markup_IXamlReaderStatics;
105 |   element: Windows_UI_Xaml_IUIElement;
106 | begin
107 | 
108 |   // Get the IWindowStatics
109 |   OleCheck(RoGetActivationFactory(TWindowsString(SWindows_UI_Xaml_Window), Windows_UI_Xaml_IWindowStatics, insp));
110 |   WinStatic := insp as Windows_UI_Xaml_IWindowStatics;
111 | 
112 |   // Get an IXamlReaderStatics
113 |   OleCheck(RoGetActivationFactory(TWindowsString(SWindows_UI_Xaml_Markup_XamlReader), Windows_UI_Xaml_Markup_IXamlReaderStatics, insp));
114 |   ReaderStatic := insp as Windows_UI_Xaml_Markup_IXamlReaderStatics;
115 | 
116 |   WinStatic.Current.Content := ReaderStatic.Load(TWindowsString(content)) as Windows_UI_Xaml_IUIElement;
117 |   FInner.OnLaunched(args);
118 | 
119 |   insp := (WinStatic.Current.Content as Windows_UI_Xaml_IFrameworkElement).FindName(TWindowsString('Text'));
120 |   element := (insp as Windows_UI_Xaml_IUIElement);
121 | 
122 |   element.add_PointerEntered(TPointerEventHandler.Create(self.OnPointerEntered));
123 |   element.add_PointerExited(TPointerEventHandler.Create(self.OnPointerExited));
124 | 
125 |   WinStatic.Current.Activate;
126 | end;
127 | 
128 | procedure TDerivedApp.OnPointerEntered(sender: IInspectable;
129 |   e: Windows_UI_Xaml_Input_IPointerEventArgs);
130 | var
131 |   brush: Windows_UI_Xaml_Media_ISolidColorBrush;
132 |   insp: IInspectable;
133 |   color: IInspectable;
134 | begin
135 |   OleCheck(RoGetActivationFactory(TWindowsString(SWindows_UI_Xaml_Media_SolidColorBrush), Windows_UI_Xaml_Media_ISolidColorBrushFactory, insp));
136 |   OleCheck(RoGetActivationFactory(TWindowsString(SWindows_UI_Xaml_Media_Colors), Windows_UI_Xaml_Media_IColorsStatics, color));
137 |   brush := (insp as Windows_UI_Xaml_Media_ISolidColorBrushFactory).CreateInstanceWithColor((color as Windows_UI_Xaml_Media_IColorsStatics).Red);
138 |   (sender as Windows_UI_Xaml_Controls_ITextBlock).Foreground := (brush as Windows_UI_Xaml_Media_IBrush);
139 | end;
140 | 
141 | procedure TDerivedApp.OnPointerExited(sender: IInspectable;
142 |   e: Windows_UI_Xaml_Input_IPointerEventArgs);
143 | var
144 |   brush: Windows_UI_Xaml_Media_ISolidColorBrush;
145 |   insp: IInspectable;
146 |   color: IInspectable;
147 | begin
148 |   OleCheck(RoGetActivationFactory(TWindowsString(SWindows_UI_Xaml_Media_SolidColorBrush), Windows_UI_Xaml_Media_ISolidColorBrushFactory, insp));
149 |   OleCheck(RoGetActivationFactory(TWindowsString(SWindows_UI_Xaml_Media_Colors), Windows_UI_Xaml_Media_IColorsStatics, color));
150 |   brush := (insp as Windows_UI_Xaml_Media_ISolidColorBrushFactory).CreateInstanceWithColor((color as Windows_UI_Xaml_Media_IColorsStatics).White);
151 |   (sender as Windows_UI_Xaml_Controls_ITextBlock).Foreground := (brush as Windows_UI_Xaml_Media_IBrush);
152 | end;
153 | 
154 | { TPointerEventHandler }
155 | 
156 | constructor TPointerEventHandler.Create(
157 |   Proc: TProc<IInspectable, Windows_UI_Xaml_Input_IPointerEventArgs>);
158 | begin
159 |   FProc := Proc;
160 | end;
161 | 
162 | procedure TPointerEventHandler.Invoke(sender: IInspectable;
163 |   e: Windows_UI_Xaml_Input_IPointerEventArgs);
164 | begin
165 |   FProc(sender,  e);
166 | end;
167 | 
168 | end.
169 | 


--------------------------------------------------------------------------------
/Logo.png:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/tgerdes/DelphiWinRT/787904cc85022dc525700dccd57da68ab63ee631/Logo.png


--------------------------------------------------------------------------------
/README:
--------------------------------------------------------------------------------
 1 | This is a sample WinRT app written in Delphi. 
 2 | 
 3 | Winapi.Winrt and Winapi.Winrt_1 represent incomplete translations of headers
 4 | from the Windows 8 Developer Preview SDK. 
 5 | 
 6 | System.WinrtHelpers represents incomplete helper classes that attempt to make
 7 | working with native WinRT types simpler.
 8 | 
 9 | Use at your own risk.
10 | 
11 | NOTE: the dproj has a post build event configured that executes deploy.bat
12 | deploy.bat assumes you have a certificate installed that is capable of signing
13 | code. It also needs to be modified to check for your signature's publisher
14 | (presumably, you on a development machine). Also, the AppxManifest needs to
15 | be updated with the correct publisher information as well. Deployment is 
16 | unnecessary to run in windowed mode: deployment can be ommitted by removing
17 | the post-build event in the project options.
18 | 


--------------------------------------------------------------------------------
/SampleWinRT.dpr:
--------------------------------------------------------------------------------
 1 | {*******************************************************}
 2 | {                                                       }
 3 | {              WinRT Hello World XAML App               }
 4 | {                                                       }
 5 | { Copyright(c) 1995-2011 Embarcadero Technologies, Inc. }
 6 | {                                                       }
 7 | {*******************************************************}
 8 | 
 9 | program SampleWinRT;
10 | 
11 | uses
12 |   System.Win.ComObj,
13 |   System.SysUtils,
14 |   Winapi.Winrt in 'Winapi.Winrt.pas',
15 |   Winapi.Winrt_1 in 'Winapi.Winrt_1.pas',
16 |   HelloWorldApp in 'HelloWorldApp.pas',
17 |   System.WinrtHelpers in 'System.WinrtHelpers.pas';
18 | 
19 | procedure Main;
20 | var
21 |   insp: IInspectable;
22 |   fac: Windows_UI_Xaml_IApplicationFactory;
23 |   app: Windows_UI_Xaml_IApplication;
24 |   inner: IInspectable;
25 |   outer: TDerivedApp;
26 | begin
27 |   OleCheck(RoGetActivationFactory(TWindowsString(SWindows_UI_Xaml_Application), Windows_UI_Xaml_IApplicationFactory, insp));
28 |   outer := TDerivedApp.Create;
29 |   fac := insp as Windows_UI_Xaml_IApplicationFactory;
30 |   app := fac.CreateInstance(outer as Windows_UI_Xaml_IApplicationOverrides, inner);
31 |   outer.inner := inner as Windows_UI_Xaml_IApplicationOverrides;
32 |   app.Run;
33 |   app := nil;         // App needs to be _Released first, otherwise it AVs
34 | end;
35 | 
36 | begin
37 |   RoInitialize(RO_INIT_MULTITHREADED);
38 |   try
39 |     Main;
40 |   finally
41 |     RoUninitialize;
42 |   end;
43 | end.
44 | 


--------------------------------------------------------------------------------
/SampleWinRT.dproj:
--------------------------------------------------------------------------------
  1 | 	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
  2 | 		<PropertyGroup>
  3 | 			<ProjectGuid>{85D3A4CC-3475-4674-8CAF-043EADC6B531}</ProjectGuid>
  4 | 			<ProjectVersion>13.4</ProjectVersion>
  5 | 			<FrameworkType>None</FrameworkType>
  6 | 			<MainSource>SampleWinRT.dpr</MainSource>
  7 | 			<Base>True</Base>
  8 | 			<Config Condition="'$(Config)'==''">Debug</Config>
  9 | 			<Platform Condition="'$(Platform)'==''">Win32</Platform>
 10 | 			<TargetedPlatforms>3</TargetedPlatforms>
 11 | 			<AppType>Console</AppType>
 12 | 		</PropertyGroup>
 13 | 		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
 14 | 			<Base>true</Base>
 15 | 		</PropertyGroup>
 16 | 		<PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Base)'=='true') or '$(Base_Win64)'!=''">
 17 | 			<Base_Win64>true</Base_Win64>
 18 | 			<CfgParent>Base</CfgParent>
 19 | 			<Base>true</Base>
 20 | 		</PropertyGroup>
 21 | 		<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''">
 22 | 			<Base_Win32>true</Base_Win32>
 23 | 			<CfgParent>Base</CfgParent>
 24 | 			<Base>true</Base>
 25 | 		</PropertyGroup>
 26 | 		<PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_1)'!=''">
 27 | 			<Cfg_1>true</Cfg_1>
 28 | 			<CfgParent>Base</CfgParent>
 29 | 			<Base>true</Base>
 30 | 		</PropertyGroup>
 31 | 		<PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Cfg_1)'=='true') or '$(Cfg_1_Win64)'!=''">
 32 | 			<Cfg_1_Win64>true</Cfg_1_Win64>
 33 | 			<CfgParent>Cfg_1</CfgParent>
 34 | 			<Cfg_1>true</Cfg_1>
 35 | 			<Base>true</Base>
 36 | 		</PropertyGroup>
 37 | 		<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Cfg_1)'=='true') or '$(Cfg_1_Win32)'!=''">
 38 | 			<Cfg_1_Win32>true</Cfg_1_Win32>
 39 | 			<CfgParent>Cfg_1</CfgParent>
 40 | 			<Cfg_1>true</Cfg_1>
 41 | 			<Base>true</Base>
 42 | 		</PropertyGroup>
 43 | 		<PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_2)'!=''">
 44 | 			<Cfg_2>true</Cfg_2>
 45 | 			<CfgParent>Base</CfgParent>
 46 | 			<Base>true</Base>
 47 | 		</PropertyGroup>
 48 | 		<PropertyGroup Condition="'$(Base)'!=''">
 49 | 			<Manifest_File>None</Manifest_File>
 50 | 			<VerInfo_Locale>1033</VerInfo_Locale>
 51 | 			<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
 52 | 			<DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace)</DCC_Namespace>
 53 | 			<DCC_UsePackage>bindcompfmx;DBXSqliteDriver;fmx;rtl;IndySystem;DbxClientDriver;dbrtl;bindcomp;inetdb;DataSnapClient;DataSnapServer;DataSnapCommon;DBXInterBaseDriver;DataSnapProviderClient;xmlrtl;DbxCommonDriver;IndyProtocols;dbxcds;DBXMySQLDriver;bindengine;soaprtl;DBXOracleDriver;dsnap;DBXInformixDriver;IndyCore;fmxase;DBXFirebirdDriver;inet;fmxobj;inetdbxpress;DBXSybaseASADriver;fmxdae;IPIndyImpl;dbexpress;DataSnapIndy10ServerTransport;$(DCC_UsePackage)</DCC_UsePackage>
 54 | 			<PostBuildEvent><![CDATA[deploy.bat $(projectname) "$(platform)\$(config)"
 55 | $(PostBuildEvent)]]></PostBuildEvent>
 56 | 			<DCC_DcuOutput>.\$(Platform)\$(Config)</DCC_DcuOutput>
 57 | 			<DCC_ExeOutput>.\$(Platform)\$(Config)\package</DCC_ExeOutput>
 58 | 			<DCC_E>false</DCC_E>
 59 | 			<DCC_N>false</DCC_N>
 60 | 			<DCC_S>false</DCC_S>
 61 | 			<DCC_F>false</DCC_F>
 62 | 			<DCC_K>false</DCC_K>
 63 | 		</PropertyGroup>
 64 | 		<PropertyGroup Condition="'$(Base_Win64)'!=''">
 65 | 			<DCC_UsePackage>DBXOdbcDriver;DBXSybaseASEDriver;vclimg;vclactnband;vcldb;vcldsnap;bindcompvcl;vclie;DBXDb2Driver;vcltouch;websnap;VclSmp;vcl;DBXMSSQLDriver;dsnapcon;vclx;webdsnap;adortl;$(DCC_UsePackage)</DCC_UsePackage>
 66 | 			<DCC_Namespace>Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace)</DCC_Namespace>
 67 | 			<VerInfo_Locale>1033</VerInfo_Locale>
 68 | 			<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
 69 | 		</PropertyGroup>
 70 | 		<PropertyGroup Condition="'$(Base_Win32)'!=''">
 71 | 			<DCC_Namespace>Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
 72 | 			<DCC_UsePackage>vcldbx;TeeDB;inetdbbde;vclib;DBXOdbcDriver;Tee;DBXSybaseASEDriver;ibxpress;svnui;vclimg;fmi;vclactnband;vcldb;FMXTee;vcldsnap;bindcompvcl;TeeUI;vclie;DBXDb2Driver;vcltouch;websnap;vclribbon;VclSmp;vcl;DataSnapConnectors;CloudService;DBXMSSQLDriver;FmxTeeUI;dsnapcon;vclx;webdsnap;svn;bdertl;adortl;$(DCC_UsePackage)</DCC_UsePackage>
 73 | 		</PropertyGroup>
 74 | 		<PropertyGroup Condition="'$(Cfg_1)'!=''">
 75 | 			<DCC_Define>DEBUG;$(DCC_Define)</DCC_Define>
 76 | 			<DCC_Optimize>false</DCC_Optimize>
 77 | 			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
 78 | 			<DCC_DebugInfoInExe>true</DCC_DebugInfoInExe>
 79 | 			<DCC_RemoteDebug>true</DCC_RemoteDebug>
 80 | 		</PropertyGroup>
 81 | 		<PropertyGroup Condition="'$(Cfg_1_Win64)'!=''">
 82 | 			<Manifest_File>None</Manifest_File>
 83 | 			<VerInfo_Locale>1033</VerInfo_Locale>
 84 | 		</PropertyGroup>
 85 | 		<PropertyGroup Condition="'$(Cfg_1_Win32)'!=''">
 86 | 			<DCC_ExeOutput>.\$(Platform)\$(Config)\package</DCC_ExeOutput>
 87 | 			<Manifest_File>None</Manifest_File>
 88 | 			<VerInfo_Locale>1033</VerInfo_Locale>
 89 | 			<DCC_RemoteDebug>false</DCC_RemoteDebug>
 90 | 		</PropertyGroup>
 91 | 		<PropertyGroup Condition="'$(Cfg_2)'!=''">
 92 | 			<DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols>
 93 | 			<DCC_Define>RELEASE;$(DCC_Define)</DCC_Define>
 94 | 			<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
 95 | 			<DCC_DebugInformation>false</DCC_DebugInformation>
 96 | 		</PropertyGroup>
 97 | 		<ItemGroup>
 98 | 			<DelphiCompile Include="$(MainSource)">
 99 | 				<MainSource>MainSource</MainSource>
100 | 			</DelphiCompile>
101 | 			<DCCReference Include="Winapi.Winrt.pas"/>
102 | 			<DCCReference Include="Winapi.Winrt_1.pas"/>
103 | 			<DCCReference Include="HelloWorldApp.pas"/>
104 | 			<DCCReference Include="System.WinrtHelpers.pas"/>
105 | 			<RcItem Include="SplashScreen.png">
106 | 				<ResourceType>RCDATA</ResourceType>
107 | 				<ResourceId>PngImage_1</ResourceId>
108 | 			</RcItem>
109 | 			<RcItem Include="StoreLogo.png">
110 | 				<ResourceType>RCDATA</ResourceType>
111 | 				<ResourceId>PngImage_2</ResourceId>
112 | 			</RcItem>
113 | 			<RcItem Include="Logo.png">
114 | 				<ResourceType>RCDATA</ResourceType>
115 | 				<ResourceId>PngImage_3</ResourceId>
116 | 			</RcItem>
117 | 			<RcItem Include="SmallLogo.png">
118 | 				<ResourceType>RCDATA</ResourceType>
119 | 				<ResourceId>PngImage_4</ResourceId>
120 | 			</RcItem>
121 | 			<None Include="AppxManifest.xml"/>
122 | 			<None Include="deploy.bat"/>
123 | 			<BuildConfiguration Include="Release">
124 | 				<Key>Cfg_2</Key>
125 | 				<CfgParent>Base</CfgParent>
126 | 			</BuildConfiguration>
127 | 			<BuildConfiguration Include="Base">
128 | 				<Key>Base</Key>
129 | 			</BuildConfiguration>
130 | 			<BuildConfiguration Include="Debug">
131 | 				<Key>Cfg_1</Key>
132 | 				<CfgParent>Base</CfgParent>
133 | 			</BuildConfiguration>
134 | 		</ItemGroup>
135 | 		<ProjectExtensions>
136 | 			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
137 | 			<Borland.ProjectType/>
138 | 			<BorlandProject>
139 | 				<Delphi.Personality>
140 | 					<VersionInfo>
141 | 						<VersionInfo Name="IncludeVerInfo">False</VersionInfo>
142 | 						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
143 | 						<VersionInfo Name="MajorVer">1</VersionInfo>
144 | 						<VersionInfo Name="MinorVer">0</VersionInfo>
145 | 						<VersionInfo Name="Release">0</VersionInfo>
146 | 						<VersionInfo Name="Build">0</VersionInfo>
147 | 						<VersionInfo Name="Debug">False</VersionInfo>
148 | 						<VersionInfo Name="PreRelease">False</VersionInfo>
149 | 						<VersionInfo Name="Special">False</VersionInfo>
150 | 						<VersionInfo Name="Private">False</VersionInfo>
151 | 						<VersionInfo Name="DLL">False</VersionInfo>
152 | 						<VersionInfo Name="Locale">1033</VersionInfo>
153 | 						<VersionInfo Name="CodePage">1252</VersionInfo>
154 | 					</VersionInfo>
155 | 					<VersionInfoKeys>
156 | 						<VersionInfoKeys Name="CompanyName"/>
157 | 						<VersionInfoKeys Name="FileDescription"/>
158 | 						<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
159 | 						<VersionInfoKeys Name="InternalName"/>
160 | 						<VersionInfoKeys Name="LegalCopyright"/>
161 | 						<VersionInfoKeys Name="LegalTrademarks"/>
162 | 						<VersionInfoKeys Name="OriginalFilename"/>
163 | 						<VersionInfoKeys Name="ProductName"/>
164 | 						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
165 | 						<VersionInfoKeys Name="Comments"/>
166 | 					</VersionInfoKeys>
167 | 					<Source>
168 | 						<Source Name="MainSource">SampleWinRT.dpr</Source>
169 | 					</Source>
170 | 				</Delphi.Personality>
171 | 				<Deployment>
172 | 					<DeployFile Class="ProjectOutput" Configuration="Release" LocalName="Win32\Release\package\SampleWinRT.exe">
173 | 						<Platform Name="Win32"/>
174 | 					</DeployFile>
175 | 					<DeployFile Class="DebugSymbols" Configuration="Release" LocalName="Win32\Release\package\SampleWinRT.rsm">
176 | 						<Platform Name="Win32">
177 | 							<RemoteName>SampleWinRT.rsm</RemoteName>
178 | 						</Platform>
179 | 					</DeployFile>
180 | 					<DeployFile Class="DependencyModule" LocalName="$(BDS)\Redist\osx32\libcgunwind.1.0.dylib">
181 | 						<Platform Name="OSX32"/>
182 | 					</DeployFile>
183 | 					<DeployClass Name="ProjectOutput" Required="true">
184 | 						<Platform Name="OSX32">
185 | 							<Operation>1</Operation>
186 | 						</Platform>
187 | 						<Platform Name="Win32">
188 | 							<Operation>0</Operation>
189 | 						</Platform>
190 | 					</DeployClass>
191 | 					<DeployClass Name="DependencyPackage" Required="true">
192 | 						<Platform Name="OSX32">
193 | 							<Operation>1</Operation>
194 | 							<Extensions>.dylib</Extensions>
195 | 						</Platform>
196 | 						<Platform Name="Win32">
197 | 							<Operation>0</Operation>
198 | 							<Extensions>.bpl</Extensions>
199 | 						</Platform>
200 | 					</DeployClass>
201 | 					<DeployClass Name="DependencyModule">
202 | 						<Platform Name="OSX32">
203 | 							<Operation>1</Operation>
204 | 							<Extensions>.dylib</Extensions>
205 | 						</Platform>
206 | 						<Platform Name="Win32">
207 | 							<Operation>0</Operation>
208 | 							<Extensions>.dll;.bpl</Extensions>
209 | 						</Platform>
210 | 					</DeployClass>
211 | 					<DeployClass Name="ProjectOSXInfoPList"/>
212 | 					<DeployClass Name="File">
213 | 						<Platform Name="OSX32">
214 | 							<Operation>0</Operation>
215 | 						</Platform>
216 | 						<Platform Name="Win32">
217 | 							<Operation>0</Operation>
218 | 						</Platform>
219 | 					</DeployClass>
220 | 					<DeployClass Name="DebugSymbols">
221 | 						<Platform Name="OSX32">
222 | 							<Operation>1</Operation>
223 | 						</Platform>
224 | 						<Platform Name="Win32">
225 | 							<Operation>0</Operation>
226 | 						</Platform>
227 | 					</DeployClass>
228 | 					<DeployClass Name="DependencyFramework">
229 | 						<Platform Name="OSX32">
230 | 							<Operation>1</Operation>
231 | 							<Extensions>.framework</Extensions>
232 | 						</Platform>
233 | 						<Platform Name="Win32">
234 | 							<Operation>0</Operation>
235 | 						</Platform>
236 | 					</DeployClass>
237 | 					<DeployClass Name="AdditionalDebugSymbols">
238 | 						<Platform Name="OSX32">
239 | 							<Operation>1</Operation>
240 | 						</Platform>
241 | 						<Platform Name="Win32">
242 | 							<Operation>0</Operation>
243 | 						</Platform>
244 | 					</DeployClass>
245 | 					<DeployClass Name="ProjectOSXResource">
246 | 						<Platform Name="OSX32">
247 | 							<RemoteDir>Contents\Resources</RemoteDir>
248 | 							<Operation>1</Operation>
249 | 						</Platform>
250 | 					</DeployClass>
251 | 					<ProjectRoot Name="$(PROJECTNAME)" Platform="OSX32"/>
252 | 					<ProjectRoot Name="$(PROJECTNAME)" Platform="Win64"/>
253 | 					<ProjectRoot Name="$(PROJECTNAME)" Platform="Win32"/>
254 | 				</Deployment>
255 | 				<Platforms>
256 | 					<Platform value="Win64">True</Platform>
257 | 					<Platform value="OSX32">False</Platform>
258 | 					<Platform value="Win32">True</Platform>
259 | 				</Platforms>
260 | 			</BorlandProject>
261 | 			<ProjectFileVersion>12</ProjectFileVersion>
262 | 		</ProjectExtensions>
263 | 		<Import Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')" Project="$(BDS)\Bin\CodeGear.Delphi.Targets"/>
264 | 		<Import Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')" Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj"/>
265 | 		<Import Condition="Exists('$(MSBuildProjectName).deployproj')" Project="$(MSBuildProjectName).deployproj"/>
266 | 		<PropertyGroup Condition="'$(Config)'=='Debug' And '$(Platform)'=='Win64'">
267 | 			<PreBuildEvent/>
268 | 			<PreBuildEventIgnoreExitCode>False</PreBuildEventIgnoreExitCode>
269 | 			<PreLinkEvent/>
270 | 			<PreLinkEventIgnoreExitCode>False</PreLinkEventIgnoreExitCode>
271 | 			<PostBuildEvent>deploy.bat $(projectname) &quot;$(platform)\$(config)&quot;</PostBuildEvent>
272 | 			<PostBuildEventIgnoreExitCode>False</PostBuildEventIgnoreExitCode>
273 | 		</PropertyGroup>
274 | 		<PropertyGroup Condition="'$(Config)'=='Debug' And '$(Platform)'=='OSX32'">
275 | 			<PreBuildEvent/>
276 | 			<PreBuildEventIgnoreExitCode>False</PreBuildEventIgnoreExitCode>
277 | 			<PreLinkEvent/>
278 | 			<PreLinkEventIgnoreExitCode>False</PreLinkEventIgnoreExitCode>
279 | 			<PostBuildEvent>deploy.bat $(projectname) &quot;$(platform)\$(config)&quot;</PostBuildEvent>
280 | 			<PostBuildEventIgnoreExitCode>False</PostBuildEventIgnoreExitCode>
281 | 		</PropertyGroup>
282 | 		<PropertyGroup Condition="'$(Config)'=='Debug' And '$(Platform)'=='Win32'">
283 | 			<PreBuildEvent/>
284 | 			<PreBuildEventIgnoreExitCode>False</PreBuildEventIgnoreExitCode>
285 | 			<PreLinkEvent/>
286 | 			<PreLinkEventIgnoreExitCode>False</PreLinkEventIgnoreExitCode>
287 | 			<PostBuildEvent>deploy.bat $(projectname) &quot;$(platform)\$(config)&quot;</PostBuildEvent>
288 | 			<PostBuildEventIgnoreExitCode>False</PostBuildEventIgnoreExitCode>
289 | 		</PropertyGroup>
290 | 		<PropertyGroup Condition="'$(Config)'=='Release' And '$(Platform)'=='Win64'">
291 | 			<PreBuildEvent/>
292 | 			<PreBuildEventIgnoreExitCode>False</PreBuildEventIgnoreExitCode>
293 | 			<PreLinkEvent/>
294 | 			<PreLinkEventIgnoreExitCode>False</PreLinkEventIgnoreExitCode>
295 | 			<PostBuildEvent>deploy.bat $(projectname) &quot;$(platform)\$(config)&quot;</PostBuildEvent>
296 | 			<PostBuildEventIgnoreExitCode>False</PostBuildEventIgnoreExitCode>
297 | 		</PropertyGroup>
298 | 		<PropertyGroup Condition="'$(Config)'=='Release' And '$(Platform)'=='OSX32'">
299 | 			<PreBuildEvent/>
300 | 			<PreBuildEventIgnoreExitCode>False</PreBuildEventIgnoreExitCode>
301 | 			<PreLinkEvent/>
302 | 			<PreLinkEventIgnoreExitCode>False</PreLinkEventIgnoreExitCode>
303 | 			<PostBuildEvent>deploy.bat $(projectname) &quot;$(platform)\$(config)&quot;</PostBuildEvent>
304 | 			<PostBuildEventIgnoreExitCode>False</PostBuildEventIgnoreExitCode>
305 | 		</PropertyGroup>
306 | 		<PropertyGroup Condition="'$(Config)'=='Release' And '$(Platform)'=='Win32'">
307 | 			<PreBuildEvent/>
308 | 			<PreBuildEventIgnoreExitCode>False</PreBuildEventIgnoreExitCode>
309 | 			<PreLinkEvent/>
310 | 			<PreLinkEventIgnoreExitCode>False</PreLinkEventIgnoreExitCode>
311 | 			<PostBuildEvent>deploy.bat $(projectname) &quot;$(platform)\$(config)&quot;</PostBuildEvent>
312 | 			<PostBuildEventIgnoreExitCode>False</PostBuildEventIgnoreExitCode>
313 | 		</PropertyGroup>
314 | 	</Project>
315 | 


--------------------------------------------------------------------------------
/SmallLogo.png:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/tgerdes/DelphiWinRT/787904cc85022dc525700dccd57da68ab63ee631/SmallLogo.png


--------------------------------------------------------------------------------
/SplashScreen.png:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/tgerdes/DelphiWinRT/787904cc85022dc525700dccd57da68ab63ee631/SplashScreen.png


--------------------------------------------------------------------------------
/StoreLogo.png:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/tgerdes/DelphiWinRT/787904cc85022dc525700dccd57da68ab63ee631/StoreLogo.png


--------------------------------------------------------------------------------
/System.WinrtHelpers.pas:
--------------------------------------------------------------------------------
  1 | {*******************************************************}
  2 | {                                                       }
  3 | {           CodeGear Delphi Runtime Library             }
  4 | {                                                       }
  5 | { Copyright(c) 1995-2011 Embarcadero Technologies, Inc. }
  6 | {                                                       }
  7 | {*******************************************************}
  8 | 
  9 | // Helper utililities for dealing with WinRT interfaces and strings.
 10 | 
 11 | unit System.WinrtHelpers;
 12 | 
 13 | interface
 14 | 
 15 | uses
 16 |   System.Win.ComObj,
 17 |   System.SysUtils,
 18 |   System.RTLConsts,
 19 |   System.Math,
 20 |   Winapi.Winrt,
 21 |   System.RTTI;
 22 | 
 23 | type
 24 |   TInspectableObject = class(TInterfacedObject, IInspectable)
 25 |   private
 26 |     FIIDS: array of TGUID;
 27 |   public
 28 |     function GetIids(out iidCount: Cardinal; out iids: PGUID): HRESULT; stdcall;
 29 |     function GetRuntimeClassName(out className: HSTRING): HRESULT; stdcall;
 30 |     function GetTrustLevel(out trust: TrustLevel): HRESULT; stdcall;
 31 |   end;
 32 | 
 33 |   TWindowsString = record
 34 |   strict private type
 35 |     TWindowsStringNexus = class(TInterfacedObject)
 36 |     private
 37 |       FString: HSTRING;
 38 |     public
 39 |       constructor Create(AString: HSTRING);
 40 |       destructor Destroy; override;
 41 |     end;
 42 |     PWindowsString = ^TWindowsString;
 43 |   private
 44 |     FNexus: IInterface;
 45 |     FHandle: HSTRING;
 46 |   public
 47 |     constructor Create(const S: string); overload;
 48 |     class operator Implicit(const S: TWindowsString): HSTRING; inline;
 49 |     class operator Explicit(const S: string): TWindowsString;
 50 |   end;
 51 | 
 52 | 
 53 | implementation
 54 | 
 55 | { TInspectableObject }
 56 | function TInspectableObject.GetIids(out iidCount: Cardinal;
 57 |   out iids: PGUID): HRESULT;
 58 | var
 59 |   cxt: TRttiContext;
 60 |   typ: TRttiType;
 61 |   intfTable: PInterfaceTable;
 62 | begin
 63 |   if Length(FIIDS) = 0 then
 64 |   begin
 65 |     cxt :=TRttiContext.Create;
 66 |     try
 67 |       typ := cxt.GetType(Self.ClassType);
 68 |       intfTable := typ.GetInterfaceTable;
 69 |       SetLength(FIIDS, intfTable^.EntryCount-2);
 70 | 
 71 |       Move(intfTable^.Entries[0], FIIDs[0], intfTable^.EntryCount);
 72 |     finally
 73 |       cxt.Free;
 74 |     end;
 75 |   end;
 76 |   iidCount := Length(FIIDS);
 77 |   if Length(Fiids) > 0 then
 78 |     iids := @Fiids[0]
 79 |   else
 80 |     IIDs := nil;
 81 |   Result := S_OK;
 82 | end;
 83 | 
 84 | function TInspectableObject.GetRuntimeClassName(
 85 |   out className: HSTRING): HRESULT;
 86 | var
 87 |   str: string;
 88 | begin
 89 |   str := self.ClassName;
 90 |   Result := WindowsCreateString(@Str[1], Length(str), className);
 91 | 
 92 | end;
 93 | 
 94 | function TInspectableObject.GetTrustLevel(out trust: TrustLevel): HRESULT;
 95 | begin
 96 |   trust := TrustLevel.BaseTrust; // TODO: Implement someway to override
 97 |   Result := S_OK;
 98 | end;
 99 | 
100 | 
101 | { TWindowsString.TWindowsStringNexus }
102 | 
103 | constructor TWindowsString.TWindowsStringNexus.Create(AString: HSTRING);
104 | begin
105 |   inherited Create;
106 |   FString := AString;
107 | end;
108 | 
109 | destructor TWindowsString.TWindowsStringNexus.Destroy;
110 | begin
111 |   WindowsDeleteString(FString);
112 |   inherited Destroy;
113 | end;
114 | 
115 | { TWindowsString }
116 | 
117 | constructor TWindowsString.Create(const S: string);
118 | begin
119 |   OleCheck(WindowsCreateString(PChar(S), System.Length(S), FHandle));
120 |   FNexus := TWindowsStringNexus.Create(FHandle);
121 | end;
122 | 
123 | class operator TWindowsString.Explicit(const S: string): TWindowsString;
124 | begin
125 |   Result := TWindowsString.Create(S);
126 | end;
127 | 
128 | class operator TWindowsString.Implicit(const S: TWindowsString): HSTRING;
129 | begin
130 |   Result := S.FHandle;
131 | end;
132 | 
133 | end.
134 | 


--------------------------------------------------------------------------------
/Winapi.Winrt.pas:
--------------------------------------------------------------------------------
 1 | {*******************************************************}
 2 | {                                                       }
 3 | {           CodeGear Delphi Runtime Library             }
 4 | {                                                       }
 5 | { Copyright(c) 1995-2011 Embarcadero Technologies, Inc. }
 6 | {                                                       }
 7 | {*******************************************************}
 8 | 
 9 | // Translation of selected apis from winrt.h
10 | // Copyright (C) Microsoft Corporation. All rights reserved.
11 | 
12 | unit Winapi.Winrt;
13 | 
14 | interface
15 | 
16 | uses
17 |   Winapi.Windows;
18 | 
19 | const
20 |   winrtstring           = 'api-ms-win-core-winrt-string-l1-1-0.dll';
21 |   winrtcore             = 'api-ms-win-core-winrt-l1-1-0.dll';
22 | 
23 |   ///// Strings
24 | type
25 |   PCNZWCH = PWideChar;
26 |   PCSTR = PWideChar;
27 |   HSTRING = type THandle;
28 | 
29 | function WindowsCreateString(sourceString: PCNZWCH; length: UINT32;
30 |   out Str: HSTRING): HRESULT; stdcall;
31 |   external winrtstring name 'WindowsCreateString';
32 | 
33 | function WindowsDeleteString(Str: HSTRING): HRESULT; stdcall;
34 |   external winrtstring name 'WindowsDeleteString';
35 | 
36 | type
37 |   RO_INIT_TYPE = (RO_INIT_SINGLETHREADED, RO_INIT_MULTITHREADED);
38 |   TrustLevel = (BaseTrust, PartialTrust	= (BaseTrust + 1), FullTrust = (PartialTrust + 1));
39 |   IInspectable = interface
40 |     ['{AF86E2E0-B12D-4c6a-9C5A-D7AA65101E90}']
41 |     function GetIids(out iidCount: Cardinal; out iids: PGUID): HRESULT; stdcall;
42 |     function GetRuntimeClassName(out className: HSTRING): HRESULT; stdcall;
43 |     function GetTrustLevel(out trust: TrustLevel): HRESULT; stdcall;
44 |   end;
45 | 
46 | function RoInitialize(InitType: RO_INIT_TYPE): HRESULT; stdcall;
47 |   external winrtcore name 'RoInitialize';
48 | 
49 | procedure RoUninitialize; stdcall;
50 |   external winrtcore name 'RoUninitialize';
51 | 
52 | function RoGetActivationFactory(activatableClassId: HSTRING; const iid: TGUID;
53 |   out outfactory: IInspectable): HRESULT; stdcall;
54 |   external winrtcore name 'RoGetActivationFactory';
55 | 
56 | implementation
57 | 
58 | end.
59 | 


--------------------------------------------------------------------------------
/Winapi.Winrt_1.pas:
--------------------------------------------------------------------------------
  1 | {*******************************************************}
  2 | {                                                       }
  3 | {           CodeGear Delphi Runtime Library             }
  4 | {                                                       }
  5 | { Copyright(c) 1995-2011 Embarcadero Technologies, Inc. }
  6 | {                                                       }
  7 | {*******************************************************}
  8 | 
  9 | // Generated interfaces from *.winmd provided by Windows Kit 8.0 in
 10 | // Windows 8 Developer Preview.
 11 | 
 12 | unit Winapi.Winrt_1;
 13 | 
 14 | interface
 15 | {$SCOPEDENUMS ON}
 16 | 
 17 | uses
 18 |   System.Types,
 19 |   Winapi.WinRt;
 20 | 
 21 | // Activatiable class IDs.
 22 | const
 23 |   SWindows_UI_Xaml_Application = 'Windows.UI.Xaml.Application';
 24 |   SWindows_UI_Xaml_Window = 'Windows.UI.Xaml.Window';
 25 |   SWindows_UI_Xaml_Markup_XamlReader = 'Windows.UI.Xaml.Markup.XamlReader';
 26 |   SWindows_UI_Xaml_Media_SolidColorBrush = 'Windows.UI.Xaml.Media.SolidColorBrush';
 27 |   SWindows_UI_Xaml_Media_Colors = 'Windows.UI.Xaml.Media.Colors';
 28 | 
 29 | type
 30 |   Windows_UI_Xaml_IUIElement = interface;
 31 | 
 32 | {$REGION 'NOTE: The following hidden stub interfaces are not fully defined'}
 33 |   /// The following are included for the sake of having the paramaters of other interfaces
 34 |   /// be fully defined. These interfaces are not fully defined, and should be expanded upon
 35 |   ///  before attempting to actually using them.
 36 | 
 37 |   // Windows.ApplicationModel.Activation.IActivatedEventArgs
 38 |   Windows_ApplicationModel_Activation_IActivatedEventArgs = interface(IInspectable)
 39 |   ['{CF651713-CD08-4FD8-B697-A281B6544E2E}']
 40 |   end;
 41 | 
 42 |   // Windows.ApplicationModel.Activation.ISearchActivatedEventArgs
 43 |   Windows_ApplicationModel_Activation_ISearchActivatedEventArgs = interface(IInspectable)
 44 |   ['{8CB36951-58C8-43E3-94BC-41D33F8B630E}']
 45 |   end;
 46 | 
 47 |   // Windows.ApplicationModel.Activation.IFileActivatedEventArgs
 48 |   Windows_ApplicationModel_Activation_IFileActivatedEventArgs = interface(IInspectable)
 49 |   ['{BB2AFC33-93B1-42ED-8B26-236DD9C78496}']
 50 |   end;
 51 | 
 52 |   // Windows.ApplicationModel.Activation.IShareTargetActivatedEventArgs
 53 |   Windows_ApplicationModel_Activation_IShareTargetActivatedEventArgs = interface(IInspectable)
 54 |   ['{4BDAF9C8-CDB2-4ACB-BFC3-6648563378EC}']
 55 |   end;
 56 | 
 57 |   // Windows.ApplicationModel.Activation.IFilePickerActivatedEventArgs
 58 |   Windows_ApplicationModel_Activation_IFilePickerActivatedEventArgs = interface(IInspectable)
 59 |   ['{16C9F7AC-AD28-4AD1-BFD6-A1FE93CFB067}']
 60 |   end;
 61 | 
 62 |   // Windows.UI.Xaml.IResourceDictionary
 63 |   Windows_UI_Xaml_IResourceDictionary = interface(IInspectable)
 64 |   ['{C1EA4F24-D6DE-4191-8E3A-F48601F7489C}']
 65 |   end;
 66 | 
 67 |   Windows_UI_Xaml_UnhandledExceptionEventHandler = interface(IUnknown)
 68 |   ['{9274E6BD-49A1-4958-BEEE-D0E19587B6E3}']
 69 |   end;
 70 | 
 71 |   // Windows.UI.Xaml.SuspendingEventHandler
 72 |   Windows_UI_Xaml_SuspendingEventHandler = interface(IUnknown)
 73 |   ['{23429465-E36A-40E2-B139-A4704602A6E1}']
 74 |   end;
 75 | 
 76 |   // Windows.UI.Xaml.EventHandler
 77 |   Windows_UI_Xaml_EventHandler = interface(IUnknown)
 78 |   ['{E3906FD9-4D1B-4AC8-A43C-C3B908742798}']
 79 |   end;
 80 | 
 81 |   // Windows.UI.Core.ICoreWindow
 82 |   Windows_UI_Core_ICoreWindow = interface(IInspectable)
 83 |   ['{C3D6D96B-DA44-4833-B230-E5712686F480}']
 84 |   end;
 85 | 
 86 |   // Windows.UI.Core.ICoreDispatcher
 87 |   Windows_UI_Core_ICoreDispatcher = interface(IInspectable)
 88 |   ['{21BC94F8-D659-4895-880E-8DA6570DF6B1}']
 89 |   end;
 90 | 
 91 |   // Windows.UI.Xaml.WindowActivatedEventHandler
 92 |   Windows_UI_Xaml_WindowActivatedEventHandler = interface(IUnknown)
 93 |   ['{18026348-8619-4C7B-B534-CED45D9DE219}']
 94 |   end;
 95 | 
 96 |   // Windows.UI.Xaml.WindowClosedEventHandler
 97 |   Windows_UI_Xaml_WindowClosedEventHandler = interface(IUnknown)
 98 |   ['{0DB89161-20D7-45DF-9122-BA89576703BA}']
 99 |   end;
100 | 
101 |   // Windows.UI.Xaml.WindowSizeChangedEventHandler
102 |   Windows_UI_Xaml_WindowSizeChangedEventHandler = interface(IUnknown)
103 |   ['{5C21C742-2CED-4FD9-BA38-7118D40E966B}']
104 |   end;
105 | 
106 |   // Windows.Foundation.Collections.IVector`1<Windows.UI.Xaml.ITriggerBase>
107 |   Windows_Foundation_Collections_IVector_1__Windows_UI_Xaml_ITriggerBase = interface(IInspectable)
108 |   ['{D2807252-3DB0-59BC-9E62-833B48C910AE}']
109 |   end;
110 | 
111 |   // Windows.Foundation.IUriRuntimeClass
112 |   Windows_Foundation_IUriRuntimeClass = interface(IInspectable)
113 |   ['{8D184E6E-FC32-45C9-A98F-86E25688C660}']
114 |   end;
115 | 
116 |   // Windows.UI.Xaml.IStyle
117 |   Windows_UI_Xaml_IStyle = interface(IInspectable)
118 |   ['{C4A9F225-9DB7-4A7D-B6D1-F74EDB9293C2}']
119 |   end;
120 | 
121 |   // Windows.UI.Xaml.IDependencyObject
122 |   Windows_UI_Xaml_IDependencyObject = interface(IInspectable)
123 |   ['{5C526665-F60E-4912-AF59-5FE0680F089D}']
124 |   end;
125 | 
126 |   // Windows.UI.Xaml.RoutedEventHandler
127 |   Windows_UI_Xaml_RoutedEventHandler = interface(IUnknown)
128 |   ['{A856E674-B0B6-4BC3-BBA8-1BA06E40D4B5}']
129 |   end;
130 | 
131 |   // Windows.UI.Xaml.SizeChangedEventHandler
132 |   Windows_UI_Xaml_SizeChangedEventHandler = interface(IUnknown)
133 |   ['{1115B13C-25D2-480B-89DC-EB3DCBD6B7FA}']
134 |   end;
135 | 
136 |   // Windows.UI.Xaml.IDependencyProperty
137 |   Windows_UI_Xaml_IDependencyProperty = interface(IInspectable)
138 |   ['{85B13970-9BC4-4E96-ACF1-30C8FD3D55C8}']
139 |   end;
140 | 
141 |   // Windows.UI.Xaml.Input.IPointer
142 |   Windows_UI_Xaml_Input_IPointer = interface(IInspectable)
143 |   ['{5EE8F39F-747D-4171-90E6-CD37A9DFFB11}']
144 |   end;
145 | 
146 |   // Windows.UI.Input.IPointerPoint
147 |   Windows_UI_Input_IPointerPoint = interface(IInspectable)
148 |   ['{E995317D-7296-42D9-8233-C5BE73B74A4A}']
149 |   end;
150 | 
151 |   // Windows.Foundation.Collections.IVector`1<Windows.UI.Input.IPointerPoint>
152 |   Windows_Foundation_Collections_IVector_1__Windows_UI_Input_IPointerPoint = interface(IInspectable)
153 |   ['{73154191-695C-5F04-9D43-911CB8336411}']
154 |   end;
155 | 
156 |   // Windows.Foundation.Collections.IVector`1<Windows.UI.Xaml.Media.Animation.ITransition>
157 |   Windows_Foundation_Collections_IVector_1__Windows_UI_Xaml_Media_Animation_ITransition = interface(IInspectable)
158 |   ['{7F1E9E51-5413-5039-8B37-34D9B8E8C125}']
159 |   end;
160 | 
161 |   // Windows.Foundation.Collections.IVectorView`1<Windows.UI.Xaml.Input.IPointer>
162 |   Windows_Foundation_Collections_IVectorView_1__Windows_UI_Xaml_Input_IPointer = interface(IInspectable)
163 |   ['{879A97D2-041F-5B03-A17D-213B7030EDED}']
164 |   end;
165 | 
166 |   // Windows.UI.Xaml.Input.KeyEventHandler
167 |   Windows_UI_Xaml_Input_KeyEventHandler = interface(IUnknown)
168 |   ['{7C63D2E5-7A0E-4E12-B96A-7715AA6FF1C8}']
169 |   end;
170 | 
171 |   // Windows.UI.Xaml.DragEventHandler
172 |   Windows_UI_Xaml_DragEventHandler = interface(IUnknown)
173 |   ['{2AB1A205-1E73-4BCF-AABC-57B97E21961D}']
174 |   end;
175 | 
176 |   // Windows.UI.Xaml.Input.TappedEventHandler
177 |   Windows_UI_Xaml_Input_TappedEventHandler = interface(IUnknown)
178 |   end;
179 | 
180 |   // Windows.UI.Xaml.Input.DoubleTappedEventHandler
181 |   Windows_UI_Xaml_Input_DoubleTappedEventHandler = interface(IUnknown)
182 |   ['{3124D025-04A7-4D45-825E-8204A624DBF4}']
183 |   end;
184 | 
185 |   // Windows.UI.Xaml.Input.HoldingEventHandler
186 |   Windows_UI_Xaml_Input_HoldingEventHandler = interface(IUnknown)
187 |   ['{ECAE8CCD-8E5E-4FBE-9846-30A6370AFCDF}']
188 |   end;
189 | 
190 |   // Windows.UI.Xaml.Input.RightTappedEventHandler
191 |   Windows_UI_Xaml_Input_RightTappedEventHandler = interface(IUnknown)
192 |   ['{2532A062-F447-4950-9C46-F1E34A2C2238}']
193 |   end;
194 | 
195 |   // Windows.UI.Xaml.Input.ManipulationStartingEventHandler
196 |   Windows_UI_Xaml_Input_ManipulationStartingEventHandler = interface(IUnknown)
197 |   ['{10D0B04E-BFE4-42CB-823C-3FECD8770EF8}']
198 |   end;
199 | 
200 |   // Windows.UI.Xaml.Input.ManipulationStartedEventHandler
201 |   Windows_UI_Xaml_Input_ManipulationStartedEventHandler = interface(IUnknown)
202 |   ['{F88345F8-E0A3-4BE2-B90C-DC20E6D8BEB0}']
203 |   end;
204 | 
205 |   // Windows.UI.Xaml.Input.ManipulationInertiaStartingEventHandler
206 |   Windows_UI_Xaml_Input_ManipulationInertiaStartingEventHandler = interface(IUnknown)
207 |   ['{D39D6322-7C9C-481B-827B-C8B2D9BB6FC7}']
208 |   end;
209 | 
210 |   // Windows.UI.Xaml.Input.ManipulationDeltaEventHandler
211 |   Windows_UI_Xaml_Input_ManipulationDeltaEventHandler = interface(IUnknown)
212 |   ['{AA1160CB-DFB9-4C56-ABDC-711B63C8EB94}']
213 |   end;
214 | 
215 |   // Windows.UI.Xaml.Input.ManipulationCompletedEventHandler
216 |   Windows_UI_Xaml_Input_ManipulationCompletedEventHandler = interface(IUnknown)
217 |   ['{38EF4B0F-14F8-42DF-9A1E-A4BCC4AF77F4}']
218 |   end;
219 | 
220 |   // Windows.UI.Xaml.Media.IGeneralTransform
221 |   Windows_UI_Xaml_Media_IGeneralTransform = interface(IInspectable)
222 |   ['{A06798B7-A2EC-415F-ADE2-EADE9333F2C7}']
223 |   end;
224 | 
225 |   // Windows.UI.Xaml.Media.IBrush
226 |   Windows_UI_Xaml_Media_IBrush = interface(IInspectable)
227 |   ['{8806A321-1E06-422C-A1CC-01696559E021}']
228 |   end;
229 | 
230 |   // Windows.Foundation.Collections.IVector`1<Windows.UI.Xaml.Documents.IInline>
231 |   Windows_Foundation_Collections_IVector_1__Windows_UI_Xaml_Documents_IInline = interface(IInspectable)
232 |   ['{B2A0B20E-7494-5B14-A88C-1D538E537822}']
233 |   end;
234 | 
235 |   // Windows.UI.Xaml.Documents.ITextPointer
236 |   Windows_UI_Xaml_Documents_ITextPointer = interface(IInspectable)
237 |   ['{AC687AA1-6A41-43FF-851E-45348AA2CF7B}']
238 |   end;
239 | 
240 | {$ENDREGION}
241 | 
242 |   // Windows.UI.Xaml.Data.IBindingBase
243 |   Windows_UI_Xaml_Data_IBindingBase = interface(IInspectable)
244 |   ['{1589A2AB-3D15-49BC-A447-8A5448E58870}']
245 |   end;
246 | 
247 |   // Windows.Foundation.EventRegistrationToken
248 |   Windows_Foundation_EventRegistrationToken = record
249 |     Value: Int64;
250 |   end;
251 |   PWindows_Foundation_EventRegistrationToken = ^Windows_Foundation_EventRegistrationToken;
252 | 
253 |   // Windows.ApplicationModel.Activation.ILaunchActivatedEventArgs
254 |   Windows_ApplicationModel_Activation_ILaunchActivatedEventArgs = interface(IInspectable)
255 |   ['{FBC93E26-A14A-4B4F-82B0-33BED920AF52}']
256 |     function get_Arguments: HSTRING; safecall;
257 |     function get_TileId: HSTRING; safecall;
258 | 
259 |     property Arguments: HSTRING read get_Arguments;
260 |     property TileId: HSTRING read get_TileId;
261 |   end;
262 | 
263 |   // Windows.UI.Xaml.IApplication
264 |   Windows_UI_Xaml_IApplication = interface(IInspectable)
265 |   ['{74B861A1-7487-46A9-9A6E-C78B512726C5}']
266 |     function get_Resources: Windows_UI_Xaml_IResourceDictionary; safecall;
267 |     procedure put_Resources(value: Windows_UI_Xaml_IResourceDictionary); safecall;
268 |     function add_UnhandledException(value: Windows_UI_Xaml_UnhandledExceptionEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
269 |     procedure remove_UnhandledException(token: Windows_Foundation_EventRegistrationToken); safecall;
270 |     function add_Exiting(value: Windows_UI_Xaml_EventHandler): Windows_Foundation_EventRegistrationToken; safecall;
271 |     procedure remove_Exiting(token: Windows_Foundation_EventRegistrationToken); safecall;
272 |     function add_Suspending(value: Windows_UI_Xaml_SuspendingEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
273 |     procedure remove_Suspending(token: Windows_Foundation_EventRegistrationToken); safecall;
274 |     function add_Resuming(value: Windows_UI_Xaml_EventHandler): Windows_Foundation_EventRegistrationToken; safecall;
275 |     procedure remove_Resuming(token: Windows_Foundation_EventRegistrationToken); safecall;
276 |     procedure Run; safecall;
277 |     procedure Exit; safecall;
278 | 
279 |     property Resources: Windows_UI_Xaml_IResourceDictionary read get_Resources write put_Resources;
280 |   end;
281 | 
282 |   // Windows.UI.Xaml.IApplicationFactory
283 |   Windows_UI_Xaml_IApplicationFactory = interface(IInspectable)
284 |   ['{93BBE361-BE5A-4EE3-B4A3-95118DC97A89}']
285 |     function CreateInstance(outer: IInspectable; out inner: IInspectable): Windows_UI_Xaml_IApplication; safecall;
286 |   end;
287 | 
288 |   // Windows.UI.Xaml.IApplicationOverrides
289 |   Windows_UI_Xaml_IApplicationOverrides = interface(IInspectable)
290 |   ['{25F99FF7-9347-459A-9FAC-B2D0E11C1A0F}']
291 |     procedure OnInitialize; safecall;
292 |     procedure OnActivated(args: Windows_ApplicationModel_Activation_IActivatedEventArgs); safecall;
293 |     procedure OnLaunched(args: Windows_ApplicationModel_Activation_ILaunchActivatedEventArgs); safecall;
294 |     procedure OnFileActivated(args: Windows_ApplicationModel_Activation_IFileActivatedEventArgs); safecall;
295 |     procedure OnSearchActivated(args: Windows_ApplicationModel_Activation_ISearchActivatedEventArgs); safecall;
296 |     procedure OnSharingTargetActivated(args: Windows_ApplicationModel_Activation_IShareTargetActivatedEventArgs); safecall;
297 |     procedure OnFilePickerActivated(args: Windows_ApplicationModel_Activation_IFilePickerActivatedEventArgs); safecall;
298 |   end;
299 | 
300 |   // Windows.UI.Xaml.Media.IRectangleGeometry
301 |   Windows_UI_Xaml_Media_IRectangleGeometry = interface(IInspectable)
302 |   ['{A25A1F58-C575-4196-91CF-9FDFB10445C3}']
303 |     function get_Rect: TRectF; safecall;
304 |     procedure put_Rect(value: TRectF); safecall;
305 | 
306 |     property Rect: TRectF read get_Rect write put_Rect;
307 |   end;
308 | 
309 |   // Windows.UI.Xaml.Media.ITransform
310 |   Windows_UI_Xaml_Media_ITransform = interface(IInspectable)
311 |   ['{4DF74078-BFD6-4ED1-9682-D2FD8BF2FE6F}']
312 |   end;
313 | 
314 |   // Windows.UI.Xaml.Visibility
315 |   Windows_UI_Xaml_Visibility = (
316 |     Visible = 0,
317 |     Collapsed = 1
318 |   );
319 | 
320 |   // Windows.UI.Xaml.Media.ICacheMode
321 |   Windows_UI_Xaml_Media_ICacheMode = interface(IInspectable)
322 |   ['{98DC8B11-C6F9-4DAB-B838-5FD5EC8C7350}']
323 |   end;
324 | 
325 |   // Windows.UI.Xaml.Input.ManipulationModes
326 |   Windows_UI_Xaml_Input_ManipulationModes = (
327 |     None = 0,
328 |     TranslateX = 1,
329 |     TranslateY = 2,
330 |     TranslateRailsX = 4,
331 |     TranslateRailsY = 8,
332 |     Rotate = 16,
333 |     Scale = 32,
334 |     TranslateInertia = 64,
335 |     RotateInertia = 128,
336 |     ScaleInertia = 256,
337 |     All = 2147483647
338 |   );
339 | 
340 | 
341 |   // Windows.System.VirtualKeyModifiers
342 |   Windows_System_VirtualKeyModifiers = (
343 |     None = 0,
344 |     Control = 1,
345 |     Menu = 2,
346 |     Shift = 4,
347 |     Windows = 8
348 |   );
349 | 
350 |   // Windows.UI.Xaml.Input.IPointerEventArgs
351 |   Windows_UI_Xaml_Input_IPointerEventArgs = interface(IInspectable)
352 |   ['{DA628F0A-9752-49E2-BDE2-49ECCAB9194D}']
353 |     function get_Pointer: Windows_UI_Xaml_Input_IPointer; safecall;
354 |     function get_KeyModifiers: Windows_System_VirtualKeyModifiers; safecall;
355 |     function get_Handled: Boolean; safecall;
356 |     procedure put_Handled(value: Boolean); safecall;
357 |     function GetCurrentPoint(relativeTo: Windows_UI_Xaml_IUIElement): Windows_UI_Input_IPointerPoint; safecall;
358 |     function GetIntermediatePoints(relativeTo: Windows_UI_Xaml_IUIElement): Windows_Foundation_Collections_IVector_1__Windows_UI_Input_IPointerPoint; safecall;
359 | 
360 |     property Handled: Boolean read get_Handled write put_Handled;
361 |     property KeyModifiers: Windows_System_VirtualKeyModifiers read get_KeyModifiers;
362 |     property Pointer: Windows_UI_Xaml_Input_IPointer read get_Pointer;
363 |   end;
364 | 
365 |   // Windows.UI.Xaml.Input.PointerEventHandler
366 |   Windows_UI_Xaml_Input_PointerEventHandler = interface(IUnknown)
367 |   ['{E4385929-C004-4BCF-8970-359486E39F88}']
368 |     procedure Invoke(sender: IInspectable; e: Windows_UI_Xaml_Input_IPointerEventArgs); safecall;
369 |   end;
370 | 
371 |   // Windows.UI.Xaml.IUIElement
372 |   Windows_UI_Xaml_IUIElement = interface(IInspectable)
373 |   ['{676D0BE9-B65C-41C6-BA40-58CF87F201C1}']
374 |     function get_DesiredSize: TSizeF; safecall;
375 |     function get_AllowDrop: Boolean; safecall;
376 |     procedure put_AllowDrop(value: Boolean); safecall;
377 |     function get_Opacity: Double; safecall;
378 |     procedure put_Opacity(value: Double); safecall;
379 |     function get_Clip: Windows_UI_Xaml_Media_IRectangleGeometry; safecall;
380 |     procedure put_Clip(value: Windows_UI_Xaml_Media_IRectangleGeometry); safecall;
381 |     function get_RenderTransform: Windows_UI_Xaml_Media_ITransform; safecall;
382 |     procedure put_RenderTransform(value: Windows_UI_Xaml_Media_ITransform); safecall;
383 |     function get_RenderTransformOrigin: TPointF; safecall;
384 |     procedure put_RenderTransformOrigin(value: TPointF); safecall;
385 |     function get_IsHitTestVisible: Boolean; safecall;
386 |     procedure put_IsHitTestVisible(value: Boolean); safecall;
387 |     function get_Visibility: Windows_UI_Xaml_Visibility; safecall;
388 |     procedure put_Visibility(value: Windows_UI_Xaml_Visibility); safecall;
389 |     function get_RenderSize: TSizeF; safecall;
390 |     function get_UseLayoutRounding: Boolean; safecall;
391 |     procedure put_UseLayoutRounding(value: Boolean); safecall;
392 |     function get_Transitions: Windows_Foundation_Collections_IVector_1__Windows_UI_Xaml_Media_Animation_ITransition; safecall;
393 |     procedure put_Transitions(value: Windows_Foundation_Collections_IVector_1__Windows_UI_Xaml_Media_Animation_ITransition); safecall;
394 |     function get_CacheMode: Windows_UI_Xaml_Media_ICacheMode; safecall;
395 |     procedure put_CacheMode(value: Windows_UI_Xaml_Media_ICacheMode); safecall;
396 |     function get_IsTapEnabled: Boolean; safecall;
397 |     procedure put_IsTapEnabled(value: Boolean); safecall;
398 |     function get_IsDoubleTapEnabled: Boolean; safecall;
399 |     procedure put_IsDoubleTapEnabled(value: Boolean); safecall;
400 |     function get_IsRightTapEnabled: Boolean; safecall;
401 |     procedure put_IsRightTapEnabled(value: Boolean); safecall;
402 |     function get_IsHoldingEnabled: Boolean; safecall;
403 |     procedure put_IsHoldingEnabled(value: Boolean); safecall;
404 |     function get_ManipulationMode: Windows_UI_Xaml_Input_ManipulationModes; safecall;
405 |     procedure put_ManipulationMode(value: Windows_UI_Xaml_Input_ManipulationModes); safecall;
406 |     function get_PointerCaptures: Windows_Foundation_Collections_IVectorView_1__Windows_UI_Xaml_Input_IPointer; safecall;
407 |     function add_KeyUp(value: Windows_UI_Xaml_Input_KeyEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
408 |     procedure remove_KeyUp(token: Windows_Foundation_EventRegistrationToken); safecall;
409 |     function add_KeyDown(value: Windows_UI_Xaml_Input_KeyEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
410 |     procedure remove_KeyDown(token: Windows_Foundation_EventRegistrationToken); safecall;
411 |     function add_GotFocus(value: Windows_UI_Xaml_RoutedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
412 |     procedure remove_GotFocus(token: Windows_Foundation_EventRegistrationToken); safecall;
413 |     function add_LostFocus(value: Windows_UI_Xaml_RoutedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
414 |     procedure remove_LostFocus(token: Windows_Foundation_EventRegistrationToken); safecall;
415 |     function add_DragEnter(value: Windows_UI_Xaml_DragEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
416 |     procedure remove_DragEnter(token: Windows_Foundation_EventRegistrationToken); safecall;
417 |     function add_DragLeave(value: Windows_UI_Xaml_DragEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
418 |     procedure remove_DragLeave(token: Windows_Foundation_EventRegistrationToken); safecall;
419 |     function add_DragOver(value: Windows_UI_Xaml_DragEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
420 |     procedure remove_DragOver(token: Windows_Foundation_EventRegistrationToken); safecall;
421 |     function add_Drop(value: Windows_UI_Xaml_DragEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
422 |     procedure remove_Drop(token: Windows_Foundation_EventRegistrationToken); safecall;
423 |     function add_PointerPressed(value: Windows_UI_Xaml_Input_PointerEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
424 |     procedure remove_PointerPressed(token: Windows_Foundation_EventRegistrationToken); safecall;
425 |     function add_PointerMoved(value: Windows_UI_Xaml_Input_PointerEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
426 |     procedure remove_PointerMoved(token: Windows_Foundation_EventRegistrationToken); safecall;
427 |     function add_PointerReleased(value: Windows_UI_Xaml_Input_PointerEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
428 |     procedure remove_PointerReleased(token: Windows_Foundation_EventRegistrationToken); safecall;
429 |     function add_PointerEntered(value: Windows_UI_Xaml_Input_PointerEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
430 |     procedure remove_PointerEntered(token: Windows_Foundation_EventRegistrationToken); safecall;
431 |     function add_PointerExited(value: Windows_UI_Xaml_Input_PointerEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
432 |     procedure remove_PointerExited(token: Windows_Foundation_EventRegistrationToken); safecall;
433 |     function add_PointerCaptureLost(value: Windows_UI_Xaml_Input_PointerEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
434 |     procedure remove_PointerCaptureLost(token: Windows_Foundation_EventRegistrationToken); safecall;
435 |     function add_PointerCanceled(value: Windows_UI_Xaml_Input_PointerEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
436 |     procedure remove_PointerCanceled(token: Windows_Foundation_EventRegistrationToken); safecall;
437 |     function add_PointerWheelChanged(value: Windows_UI_Xaml_Input_PointerEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
438 |     procedure remove_PointerWheelChanged(token: Windows_Foundation_EventRegistrationToken); safecall;
439 |     function add_Tapped(value: Windows_UI_Xaml_Input_TappedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
440 |     procedure remove_Tapped(token: Windows_Foundation_EventRegistrationToken); safecall;
441 |     function add_DoubleTapped(value: Windows_UI_Xaml_Input_DoubleTappedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
442 |     procedure remove_DoubleTapped(token: Windows_Foundation_EventRegistrationToken); safecall;
443 |     function add_Holding(value: Windows_UI_Xaml_Input_HoldingEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
444 |     procedure remove_Holding(token: Windows_Foundation_EventRegistrationToken); safecall;
445 |     function add_RightTapped(value: Windows_UI_Xaml_Input_RightTappedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
446 |     procedure remove_RightTapped(token: Windows_Foundation_EventRegistrationToken); safecall;
447 |     function add_ManipulationStarting(value: Windows_UI_Xaml_Input_ManipulationStartingEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
448 |     procedure remove_ManipulationStarting(token: Windows_Foundation_EventRegistrationToken); safecall;
449 |     function add_ManipulationInertiaStarting(value: Windows_UI_Xaml_Input_ManipulationInertiaStartingEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
450 |     procedure remove_ManipulationInertiaStarting(token: Windows_Foundation_EventRegistrationToken); safecall;
451 |     function add_ManipulationStarted(value: Windows_UI_Xaml_Input_ManipulationStartedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
452 |     procedure remove_ManipulationStarted(token: Windows_Foundation_EventRegistrationToken); safecall;
453 |     function add_ManipulationDelta(value: Windows_UI_Xaml_Input_ManipulationDeltaEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
454 |     procedure remove_ManipulationDelta(token: Windows_Foundation_EventRegistrationToken); safecall;
455 |     function add_ManipulationCompleted(value: Windows_UI_Xaml_Input_ManipulationCompletedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
456 |     procedure remove_ManipulationCompleted(token: Windows_Foundation_EventRegistrationToken); safecall;
457 |     procedure Measure(availableSize: TSizeF); safecall;
458 |     procedure Arrange(finalRect: TRectF); safecall;
459 |     function CapturePointer(value: Windows_UI_Xaml_Input_IPointer): Boolean; safecall;
460 |     procedure ReleasePointerCapture(value: Windows_UI_Xaml_Input_IPointer); safecall;
461 |     procedure ReleasePointerCaptures; safecall;
462 |     function TransformToVisual(visual: Windows_UI_Xaml_IUIElement): Windows_UI_Xaml_Media_IGeneralTransform; safecall;
463 |     procedure InvalidateMeasure; safecall;
464 |     procedure InvalidateArrange; safecall;
465 |     procedure UpdateLayout; safecall;
466 | 
467 |     property AllowDrop: Boolean read get_AllowDrop write put_AllowDrop;
468 |     property CacheMode: Windows_UI_Xaml_Media_ICacheMode read get_CacheMode write put_CacheMode;
469 |     property Clip: Windows_UI_Xaml_Media_IRectangleGeometry read get_Clip write put_Clip;
470 |     property DesiredSize: TSizeF read get_DesiredSize;
471 |     property IsDoubleTapEnabled: Boolean read get_IsDoubleTapEnabled write put_IsDoubleTapEnabled;
472 |     property IsHitTestVisible: Boolean read get_IsHitTestVisible write put_IsHitTestVisible;
473 |     property IsHoldingEnabled: Boolean read get_IsHoldingEnabled write put_IsHoldingEnabled;
474 |     property IsRightTapEnabled: Boolean read get_IsRightTapEnabled write put_IsRightTapEnabled;
475 |     property IsTapEnabled: Boolean read get_IsTapEnabled write put_IsTapEnabled;
476 |     property ManipulationMode: Windows_UI_Xaml_Input_ManipulationModes read get_ManipulationMode write put_ManipulationMode;
477 |     property Opacity: Double read get_Opacity write put_Opacity;
478 |     property PointerCaptures: Windows_Foundation_Collections_IVectorView_1__Windows_UI_Xaml_Input_IPointer read get_PointerCaptures;
479 |     property RenderSize: TSizeF read get_RenderSize;
480 |     property RenderTransform: Windows_UI_Xaml_Media_ITransform read get_RenderTransform write put_RenderTransform;
481 |     property RenderTransformOrigin: TPointF read get_RenderTransformOrigin write put_RenderTransformOrigin;
482 |     property Transitions: Windows_Foundation_Collections_IVector_1__Windows_UI_Xaml_Media_Animation_ITransition read get_Transitions write put_Transitions;
483 |     property UseLayoutRounding: Boolean read get_UseLayoutRounding write put_UseLayoutRounding;
484 |     property Visibility: Windows_UI_Xaml_Visibility read get_Visibility write put_Visibility;
485 |   end;
486 | 
487 |   // Windows.UI.Xaml.IWindow
488 |   Windows_UI_Xaml_IWindow = interface(IInspectable)
489 |   ['{3276167D-C9F6-462D-9DE2-AE4C1FD8C2E5}']
490 |     function get_Bounds: TRectF; safecall;
491 |     function get_Visible: Boolean; safecall;
492 |     function get_Content: Windows_UI_Xaml_IUIElement; safecall;
493 |     procedure put_Content(value: Windows_UI_Xaml_IUIElement); safecall;
494 |     function get_CoreWindow: Windows_UI_Core_ICoreWindow; safecall;
495 |     function get_Dispatcher: Windows_UI_Core_ICoreDispatcher; safecall;
496 |     function add_Activated(value: Windows_UI_Xaml_WindowActivatedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
497 |     procedure remove_Activated(token: Windows_Foundation_EventRegistrationToken); safecall;
498 |     function add_Closed(value: Windows_UI_Xaml_WindowClosedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
499 |     procedure remove_Closed(token: Windows_Foundation_EventRegistrationToken); safecall;
500 |     function add_SizeChanged(value: Windows_UI_Xaml_WindowSizeChangedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
501 |     procedure remove_SizeChanged(token: Windows_Foundation_EventRegistrationToken); safecall;
502 |     procedure Activate; safecall;
503 |     procedure Close; safecall;
504 | 
505 |     property Bounds: TRectF read get_Bounds;
506 |     property Content: Windows_UI_Xaml_IUIElement read get_Content write put_Content;
507 |     property CoreWindow: Windows_UI_Core_ICoreWindow read get_CoreWindow;
508 |     property Dispatcher: Windows_UI_Core_ICoreDispatcher read get_Dispatcher;
509 |     property Visible: Boolean read get_Visible;
510 |   end;
511 | 
512 |   // Windows.UI.Xaml.IWindowStatics
513 |   Windows_UI_Xaml_IWindowStatics = interface(IInspectable)
514 |   ['{93328409-4EA1-4AFA-83DC-0C4E73E88BB1}']
515 |     function get_Current: Windows_UI_Xaml_IWindow; safecall;
516 | 
517 |     property Current: Windows_UI_Xaml_IWindow read get_Current;
518 |   end;
519 | 
520 |   // Windows.UI.Xaml.Markup.IXamlReaderStatics
521 |   Windows_UI_Xaml_Markup_IXamlReaderStatics = interface(IInspectable)
522 |   ['{9891C6BD-534F-4955-B85A-8A8DC0DCA602}']
523 |     function Load(xaml: HSTRING): IInspectable; safecall;
524 |     function LoadWithInitialTemplateValidation(xaml: HSTRING): IInspectable; safecall;
525 |   end;
526 | 
527 |   // Windows.UI.Xaml.HorizontalAlignment
528 |   Windows_UI_Xaml_HorizontalAlignment = (
529 |     Left = 0,
530 |     Center = 1,
531 |     Right = 2,
532 |     Stretch = 3
533 |   );
534 | 
535 |   // Windows.UI.Xaml.VerticalAlignment
536 |   Windows_UI_Xaml_VerticalAlignment = (
537 |     Top = 0,
538 |     Center = 1,
539 |     Bottom = 2,
540 |     Stretch = 3
541 |   );
542 | 
543 |   // Windows.UI.Xaml.FlowDirection
544 |   Windows_UI_Xaml_FlowDirection = (
545 |     LeftToRight = 0,
546 |     RightToLeft = 1
547 |   );
548 | 
549 |   // Windows.UI.Xaml.Thickness
550 |   Windows_UI_Xaml_Thickness = record
551 |     Left: Double;
552 |     Top: Double;
553 |     Right: Double;
554 |     Bottom: Double;
555 |   end;
556 |   PWindows_UI_Xaml_Thickness = ^Windows_UI_Xaml_Thickness;
557 | 
558 |   // Windows.UI.Xaml.IFrameworkElement
559 |   Windows_UI_Xaml_IFrameworkElement = interface(IInspectable)
560 |   ['{A391D09B-4A99-4B7C-9D8D-6FA5D01F6FBF}']
561 |     function get_Triggers: Windows_Foundation_Collections_IVector_1__Windows_UI_Xaml_ITriggerBase; safecall;
562 |     function get_Resources: Windows_UI_Xaml_IResourceDictionary; safecall;
563 |     procedure put_Resources(value: Windows_UI_Xaml_IResourceDictionary); safecall;
564 |     function get_Tag: IInspectable; safecall;
565 |     procedure put_Tag(value: IInspectable); safecall;
566 |     function get_ActualWidth: Double; safecall;
567 |     function get_ActualHeight: Double; safecall;
568 |     function get_Width: Double; safecall;
569 |     procedure put_Width(value: Double); safecall;
570 |     function get_Height: Double; safecall;
571 |     procedure put_Height(value: Double); safecall;
572 |     function get_MinWidth: Double; safecall;
573 |     procedure put_MinWidth(value: Double); safecall;
574 |     function get_MaxWidth: Double; safecall;
575 |     procedure put_MaxWidth(value: Double); safecall;
576 |     function get_MinHeight: Double; safecall;
577 |     procedure put_MinHeight(value: Double); safecall;
578 |     function get_MaxHeight: Double; safecall;
579 |     procedure put_MaxHeight(value: Double); safecall;
580 |     function get_HorizontalAlignment: Windows_UI_Xaml_HorizontalAlignment; safecall;
581 |     procedure put_HorizontalAlignment(value: Windows_UI_Xaml_HorizontalAlignment); safecall;
582 |     function get_VerticalAlignment: Windows_UI_Xaml_VerticalAlignment; safecall;
583 |     procedure put_VerticalAlignment(value: Windows_UI_Xaml_VerticalAlignment); safecall;
584 |     function get_Margin: Windows_UI_Xaml_Thickness; safecall;
585 |     procedure put_Margin(value: Windows_UI_Xaml_Thickness); safecall;
586 |     function get_Name: HSTRING; safecall;
587 |     procedure put_Name(value: HSTRING); safecall;
588 |     function get_BaseUri: Windows_Foundation_IUriRuntimeClass; safecall;
589 |     function get_DataContext: IInspectable; safecall;
590 |     procedure put_DataContext(value: IInspectable); safecall;
591 |     function get_Style: Windows_UI_Xaml_IStyle; safecall;
592 |     procedure put_Style(value: Windows_UI_Xaml_IStyle); safecall;
593 |     function get_Parent: Windows_UI_Xaml_IDependencyObject; safecall;
594 |     function get_FlowDirection: Windows_UI_Xaml_FlowDirection; safecall;
595 |     procedure put_FlowDirection(value: Windows_UI_Xaml_FlowDirection); safecall;
596 |     function add_Loaded(value: Windows_UI_Xaml_RoutedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
597 |     procedure remove_Loaded(token: Windows_Foundation_EventRegistrationToken); safecall;
598 |     function add_Unloaded(value: Windows_UI_Xaml_RoutedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
599 |     procedure remove_Unloaded(token: Windows_Foundation_EventRegistrationToken); safecall;
600 |     function add_SizeChanged(value: Windows_UI_Xaml_SizeChangedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
601 |     procedure remove_SizeChanged(token: Windows_Foundation_EventRegistrationToken); safecall;
602 |     function add_LayoutUpdated(value: Windows_UI_Xaml_EventHandler): Windows_Foundation_EventRegistrationToken; safecall;
603 |     procedure remove_LayoutUpdated(token: Windows_Foundation_EventRegistrationToken); safecall;
604 |     procedure OnApplyTemplate; safecall;
605 |     function FindName(name: HSTRING): IInspectable; safecall;
606 |     procedure SetBinding(dp: Windows_UI_Xaml_IDependencyProperty; binding: Windows_UI_Xaml_Data_IBindingBase); safecall;
607 | 
608 |     property ActualHeight: Double read get_ActualHeight;
609 |     property ActualWidth: Double read get_ActualWidth;
610 |     property BaseUri: Windows_Foundation_IUriRuntimeClass read get_BaseUri;
611 |     property DataContext: IInspectable read get_DataContext write put_DataContext;
612 |     property FlowDirection: Windows_UI_Xaml_FlowDirection read get_FlowDirection write put_FlowDirection;
613 |     property Height: Double read get_Height write put_Height;
614 |     property HorizontalAlignment: Windows_UI_Xaml_HorizontalAlignment read get_HorizontalAlignment write put_HorizontalAlignment;
615 |     property Margin: Windows_UI_Xaml_Thickness read get_Margin write put_Margin;
616 |     property MaxHeight: Double read get_MaxHeight write put_MaxHeight;
617 |     property MaxWidth: Double read get_MaxWidth write put_MaxWidth;
618 |     property MinHeight: Double read get_MinHeight write put_MinHeight;
619 |     property MinWidth: Double read get_MinWidth write put_MinWidth;
620 |     property Name: HSTRING read get_Name write put_Name;
621 |     property Parent: Windows_UI_Xaml_IDependencyObject read get_Parent;
622 |     property Resources: Windows_UI_Xaml_IResourceDictionary read get_Resources write put_Resources;
623 |     property Style: Windows_UI_Xaml_IStyle read get_Style write put_Style;
624 |     property Tag: IInspectable read get_Tag write put_Tag;
625 |     property Triggers: Windows_Foundation_Collections_IVector_1__Windows_UI_Xaml_ITriggerBase read get_Triggers;
626 |     property VerticalAlignment: Windows_UI_Xaml_VerticalAlignment read get_VerticalAlignment write put_VerticalAlignment;
627 |     property Width: Double read get_Width write put_Width;
628 |   end;
629 | 
630 |   // Windows.UI.Xaml.Media.Color
631 |   Windows_UI_Xaml_Media_Color = record
632 |     A: Byte;
633 |     R: Byte;
634 |     G: Byte;
635 |     B: Byte;
636 |   end;
637 |   PWindows_UI_Xaml_Media_Color = ^Windows_UI_Xaml_Media_Color;
638 | 
639 |   // Windows.UI.Xaml.Media.ISolidColorBrush
640 |   Windows_UI_Xaml_Media_ISolidColorBrush = interface(IInspectable)
641 |   ['{9D850850-66F3-48DF-9A8F-824BD5E070AF}']
642 |     function get_Color: Windows_UI_Xaml_Media_Color; safecall;
643 |     procedure put_Color(value: Windows_UI_Xaml_Media_Color); safecall;
644 | 
645 |     property Color: Windows_UI_Xaml_Media_Color read get_Color write put_Color;
646 |   end;
647 | 
648 |   // Windows.UI.Xaml.Media.ISolidColorBrushFactory
649 |   Windows_UI_Xaml_Media_ISolidColorBrushFactory = interface(IInspectable)
650 |   ['{D935CE0C-86F5-4DA6-8A27-B1619EF7F92B}']
651 |     function CreateInstanceWithColor(color: Windows_UI_Xaml_Media_Color): Windows_UI_Xaml_Media_ISolidColorBrush; safecall;
652 |   end;
653 | 
654 |   // Windows.UI.Xaml.Media.IColorsStatics
655 |   Windows_UI_Xaml_Media_IColorsStatics = interface(IInspectable)
656 |   ['{CFF52E04-CCA6-4614-A17E-754910C84A99}']
657 |     function get_Black: Windows_UI_Xaml_Media_Color; safecall;
658 |     function get_Blue: Windows_UI_Xaml_Media_Color; safecall;
659 |     function get_Brown: Windows_UI_Xaml_Media_Color; safecall;
660 |     function get_Cyan: Windows_UI_Xaml_Media_Color; safecall;
661 |     function get_DarkGray: Windows_UI_Xaml_Media_Color; safecall;
662 |     function get_Gray: Windows_UI_Xaml_Media_Color; safecall;
663 |     function get_Green: Windows_UI_Xaml_Media_Color; safecall;
664 |     function get_LightGray: Windows_UI_Xaml_Media_Color; safecall;
665 |     function get_Magenta: Windows_UI_Xaml_Media_Color; safecall;
666 |     function get_Orange: Windows_UI_Xaml_Media_Color; safecall;
667 |     function get_Purple: Windows_UI_Xaml_Media_Color; safecall;
668 |     function get_Red: Windows_UI_Xaml_Media_Color; safecall;
669 |     function get_Transparent: Windows_UI_Xaml_Media_Color; safecall;
670 |     function get_White: Windows_UI_Xaml_Media_Color; safecall;
671 |     function get_Yellow: Windows_UI_Xaml_Media_Color; safecall;
672 | 
673 |     property Black: Windows_UI_Xaml_Media_Color read get_Black;
674 |     property Blue: Windows_UI_Xaml_Media_Color read get_Blue;
675 |     property Brown: Windows_UI_Xaml_Media_Color read get_Brown;
676 |     property Cyan: Windows_UI_Xaml_Media_Color read get_Cyan;
677 |     property DarkGray: Windows_UI_Xaml_Media_Color read get_DarkGray;
678 |     property Gray: Windows_UI_Xaml_Media_Color read get_Gray;
679 |     property Green: Windows_UI_Xaml_Media_Color read get_Green;
680 |     property LightGray: Windows_UI_Xaml_Media_Color read get_LightGray;
681 |     property Magenta: Windows_UI_Xaml_Media_Color read get_Magenta;
682 |     property Orange: Windows_UI_Xaml_Media_Color read get_Orange;
683 |     property Purple: Windows_UI_Xaml_Media_Color read get_Purple;
684 |     property Red: Windows_UI_Xaml_Media_Color read get_Red;
685 |     property Transparent: Windows_UI_Xaml_Media_Color read get_Transparent;
686 |     property White: Windows_UI_Xaml_Media_Color read get_White;
687 |     property Yellow: Windows_UI_Xaml_Media_Color read get_Yellow;
688 |   end;
689 | 
690 |   // Windows.UI.Xaml.Media.IFontFamily
691 |   Windows_UI_Xaml_Media_IFontFamily = interface(IInspectable)
692 |   ['{92467E64-D66A-4CF4-9322-3D23B3C0C361}']
693 |     function get_Source: HSTRING; safecall;
694 |     procedure put_Source(value: HSTRING); safecall;
695 | 
696 |     property Source: HSTRING read get_Source write put_Source;
697 |   end;
698 | 
699 |   // Windows.UI.Xaml.FontWeight
700 |   Windows_UI_Xaml_FontWeight = record
701 |     Weight: Word;
702 |   end;
703 |   PWindows_UI_Xaml_FontWeight = ^Windows_UI_Xaml_FontWeight;
704 | 
705 |   // Windows.UI.Xaml.FontStyle
706 |   Windows_UI_Xaml_FontStyle = (
707 |     Normal = 0,
708 |     Oblique = 1,
709 |     Italic = 2
710 |   );
711 | 
712 |   // Windows.UI.Xaml.FontStretch
713 |   Windows_UI_Xaml_FontStretch = (
714 |     Undefined = 0,
715 |     UltraCondensed = 1,
716 |     ExtraCondensed = 2,
717 |     Condensed = 3,
718 |     SemiCondensed = 4,
719 |     Normal = 5,
720 |     SemiExpanded = 6,
721 |     Expanded = 7,
722 |     ExtraExpanded = 8,
723 |     UltraExpanded = 9
724 |   );
725 | 
726 |   // Windows.UI.Xaml.TextWrapping
727 |   Windows_UI_Xaml_TextWrapping = (
728 |     NoWrap = 1,
729 |     Wrap = 2
730 |   );
731 | 
732 |   // Windows.UI.Xaml.TextTrimming
733 |   Windows_UI_Xaml_TextTrimming = (
734 |     None = 0,
735 |     WordEllipsis = 2
736 |   );
737 | 
738 |   // Windows.UI.Xaml.TextAlignment
739 |   Windows_UI_Xaml_TextAlignment = (
740 |     Center = 0,
741 |     Left = 1,
742 |     Right = 2,
743 |     Justify = 3
744 |   );
745 | 
746 |   // Windows.UI.Xaml.LineStackingStrategy
747 |   Windows_UI_Xaml_LineStackingStrategy = (
748 |     MaxHeight = 0,
749 |     BlockLineHeight = 1,
750 |     BaselineToBaseline = 2
751 |   );
752 | 
753 |   // Windows.UI.Xaml.Controls.ITextBlock
754 |   Windows_UI_Xaml_Controls_ITextBlock = interface(IInspectable)
755 |   ['{AE2D9271-3B4A-45FC-8468-F7949548F4D5}']
756 |     function get_FontSize: Double; safecall;
757 |     procedure put_FontSize(value: Double); safecall;
758 |     function get_FontFamily: Windows_UI_Xaml_Media_IFontFamily; safecall;
759 |     procedure put_FontFamily(value: Windows_UI_Xaml_Media_IFontFamily); safecall;
760 |     function get_FontWeight: Windows_UI_Xaml_FontWeight; safecall;
761 |     procedure put_FontWeight(value: Windows_UI_Xaml_FontWeight); safecall;
762 |     function get_FontStyle: Windows_UI_Xaml_FontStyle; safecall;
763 |     procedure put_FontStyle(value: Windows_UI_Xaml_FontStyle); safecall;
764 |     function get_FontStretch: Windows_UI_Xaml_FontStretch; safecall;
765 |     procedure put_FontStretch(value: Windows_UI_Xaml_FontStretch); safecall;
766 |     function get_CharacterSpacing: Integer; safecall;
767 |     procedure put_CharacterSpacing(value: Integer); safecall;
768 |     function get_Foreground: Windows_UI_Xaml_Media_IBrush; safecall;
769 |     procedure put_Foreground(value: Windows_UI_Xaml_Media_IBrush); safecall;
770 |     function get_TextWrapping: Windows_UI_Xaml_TextWrapping; safecall;
771 |     procedure put_TextWrapping(value: Windows_UI_Xaml_TextWrapping); safecall;
772 |     function get_TextTrimming: Windows_UI_Xaml_TextTrimming; safecall;
773 |     procedure put_TextTrimming(value: Windows_UI_Xaml_TextTrimming); safecall;
774 |     function get_TextAlignment: Windows_UI_Xaml_TextAlignment; safecall;
775 |     procedure put_TextAlignment(value: Windows_UI_Xaml_TextAlignment); safecall;
776 |     function get_Text: HSTRING; safecall;
777 |     procedure put_Text(value: HSTRING); safecall;
778 |     function get_Inlines: Windows_Foundation_Collections_IVector_1__Windows_UI_Xaml_Documents_IInline; safecall;
779 |     function get_Padding: Windows_UI_Xaml_Thickness; safecall;
780 |     procedure put_Padding(value: Windows_UI_Xaml_Thickness); safecall;
781 |     function get_LineHeight: Double; safecall;
782 |     procedure put_LineHeight(value: Double); safecall;
783 |     function get_LineStackingStrategy: Windows_UI_Xaml_LineStackingStrategy; safecall;
784 |     procedure put_LineStackingStrategy(value: Windows_UI_Xaml_LineStackingStrategy); safecall;
785 |     function get_IsTextSelectionEnabled: Boolean; safecall;
786 |     procedure put_IsTextSelectionEnabled(value: Boolean); safecall;
787 |     function get_SelectedText: HSTRING; safecall;
788 |     function get_ContentStart: Windows_UI_Xaml_Documents_ITextPointer; safecall;
789 |     function get_ContentEnd: Windows_UI_Xaml_Documents_ITextPointer; safecall;
790 |     function get_SelectionStart: Windows_UI_Xaml_Documents_ITextPointer; safecall;
791 |     function get_SelectionEnd: Windows_UI_Xaml_Documents_ITextPointer; safecall;
792 |     function get_BaselineOffset: Double; safecall;
793 |     function add_SelectionChanged(value: Windows_UI_Xaml_RoutedEventHandler): Windows_Foundation_EventRegistrationToken; safecall;
794 |     procedure remove_SelectionChanged(token: Windows_Foundation_EventRegistrationToken); safecall;
795 |     procedure SelectAll; safecall;
796 |     procedure Select(start: Windows_UI_Xaml_Documents_ITextPointer; &end: Windows_UI_Xaml_Documents_ITextPointer); safecall;
797 | 
798 |     property BaselineOffset: Double read get_BaselineOffset;
799 |     property CharacterSpacing: Integer read get_CharacterSpacing write put_CharacterSpacing;
800 |     property ContentEnd: Windows_UI_Xaml_Documents_ITextPointer read get_ContentEnd;
801 |     property ContentStart: Windows_UI_Xaml_Documents_ITextPointer read get_ContentStart;
802 |     property FontFamily: Windows_UI_Xaml_Media_IFontFamily read get_FontFamily write put_FontFamily;
803 |     property FontSize: Double read get_FontSize write put_FontSize;
804 |     property FontStretch: Windows_UI_Xaml_FontStretch read get_FontStretch write put_FontStretch;
805 |     property FontStyle: Windows_UI_Xaml_FontStyle read get_FontStyle write put_FontStyle;
806 |     property FontWeight: Windows_UI_Xaml_FontWeight read get_FontWeight write put_FontWeight;
807 |     property Foreground: Windows_UI_Xaml_Media_IBrush read get_Foreground write put_Foreground;
808 |     property Inlines: Windows_Foundation_Collections_IVector_1__Windows_UI_Xaml_Documents_IInline read get_Inlines;
809 |     property IsTextSelectionEnabled: Boolean read get_IsTextSelectionEnabled write put_IsTextSelectionEnabled;
810 |     property LineHeight: Double read get_LineHeight write put_LineHeight;
811 |     property LineStackingStrategy: Windows_UI_Xaml_LineStackingStrategy read get_LineStackingStrategy write put_LineStackingStrategy;
812 |     property Padding: Windows_UI_Xaml_Thickness read get_Padding write put_Padding;
813 |     property SelectedText: HSTRING read get_SelectedText;
814 |     property SelectionEnd: Windows_UI_Xaml_Documents_ITextPointer read get_SelectionEnd;
815 |     property SelectionStart: Windows_UI_Xaml_Documents_ITextPointer read get_SelectionStart;
816 |     property Text: HSTRING read get_Text write put_Text;
817 |     property TextAlignment: Windows_UI_Xaml_TextAlignment read get_TextAlignment write put_TextAlignment;
818 |     property TextTrimming: Windows_UI_Xaml_TextTrimming read get_TextTrimming write put_TextTrimming;
819 |     property TextWrapping: Windows_UI_Xaml_TextWrapping read get_TextWrapping write put_TextWrapping;
820 |   end;
821 | 
822 |   implementation
823 | 
824 | end.
825 | 


--------------------------------------------------------------------------------
/deploy.bat:
--------------------------------------------------------------------------------
 1 | @echo off
 2 | copy AppxManifest.xml %2\package
 3 | copy Logo.png %2\package
 4 | copy SmallLogo.png %2\package
 5 | copy SplashScreen.png %2\package
 6 | copy StoreLogo.png %2\package
 7 | 
 8 | set APPX=%2\%1.appx
 9 | 
10 | "C:\program files (x86)\Windows Kits\8.0\bin\x64\makeappx.exe" pack /o /d %2\package /p %APPX%
11 | "C:\program files (x86)\Windows Kits\8.0\bin\x64\signtool.exe" sign /fd sha256 %APPX%
12 | 
13 | REM  Note the below line assumes the package was signed by tgerdes.  This needs to be changed if you're using your own certificate
14 | powershell -Command "Get-AppxPackage %1 CN=tgerdes | Remove-AppxPackage"
15 | powershell -Command Add-AppxPackage %APPX%
16 | 
17 | 


--------------------------------------------------------------------------------