Skip to content

T
TwilioMsgs
Commit aea23046 by Mac Stephens
Options

Initial Commit, .gitignore added

parent 41ea1a44
Showing with 4596 additions and 0 deletions
.gitignore 0 → 100644
TwilioMsgs/dev/__history/
TwilioMsgs/dev/__recovery/
TwilioMsgs/dev/Win32/
TwilioMsgs/dev/Win64x/
*.ilc
*.ild
*.ilf
*.skincfg
*.tds
*.exe
dev/Project1.cbproj 0 → 100644
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<ProjectGuid>{FF04435A-8E44-4F72-9598-94E9ABD25FF1}</ProjectGuid>
<ProjectVersion>20.2</ProjectVersion>
<FrameworkType>VCL</FrameworkType>
<AppType>Application</AppType>
<MainSource>Project1.cpp</MainSource>
<Base>True</Base>
<Config Condition="'$(Config)'==''">Debug</Config>
<Platform Condition="'$(Platform)'==''">Win32</Platform>
<TargetedPlatforms>1048577</TargetedPlatforms>
<ProjectName Condition="'$(ProjectName)'==''">Project1</ProjectName>
</PropertyGroup>
<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''">
<Base_Win32>true</Base_Win32>
<CfgParent>Base</CfgParent>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Base)'=='true') or '$(Base_Win64)'!=''">
<Base_Win64>true</Base_Win64>
<CfgParent>Base</CfgParent>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='Win64x' and '$(Base)'=='true') or '$(Base_Win64x)'!=''">
<Base_Win64x>true</Base_Win64x>
<CfgParent>Base</CfgParent>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_1)'!=''">
<Cfg_1>true</Cfg_1>
<CfgParent>Base</CfgParent>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Cfg_1)'=='true') or '$(Cfg_1_Win32)'!=''">
<Cfg_1_Win32>true</Cfg_1_Win32>
<CfgParent>Cfg_1</CfgParent>
<Cfg_1>true</Cfg_1>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='Win64x' and '$(Cfg_1)'=='true') or '$(Cfg_1_Win64x)'!=''">
<Cfg_1_Win64x>true</Cfg_1_Win64x>
<CfgParent>Cfg_1</CfgParent>
<Cfg_1>true</Cfg_1>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_2)'!=''">
<Cfg_2>true</Cfg_2>
<CfgParent>Base</CfgParent>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win32)'!=''">
<Cfg_2_Win32>true</Cfg_2_Win32>
<CfgParent>Cfg_2</CfgParent>
<Cfg_2>true</Cfg_2>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="('$(Platform)'=='Win64x' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win64x)'!=''">
<Cfg_2_Win64x>true</Cfg_2_Win64x>
<CfgParent>Cfg_2</CfgParent>
<Cfg_2>true</Cfg_2>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="'$(Base)'!=''">
<DCC_CBuilderOutput>JPHNE</DCC_CBuilderOutput>
<DynamicRTL>true</DynamicRTL>
<UsePackages>true</UsePackages>
<IntermediateOutputDir>.\$(Platform)\$(Config)</IntermediateOutputDir>
<FinalOutputDir>.\$(Platform)\$(Config)</FinalOutputDir>
<BCC_wpar>false</BCC_wpar>
<BCC_OptimizeForSpeed>true</BCC_OptimizeForSpeed>
<BCC_ExtendedErrorInfo>true</BCC_ExtendedErrorInfo>
<ILINK_TranslatedLibraryPath>$(BDSLIB)\$(PLATFORM)\release\$(LANGDIR);$(ILINK_TranslatedLibraryPath)</ILINK_TranslatedLibraryPath>
<ProjectType>CppVCLApplication</ProjectType>
<DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;$(DCC_Namespace)</DCC_Namespace>
<AllPackageLibs>rtl.lib;vcl.lib;vclwinx.lib;vclimg.lib;bindengine.lib;adortl.lib;dbrtl.lib;vclx.lib;soaprtl.lib;xmlrtl.lib;inet.lib;vclactnband.lib;vcldb.lib;VclSmp.lib;bindcomp.lib;RESTComponents.lib;CustomIPTransport.lib;FireDAC.lib;FireDACCommonDriver.lib;FireDACCommon.lib;ipstudiowin.lib;dac290.lib;TMSVCLUIPackPkg.lib;unidac290.lib;TMSVCLUIPackPkgEx.lib;DbxCommonDriver.lib;dsnap.lib</AllPackageLibs>
<_TCHARMapping>wchar_t</_TCHARMapping>
<Multithreaded>true</Multithreaded>
<Icon_MainIcon>$(BDS)\bin\cbuilder_PROJECTICON.ico</Icon_MainIcon>
<UWP_CppLogo44>$(BDS)\bin\Artwork\Windows\UWP\cppreg_UwpDefault_44.png</UWP_CppLogo44>
<UWP_CppLogo150>$(BDS)\bin\Artwork\Windows\UWP\cppreg_UwpDefault_150.png</UWP_CppLogo150>
<SanitizedProjectName>Project1</SanitizedProjectName>
</PropertyGroup>
<PropertyGroup Condition="'$(Base_Win32)'!=''">
<PackageImports>AcroPDF;addict4_d28;addict4db_d28;adortl;AdvChartDEDXE14;AdvChartDXE14;appanalytics;bcbie;bcbsmp;bindcomp;bindcompdbx;bindcompfmx;bindcompvcl;bindcompvclsmp;bindcompvclwinx;bindengine;CamRemoteD11;CEF4Delphi;CloudService;crcontrols280;CustomIPTransport;dac280;dacfmx280;dacvcl280;dbexpress;dbrtl;dbxcds;DbxClientDriver;DbxCommonDriver;DBXInterBaseDriver;DBXMySQLDriver;DBXSqliteDriver;dsnap;dsnapcon;dsnapxml;EMComponents;fcstudiowin;FireDAC;FireDACADSDriver;FireDACCommon;FireDACCommonDriver;FireDACCommonODBC;FireDACIBDriver;FireDACMSAccDriver;FireDACMySQLDriver;FireDACPgDriver;FireDACSqliteDriver;FlexCel_Core;FlexCel_Pdf;FlexCel_Render;FlexCel_Report;FlexCel_XlsAdapter;fmx;FMX_FlexCel_Components;FMX_FlexCel_Core;fmxase;fmxdae;fmxFireDAC;fmxobj;FMXTMSFNCCorePkgDXE14;FMXTMSFNCDashboardPackPkgDXE14;FMXTMSFNCMapsPkgDXE14;FMXTMSFNCUIPackPkgDXE14;frx28;frxDB28;frxe28;gtACEExpD28;gtAdvGridExpD28;gtDocEngD28;gtFRExpD28;gtHtmVwExpD28;gtPDFkitD11ProP;gtQRExpD28;gtRaveExpD28;gtRBExpD28;gtRichVwExpD28;gtScaleRichVwExpD28;gtXPressExpD28;IndyCore;IndyIPClient;IndyIPCommon;IndyIPServer;IndyProtocols;IndySystem;inet;inetdb;inetdbxpress;ipstudiowin;ipstudiowinclient;ipstudiowinwordxp;PKIECtrl28;PKIEDB28;QRWRunDXE11_w64;RESTBackendComponents;RESTComponents;rtl;SigPlus;SKIA_FlexCel_Core;soapmidas;soaprtl;soapserver;TatukGIS_DK11_RX11;TatukGIS_DK11_RX11_FMX;TatukGIS_DK11_RX11_VCL;tethering;TMSCloudPkgDEDXE14;TMSCloudPkgDXE14;TMSVCLUIPackPkgDXE14;TMSVCLUIPackPkgExDXE14;TMSVCLUIPackPkgWizDXE14;TMSVCLUIPackPkgXlsDXE14;unidac280;unidacfmx280;unidacvcl280;vcl;VCL_FlexCel_Components;VCL_FlexCel_Core;vclactnband;vclCryptoPressStreamD28;vcldb;vcldsnap;vcledge;vclFireDAC;vclie;vclimg;VCLRESTComponents;VclSmp;vclSQLMemTabled28;VCLTMSFNCCorePkgDXE14;VCLTMSFNCDashboardPackPkgDXE14;VCLTMSFNCMapsPkgDXE14;VCLTMSFNCUIPackPkgDXE14;vcltouch;vclwinx;vclx;VirtualTreesR;vquery280;WPViewPDF_DT;WPViewPDF_RT;xmlrtl;$(PackageImports)</PackageImports>
<IncludePath>$(BDSINCLUDE)\windows\vcl;$(IncludePath)</IncludePath>
<DCC_Namespace>Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
<BT_BuildType>Debug</BT_BuildType>
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
<VerInfo_Keys>CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
<VerInfo_Locale>1033</VerInfo_Locale>
<Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File>
<BCC_PCHName_Clang>Project1PCH1.h</BCC_PCHName_Clang>
</PropertyGroup>
<PropertyGroup Condition="'$(Base_Win64)'!=''">
<PackageImports>adortl;AdvChartDXE14;appanalytics;bcbie;bcbsmp;bindcomp;bindcompdbx;bindcompfmx;bindcompvcl;bindcompvclsmp;bindcompvclwinx;bindengine;CamRemoteD11;CloudService;CustomIPTransport;dbexpress;dbrtl;dbxcds;DbxClientDriver;DbxCommonDriver;DBXInterBaseDriver;DBXMySQLDriver;DBXSqliteDriver;dsnap;dsnapcon;dsnapxml;fcstudiowin;FireDAC;FireDACADSDriver;FireDACCommon;FireDACCommonDriver;FireDACCommonODBC;FireDACIBDriver;FireDACMSAccDriver;FireDACMySQLDriver;FireDACPgDriver;FireDACSqliteDriver;FlexCel_Core;FlexCel_Pdf;FlexCel_Render;FlexCel_Report;FlexCel_XlsAdapter;fmx;FMX_FlexCel_Components;FMX_FlexCel_Core;fmxase;fmxdae;fmxFireDAC;fmxobj;FMXTMSFNCCorePkgDXE14;FMXTMSFNCMapsPkgDXE14;FMXTMSFNCUIPackPkgDXE14;IndyCore;IndyIPClient;IndyIPCommon;IndyIPServer;IndyProtocols;IndySystem;inet;inetdb;inetdbxpress;ipstudiowin;ipstudiowinclient;PKIECtrl28;PKIEDB28;QRWRunDXE11_w64;RESTBackendComponents;RESTComponents;rtl;soapmidas;soaprtl;soapserver;tethering;TMSVCLUIPackPkgDXE14;TMSVCLUIPackPkgExDXE14;TMSVCLUIPackPkgXlsDXE14;vcl;VCL_FlexCel_Components;VCL_FlexCel_Core;vclactnband;vcldb;vcldsnap;vcledge;vclFireDAC;vclie;vclimg;VCLRESTComponents;VclSmp;VCLTMSFNCCorePkgDXE14;VCLTMSFNCDashboardPackPkgDXE14;VCLTMSFNCMapsPkgDXE14;VCLTMSFNCUIPackPkgDXE14;vcltouch;vclwinx;vclx;VirtualTreesR;WPViewPDF_RT;xmlrtl;$(PackageImports)</PackageImports>
<IncludePath>$(BDSINCLUDE)\windows\vcl;$(IncludePath)</IncludePath>
<BCC_PCHName_Clang>Project1PCH1.h</BCC_PCHName_Clang>
</PropertyGroup>
<PropertyGroup Condition="'$(Base_Win64x)'!=''">
<DCC_Namespace>Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace)</DCC_Namespace>
<BT_BuildType>Debug</BT_BuildType>
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
<VerInfo_Keys>CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
<VerInfo_Locale>1033</VerInfo_Locale>
<Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File>
<BCC_EnableBatchCompilation>true</BCC_EnableBatchCompilation>
<BCC_PCHName_Clang>Project1PCH1.h</BCC_PCHName_Clang>
</PropertyGroup>
<PropertyGroup Condition="'$(Cfg_1)'!=''">
<BCC_OptimizeForSpeed>false</BCC_OptimizeForSpeed>
<BCC_DisableOptimizations>true</BCC_DisableOptimizations>
<DCC_Optimize>false</DCC_Optimize>
<DCC_DebugInfoInExe>true</DCC_DebugInfoInExe>
<Defines>_DEBUG;$(Defines)</Defines>
<BCC_InlineFunctionExpansion>false</BCC_InlineFunctionExpansion>
<BCC_UseRegisterVariables>None</BCC_UseRegisterVariables>
<DCC_Define>DEBUG</DCC_Define>
<BCC_DebugLineNumbers>true</BCC_DebugLineNumbers>
<TASM_DisplaySourceLines>true</TASM_DisplaySourceLines>
<BCC_StackFrames>true</BCC_StackFrames>
<ILINK_FullDebugInfo>true</ILINK_FullDebugInfo>
<TASM_Debugging>Full</TASM_Debugging>
<BCC_SourceDebuggingOn>true</BCC_SourceDebuggingOn>
<BCC_EnableCPPExceptions>true</BCC_EnableCPPExceptions>
<BCC_DisableFramePtrElimOpt>true</BCC_DisableFramePtrElimOpt>
<BCC_DisableSpellChecking>true</BCC_DisableSpellChecking>
<CLANG_UnwindTables>true</CLANG_UnwindTables>
<ILINK_LibraryPath>$(BDSLIB)\$(PLATFORM)\debug;$(ILINK_LibraryPath)</ILINK_LibraryPath>
<ILINK_TranslatedLibraryPath>$(BDSLIB)\$(PLATFORM)\debug\$(LANGDIR);$(ILINK_TranslatedLibraryPath)</ILINK_TranslatedLibraryPath>
</PropertyGroup>
<PropertyGroup Condition="'$(Cfg_1_Win32)'!=''">
<AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
<ILINK_LibraryPath>$(BDSLIB)\$(PLATFORM)$(CC_SUFFIX)\debug;$(ILINK_LibraryPath)</ILINK_LibraryPath>
<DynamicRTL>false</DynamicRTL>
<UsePackages>false</UsePackages>
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
<VerInfo_Locale>1033</VerInfo_Locale>
<LinkPackageStatics>rtl.lib;vcl.lib;vclwinx.lib;vclimg.lib;bindengine.lib;adortl.lib;dbrtl.lib;vclx.lib;soaprtl.lib;xmlrtl.lib;inet.lib;vclactnband.lib;vcldb.lib;VclSmp.lib;bindcomp.lib;RESTComponents.lib;CustomIPTransport.lib;FireDAC.lib;FireDACCommonDriver.lib;FireDACCommon.lib;ipstudiowin.lib;dac290.lib;TMSVCLUIPackPkg.lib;unidac290.lib;TMSVCLUIPackPkgEx.lib;DbxCommonDriver.lib;dsnap.lib</LinkPackageStatics>
<FinalOutputDir>.</FinalOutputDir>
</PropertyGroup>
<PropertyGroup Condition="'$(Cfg_1_Win64x)'!=''">
<AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
<LinkPackageImports>rtl.bpi;vcl.bpi;vclwinx.bpi;vclimg.bpi;bindengine.bpi;adortl.bpi;dbrtl.bpi;vclx.bpi;soaprtl.bpi;xmlrtl.bpi;inet.bpi;vclactnband.bpi;vcldb.bpi;VclSmp.bpi;bindcomp.bpi;RESTComponents.bpi;CustomIPTransport.bpi;FireDAC.bpi;FireDACCommonDriver.bpi;FireDACCommon.bpi;ipstudiowin.bpi;dac290.bpi;TMSVCLUIPackPkg.bpi;unidac290.bpi;TMSVCLUIPackPkgEx.bpi;DbxCommonDriver.bpi;dsnap.bpi</LinkPackageImports>
</PropertyGroup>
<PropertyGroup Condition="'$(Cfg_2)'!=''">
<Defines>NDEBUG;$(Defines)</Defines>
<TASM_Debugging>None</TASM_Debugging>
</PropertyGroup>
<PropertyGroup Condition="'$(Cfg_2_Win32)'!=''">
<AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
<BCC_UseClassicCompiler>false</BCC_UseClassicCompiler>
</PropertyGroup>
<PropertyGroup Condition="'$(Cfg_2_Win64x)'!=''">
<AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
</PropertyGroup>
<ItemGroup>
<CppCompile Include="fDocEntryFind.cpp">
<Form>frmDocEntryFind</Form>
<FormType>dfm</FormType>
<DependentOn>fDocEntryFind.h</DependentOn>
<BuildOrder>3</BuildOrder>
</CppCompile>
<CppCompile Include="Project1.cpp">
<BuildOrder>0</BuildOrder>
</CppCompile>
<PCHCompile Include="Project1PCH1.h">
<BuildOrder>1</BuildOrder>
<PCH>true</PCH>
</PCHCompile>
<CppCompile Include="Unit1.cpp">
<Form>Form1</Form>
<FormType>dfm</FormType>
<DependentOn>Unit1.h</DependentOn>
<BuildOrder>2</BuildOrder>
</CppCompile>
<FormResources Include="Unit1.dfm"/>
<FormResources Include="fDocEntryFind.dfm"/>
<BuildConfiguration Include="Base">
<Key>Base</Key>
</BuildConfiguration>
<BuildConfiguration Include="Debug">
<Key>Cfg_1</Key>
<CfgParent>Base</CfgParent>
</BuildConfiguration>
<BuildConfiguration Include="Release">
<Key>Cfg_2</Key>
<CfgParent>Base</CfgParent>
</BuildConfiguration>
</ItemGroup>
<ProjectExtensions>
<Borland.Personality>CPlusPlusBuilder.Personality.12</Borland.Personality>
<Borland.ProjectType>CppVCLApplication</Borland.ProjectType>
<BorlandProject>
<CPlusPlusBuilder.Personality>
<ProjectProperties>
<ProjectProperties Name="AutoShowDeps">False</ProjectProperties>
<ProjectProperties Name="ManagePaths">True</ProjectProperties>
<ProjectProperties Name="VerifyPackages">True</ProjectProperties>
<ProjectProperties Name="IndexFiles">False</ProjectProperties>
</ProjectProperties>
<Source>
<Source Name="MainSource">Project1.cpp</Source>
</Source>
<Excluded_Packages>
<Excluded_Packages Name="$(BDSBIN)\bcboffice2k290.bpl">Embarcadero C++Builder Office 2000 Servers Package</Excluded_Packages>
<Excluded_Packages Name="$(BDSBIN)\bcbofficexp290.bpl">Embarcadero C++Builder Office XP Servers Package</Excluded_Packages>
<Excluded_Packages Name="$(BDSBIN)\dcloffice2k290.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
<Excluded_Packages Name="$(BDSBIN)\dclofficexp290.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
</Excluded_Packages>
</CPlusPlusBuilder.Personality>
<Deployment Version="5">
<DeployFile Condition="'$(DynamicRTL)'=='true'" LocalName="$(BDS)\Redist\osx32\libcgcrtl.dylib" Class="DependencyModule">
<Platform Name="OSX32">
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployFile Condition="'$(DynamicRTL)'=='true'" LocalName="$(BDS)\Redist\osx32\libcgstl.dylib" Class="DependencyModule">
<Platform Name="OSX32">
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployFile Condition="'$(UsingDelphiRTL)'=='true'" LocalName="$(BDS)\bin64\borlndmm.dll" Class="DependencyModule">
<Platform Name="Win64">
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployFile Condition="'$(DynamicRTL)'=='true' And '$(Multithreaded)'!='true'" LocalName="$(BDS)\bin64\cc64280.dll" Class="DependencyModule"/>
<DeployFile Condition="'$(DynamicRTL)'=='true' And '$(Multithreaded)'=='true'" LocalName="$(BDS)\bin64\cc64280mt.dll" Class="DependencyModule"/>
<DeployFile Condition="'$(DynamicRTL)'=='true' And '$(Multithreaded)'!='true'" LocalName="$(BDS)\bin64\cc64290.dll" Class="DependencyModule">
<Platform Name="Win64">
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployFile Condition="'$(DynamicRTL)'=='true' And '$(Multithreaded)'=='true'" LocalName="$(BDS)\bin64\cc64290mt.dll" Class="DependencyModule">
<Platform Name="Win64">
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployFile Condition="'$(UsingDelphiRTL)'=='true'" LocalName="$(BDS)\bin\borlndmm.dll" Class="DependencyModule">
<Platform Name="Win32">
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployFile Condition="'$(DynamicRTL)'=='true' And '$(Multithreaded)'!='true'" LocalName="$(BDS)\bin\cc32280.dll" Class="DependencyModule"/>
<DeployFile Condition="'$(DynamicRTL)'=='true' And '$(Multithreaded)'=='true'" LocalName="$(BDS)\bin\cc32280mt.dll" Class="DependencyModule"/>
<DeployFile Condition="'$(DynamicRTL)'=='true' And '$(Multithreaded)'!='true'" LocalName="$(BDS)\bin\cc32290.dll" Class="DependencyModule">
<Platform Name="Win32">
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployFile Condition="'$(DynamicRTL)'=='true' And '$(Multithreaded)'=='true'" LocalName="$(BDS)\bin\cc32290mt.dll" Class="DependencyModule">
<Platform Name="Win32">
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployFile Condition="'$(DynamicRTL)'=='true' And '$(Multithreaded)'!='true'" LocalName="$(BDS)\bin\cc32c280.dll" Class="DependencyModule"/>
<DeployFile Condition="'$(DynamicRTL)'=='true' And '$(Multithreaded)'=='true'" LocalName="$(BDS)\bin\cc32c280mt.dll" Class="DependencyModule"/>
<DeployFile Condition="'$(DynamicRTL)'=='true' And '$(Multithreaded)'!='true'" LocalName="$(BDS)\bin\cc32c290.dll" Class="DependencyModule">
<Platform Name="Win32">
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployFile Condition="'$(DynamicRTL)'=='true' And '$(Multithreaded)'=='true'" LocalName="$(BDS)\bin\cc32c290mt.dll" Class="DependencyModule">
<Platform Name="Win32">
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployFile LocalName=".\Win32\Debug\Project1.exe" Configuration="Debug" Class="ProjectOutput"/>
<DeployFile LocalName=".\Win32\Debug\Project1.exe" Configuration="Debug" Class="ProjectOutput">
<Platform Name="Win32">
<RemoteName>Project1.exe</RemoteName>
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployFile LocalName=".\Win32\Debug\Project1.tds" Configuration="Debug" Class="DebugSymbols"/>
<DeployFile LocalName=".\Win32\Debug\Project1.tds" Configuration="Debug" Class="DebugSymbols">
<Platform Name="Win32">
<RemoteName>Project1.tds</RemoteName>
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployClass Name="AdditionalDebugSymbols">
<Platform Name="iOSSimulator">
<Operation>1</Operation>
</Platform>
<Platform Name="OSX32">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Win32">
<Operation>0</Operation>
</Platform>
</DeployClass>
<DeployClass Name="AndroidFileProvider">
<Platform Name="Android">
<RemoteDir>res\xml</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\xml</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="AndroidLibnativeArmeabiFile">
<Platform Name="Android">
<RemoteDir>library\lib\armeabi</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>library\lib\armeabi</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="AndroidLibnativeArmeabiv7aFile">
<Platform Name="Android64">
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="AndroidLibnativeMipsFile">
<Platform Name="Android">
<RemoteDir>library\lib\mips</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>library\lib\mips</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="AndroidServiceOutput">
<Platform Name="Android">
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>library\lib\arm64-v8a</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="AndroidServiceOutput_Android32">
<Platform Name="Android64">
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="AndroidSplashImageDef">
<Platform Name="Android">
<RemoteDir>res\drawable</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="AndroidSplashImageDefV21">
<Platform Name="Android">
<RemoteDir>res\drawable-anydpi-v21</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-anydpi-v21</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="AndroidSplashStyles">
<Platform Name="Android">
<RemoteDir>res\values</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\values</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="AndroidSplashStylesV21">
<Platform Name="Android">
<RemoteDir>res\values-v21</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\values-v21</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="AndroidSplashStylesV31">
<Platform Name="Android">
<RemoteDir>res\values-v31</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\values-v31</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_AdaptiveIcon">
<Platform Name="Android">
<RemoteDir>res\drawable-anydpi-v26</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-anydpi-v26</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_AdaptiveIconBackground">
<Platform Name="Android">
<RemoteDir>res\drawable</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_AdaptiveIconForeground">
<Platform Name="Android">
<RemoteDir>res\drawable</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_AdaptiveIconMonochrome">
<Platform Name="Android">
<RemoteDir>res\drawable</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_AdaptiveIconV33">
<Platform Name="Android">
<RemoteDir>res\drawable-anydpi-v33</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-anydpi-v33</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_Colors">
<Platform Name="Android">
<RemoteDir>res\values</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\values</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_ColorsDark">
<Platform Name="Android">
<RemoteDir>res\values-night-v21</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\values-night-v21</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_DefaultAppIcon">
<Platform Name="Android">
<RemoteDir>res\drawable</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_LauncherIcon144">
<Platform Name="Android">
<RemoteDir>res\drawable-xxhdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-xxhdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_LauncherIcon192">
<Platform Name="Android">
<RemoteDir>res\drawable-xxxhdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-xxxhdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_LauncherIcon36">
<Platform Name="Android">
<RemoteDir>res\drawable-ldpi</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-ldpi</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_LauncherIcon48">
<Platform Name="Android">
<RemoteDir>res\drawable-mdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-mdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_LauncherIcon72">
<Platform Name="Android">
<RemoteDir>res\drawable-hdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-hdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_LauncherIcon96">
<Platform Name="Android">
<RemoteDir>res\drawable-xhdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-xhdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_NotificationIcon24">
<Platform Name="Android">
<RemoteDir>res\drawable-mdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-mdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_NotificationIcon36">
<Platform Name="Android">
<RemoteDir>res\drawable-hdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-hdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_NotificationIcon48">
<Platform Name="Android">
<RemoteDir>res\drawable-xhdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-xhdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_NotificationIcon72">
<Platform Name="Android">
<RemoteDir>res\drawable-xxhdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-xxhdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_NotificationIcon96">
<Platform Name="Android">
<RemoteDir>res\drawable-xxxhdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-xxxhdpi</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_SplashImage426">
<Platform Name="Android">
<RemoteDir>res\drawable-small</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-small</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_SplashImage470">
<Platform Name="Android">
<RemoteDir>res\drawable-normal</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-normal</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_SplashImage640">
<Platform Name="Android">
<RemoteDir>res\drawable-large</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-large</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_SplashImage960">
<Platform Name="Android">
<RemoteDir>res\drawable-xlarge</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-xlarge</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_Strings">
<Platform Name="Android">
<RemoteDir>res\values</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\values</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_VectorizedNotificationIcon">
<Platform Name="Android">
<RemoteDir>res\drawable-anydpi-v24</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-anydpi-v24</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_VectorizedSplash">
<Platform Name="Android">
<RemoteDir>res\drawable</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_VectorizedSplashDark">
<Platform Name="Android">
<RemoteDir>res\drawable-night-anydpi-v21</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-night-anydpi-v21</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_VectorizedSplashV31">
<Platform Name="Android">
<RemoteDir>res\drawable-anydpi-v31</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-anydpi-v31</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="Android_VectorizedSplashV31Dark">
<Platform Name="Android">
<RemoteDir>res\drawable-night-anydpi-v31</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>res\drawable-night-anydpi-v31</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="DebugSymbols">
<Platform Name="iOSSimulator">
<Operation>1</Operation>
</Platform>
<Platform Name="OSX32">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Win32">
<Operation>0</Operation>
</Platform>
</DeployClass>
<DeployClass Name="DependencyFramework">
<Platform Name="OSX32">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
<Extensions>.framework</Extensions>
</Platform>
<Platform Name="OSX64">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
<Extensions>.framework</Extensions>
</Platform>
<Platform Name="OSXARM64">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
<Extensions>.framework</Extensions>
</Platform>
<Platform Name="Win32">
<Operation>0</Operation>
</Platform>
</DeployClass>
<DeployClass Name="DependencyModule">
<Platform Name="iOSDevice32">
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
<Platform Name="iOSDevice64">
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
<Platform Name="iOSSimARM64">
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
<Platform Name="OSX32">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
<Platform Name="OSX64">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
<Platform Name="OSXARM64">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
<Platform Name="Win32">
<Operation>0</Operation>
<Extensions>.dll;.bpl</Extensions>
</Platform>
</DeployClass>
<DeployClass Required="true" Name="DependencyPackage">
<Platform Name="iOSDevice32">
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
<Platform Name="iOSDevice64">
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
<Platform Name="iOSSimARM64">
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
<Platform Name="OSX32">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
<Platform Name="OSX64">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
<Platform Name="OSXARM64">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
<Platform Name="Win32">
<Operation>0</Operation>
<Extensions>.bpl</Extensions>
</Platform>
</DeployClass>
<DeployClass Name="File">
<Platform Name="Android">
<Operation>0</Operation>
</Platform>
<Platform Name="Android64">
<Operation>0</Operation>
</Platform>
<Platform Name="iOSDevice32">
<Operation>0</Operation>
</Platform>
<Platform Name="iOSDevice64">
<Operation>0</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<Operation>0</Operation>
</Platform>
<Platform Name="OSX32">
<RemoteDir>Contents\Resources\StartUp\</RemoteDir>
<Operation>0</Operation>
</Platform>
<Platform Name="OSX64">
<RemoteDir>Contents\Resources\StartUp\</RemoteDir>
<Operation>0</Operation>
</Platform>
<Platform Name="OSXARM64">
<RemoteDir>Contents\Resources\StartUp\</RemoteDir>
<Operation>0</Operation>
</Platform>
<Platform Name="Win32">
<Operation>0</Operation>
</Platform>
</DeployClass>
<DeployClass Name="ProjectAndroidManifest">
<Platform Name="Android">
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="ProjectOSXDebug">
<Platform Name="OSX64">
<RemoteDir>..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="OSXARM64">
<RemoteDir>..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="ProjectOSXEntitlements">
<Platform Name="OSX32">
<RemoteDir>..\</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="OSX64">
<RemoteDir>..\</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="OSXARM64">
<RemoteDir>..\</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="ProjectOSXInfoPList">
<Platform Name="OSX32">
<RemoteDir>Contents</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="OSX64">
<RemoteDir>Contents</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="OSXARM64">
<RemoteDir>Contents</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="ProjectOSXResource">
<Platform Name="OSX32">
<RemoteDir>Contents\Resources</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="OSX64">
<RemoteDir>Contents\Resources</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="OSXARM64">
<RemoteDir>Contents\Resources</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Required="true" Name="ProjectOutput">
<Platform Name="Android">
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Android64">
<RemoteDir>library\lib\arm64-v8a</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSDevice32">
<Operation>1</Operation>
</Platform>
<Platform Name="iOSDevice64">
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<Operation>1</Operation>
</Platform>
<Platform Name="Linux64">
<Operation>1</Operation>
</Platform>
<Platform Name="OSX32">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="OSX64">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="OSXARM64">
<RemoteDir>Contents\MacOS</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Win32">
<Operation>0</Operation>
</Platform>
</DeployClass>
<DeployClass Name="ProjectOutput_Android32">
<Platform Name="Android64">
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="ProjectUWPManifest">
<Platform Name="Win32">
<Operation>1</Operation>
</Platform>
<Platform Name="Win64">
<Operation>1</Operation>
</Platform>
<Platform Name="Win64x">
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="ProjectiOSDeviceDebug">
<Platform Name="iOSDevice32">
<RemoteDir>..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="ProjectiOSEntitlements">
<Platform Name="iOSDevice32">
<RemoteDir>..\</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSDevice64">
<RemoteDir>..\</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="ProjectiOSInfoPList">
<Platform Name="iOSDevice32">
<Operation>1</Operation>
</Platform>
<Platform Name="iOSDevice64">
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="ProjectiOSLaunchScreen">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen</RemoteDir>
<Operation>64</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen</RemoteDir>
<Operation>64</Operation>
</Platform>
</DeployClass>
<DeployClass Name="ProjectiOSResource">
<Platform Name="iOSDevice32">
<Operation>1</Operation>
</Platform>
<Platform Name="iOSDevice64">
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="UWP_CppLogo150">
<Platform Name="Win32">
<RemoteDir>Assets</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Win64">
<RemoteDir>Assets</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Win64x">
<RemoteDir>Assets</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="UWP_CppLogo44">
<Platform Name="Win32">
<RemoteDir>Assets</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Win64">
<RemoteDir>Assets</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="Win64x">
<RemoteDir>Assets</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iOS_AppStore1024">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPad_AppIcon152">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPad_AppIcon167">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPad_Launch2x">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPad_LaunchDark2x">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPad_Notification40">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPad_Setting58">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPad_SpotLight80">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPhone_AppIcon120">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPhone_AppIcon180">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPhone_Launch2x">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPhone_Launch3x">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPhone_LaunchDark2x">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPhone_LaunchDark3x">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\LaunchScreenImage.imageset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPhone_Notification40">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPhone_Notification60">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPhone_Setting58">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPhone_Setting87">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPhone_Spotlight120">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="iPhone_Spotlight80">
<Platform Name="iOSDevice64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
<Platform Name="iOSSimARM64">
<RemoteDir>..\$(PROJECTNAME).launchscreen\Assets\AppIcon.appiconset</RemoteDir>
<Operation>1</Operation>
</Platform>
</DeployClass>
<ProjectRoot Platform="Android" Name="$(PROJECTNAME)"/>
<ProjectRoot Platform="Android64" Name="$(PROJECTNAME)"/>
<ProjectRoot Platform="iOSDevice32" Name="$(PROJECTNAME).app"/>
<ProjectRoot Platform="iOSDevice64" Name="$(PROJECTNAME).app"/>
<ProjectRoot Platform="iOSSimARM64" Name="$(PROJECTNAME).app"/>
<ProjectRoot Platform="Linux64" Name="$(PROJECTNAME)"/>
<ProjectRoot Platform="OSX32" Name="$(PROJECTNAME).app"/>
<ProjectRoot Platform="OSX64" Name="$(PROJECTNAME).app"/>
<ProjectRoot Platform="OSXARM64" Name="$(PROJECTNAME).app"/>
<ProjectRoot Platform="Win32" Name="$(PROJECTNAME)"/>
<ProjectRoot Platform="Win64" Name="$(PROJECTNAME)"/>
<ProjectRoot Platform="Win64x" Name="$(PROJECTNAME)"/>
</Deployment>
<Platforms>
<Platform value="Win32">True</Platform>
<Platform value="Win64">False</Platform>
<Platform value="Win64x">True</Platform>
</Platforms>
</BorlandProject>
<ProjectFileVersion>12</ProjectFileVersion>
</ProjectExtensions>
<Import Project="$(BDS)\Bin\CodeGear.Cpp.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Cpp.Targets')"/>
<Import Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj" Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')"/>
<Import Project="$(MSBuildProjectName).deployproj" Condition="Exists('$(MSBuildProjectName).deployproj')"/>
</Project>
dev/Project1.cbproj.local 0 → 100644
<?xml version="1.0" encoding="utf-8"?>
<BorlandProject>
<Transactions>
<Transaction>2023/10/31 23:31:08.000.427,=C:\Users\Admin\Documents\Embarcadero\Studio\Projects\Unit1.cpp</Transaction>
<Transaction>2023/10/31 23:31:08.000.411,=C:\Users\Admin\Documents\Embarcadero\Studio\Projects\Project1PCH1.h</Transaction>
<Transaction>2023/10/31 23:32:16.000.625,C:\Users\Admin\Documents\Embarcadero\Studio\Projects\Project1.cbproj=C:\Projects2\Twilio\TwilioPhoneApp\Project1.cbproj</Transaction>
<Transaction>2023/10/31 23:32:16.000.625,C:\Users\Admin\Documents\Embarcadero\Studio\Projects\Unit1.h=C:\Projects2\Twilio\TwilioPhoneApp\Unit1.h</Transaction>
<Transaction>2023/10/31 23:32:16.000.625,C:\Users\Admin\Documents\Embarcadero\Studio\Projects\Unit1.dfm=C:\Projects2\Twilio\TwilioPhoneApp\Unit1.dfm</Transaction>
<Transaction>2023/10/31 23:32:16.000.625,C:\Users\Admin\Documents\Embarcadero\Studio\Projects\Unit1.cpp=C:\Projects2\Twilio\TwilioPhoneApp\Unit1.cpp</Transaction>
<Transaction>2023/10/31 23:32:16.000.609,C:\Users\Admin\Documents\Embarcadero\Studio\Projects\Project1PCH1.h=C:\Projects2\Twilio\TwilioPhoneApp\Project1PCH1.h</Transaction>
<Transaction>2023/11/07 21:20:30.000.406,=C:\Users\Public\Documents\Embarcadero\Studio\22.0\Dcp\JSONDictionaryPkg.lib</Transaction>
<Transaction>2023/11/08 22:57:12.000.558,=C:\Users\Public\Documents\Embarcadero\Studio\22.0\Dcp\DictionaryPackage.lib</Transaction>
<Transaction>2025/02/11 12:37:55.000.601,=C:\Projects2\Twilio\TwilioMsgs.vcl\dev\fDocEntryFind.cpp</Transaction>
</Transactions>
</BorlandProject>
dev/Project1.cpp 0 → 100644
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include <tchar.h>
//---------------------------------------------------------------------------
USEFORM("Unit1.cpp", Form1);
USEFORM("fDocEntryFind.cpp", frmDocEntryFind);
//---------------------------------------------------------------------------
int WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int)
{
try
{
Application->Initialize();
Application->MainFormOnTaskBar = true;
Application->CreateForm(__classid(TForm1), &Form1);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
catch (...)
{
try
{
throw Exception("");
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
}
return 0;
}
//---------------------------------------------------------------------------
dev/Project1.map 0 → 100644
Start Length Name Class
0001:00401000 000DEB888H _TEXT CODE
0002:011ED000 00003BE10H _DATA DATA
0003:01228E10 00002B484H _BSS BSS
0004:00000000 000000104H _TLS TLS
dev/Project1PCH1.h 0 → 100644
#include <vcl.h>
#include <tchar.h>
dev/Unit1.cpp 0 → 100644
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "AdvGrid"
#pragma link "AdvObj"
#pragma link "AdvUtil"
#pragma link "BaseGrid"
#pragma link "DBAdvGrid"
#pragma link "AdvSplitter"
#pragma link "AdvEdit"
#pragma link "vcl.wwdbcomb"
#pragma link "vcl.wwdbedit"
#pragma link "vcl.wwdotdot"
#pragma link "AdvOfficePager"
#pragma link "MemDS"
#pragma link "VirtualTable"
#pragma link "DBAccess"
#pragma link "Uni"
#pragma link "vcl.wwdbdatetimepicker"
#pragma link "PostgreSQLUniProvider"
#pragma link "UniProvider"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
pagesLoaded = 0;
accountSid = "AC717f06b3c10bbecff42487426e34fdb3";
authHeader = "Basic QUM3MTdmMDZiM2MxMGJiZWNmZjQyNDg3NDI2ZTM0ZmRiMzphMGRlYzEyOGMxYjVhMzIzMTkwOWJhODFkYTg5NDdiNg==";
TDateTime dtNow = Date();
unsigned short y, m, d;
dtNow.DecodeDate(&y, &m, &d);
for(int i = 0; i < 12; i++)
dbcbYear->Items->Add(y - i);
static String sMonths[12] = {
"January","February","March","April","May","June",
"July","August","September","October","November","December"
};
for(int i = 0; i < 12; i++)
dbcbMonth->Items->Add(sMonths[i]);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::btnExitClick(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::btnMessagesClick(TObject *Sender)
{
String res = BuildMessageRequestURL();
TJSONValue* jValue;
TJSONObject* jObj;
TJSONArray* jaMessages;
String jsonPair;
Memo1->Lines->Add("---------------------------------------------------------------");
Memo1->Lines->Add("/Messages.json end point...");
Memo2->Clear();
Memo3->Clear();
// Create REST client
TRESTClient* pRESTClient = new TRESTClient(NULL);
pRESTClient->BaseURL = "https://api.twilio.com";
TRESTRequest* pRESTRequest = new TRESTRequest(NULL);
pRESTRequest->Client = pRESTClient;
TRESTResponse* pRESTResponse = new TRESTResponse(NULL);
pRESTRequest->Response = pRESTResponse;
pRESTRequest->Method = rmGET;
pRESTRequest->Resource = res;
// Set authorization header
TRESTRequestParameter* param = pRESTRequest->Params->AddItem();
param->Name = "Authorization";
param->Kind = pkHTTPHEADER;
param->Options = TRESTRequestParameterOptions() << poDoNotEncode;
param->Value = authHeader;
Memo1->Lines->Add("Messages: " + pRESTRequest->GetFullRequestURL());
pRESTRequest->Execute();
jValue = pRESTResponse->JSONValue;
Memo3->Lines->Add("");
Memo3->Lines->Add("jValue = pRESTResponse->JSONValue;");
Memo3->Lines->Add("---------------------------------------------------------------------");
Memo3->Lines->Add(jValue->Format(2));
jObj = dynamic_cast<TJSONObject*>(jValue);
if (jObj)
{
for (int e = 0; e < jObj->Count; e++)
{
if (jObj->Pairs[e]->JsonString->Value() != "messages")
{
jsonPair = jObj->Pairs[e]->JsonString->Value();
jsonPair += " : " + jObj->Pairs[e]->JsonValue->Value();
Memo1->Lines->Add(jsonPair);
}
}
if (jObj->Get("next_page_uri"))
txtNextPageUri->Text = jObj->Get("next_page_uri")->JsonValue->Value();
else
txtNextPageUri->Text = "";
jaMessages = dynamic_cast<TJSONArray*>(jObj->GetValue("messages"));
if (jaMessages && jaMessages->Count > 0)
{
Memo2->Lines->Add("jaMessages->Count: " + IntToStr(jaMessages->Count));
GetFieldsFromJsonArray(jaMessages);
for (int i = 0; i < fieldsList->Count; i++)
{
Memo2->Lines->Add(fieldsList->Strings[i]);
}
LoadJsonArray(jaMessages, "");
Memo2->Lines->Add("grdMessages->Count: " + IntToStr(grdData->RowCount - 1));
pagesLoaded = 1;
}
else
{
Memo2->Lines->Add("No messages returned.");
grdData->ClearAll();
grdData->RowCount = 1;
}
}
else
{
Memo1->Lines->Add("No JSON object returned.");
}
if (cbSaveToDB->Checked)
{
SaveMessagesToDB(jaMessages);
}
delete pRESTClient;
delete pRESTRequest;
delete pRESTResponse;
}
//---------------------------------------------------------------------------
void TForm1::SaveMessagesToDB(TJSONArray* jaMessages)
{
if (!jaMessages || jaMessages->Count == 0)
return;
if (!ucTwilioDB->Connected)
ucTwilioDB->Connected = true;
if (!uqMessages->Active)
uqMessages->Active = true;
for (int i = 0; i < jaMessages->Count; i++)
{
TJSONObject* jso = dynamic_cast<TJSONObject*>(jaMessages->Items[i]);
if (!jso)
continue;
String sid = jso->GetValue("sid")->Value();
// Check if the message already exists
uqMessages->Close();
uqMessages->SQL->Text = "SELECT * FROM public.messages WHERE sid = :sid";
uqMessages->ParamByName("sid")->AsString = sid;
Memo1->Lines->Add("Checking available fields in uqMessages:");
uqMessages->Open();
if (uqMessages->IsEmpty())
{
uqMessages->Append(); // Insert new record
}
else
{
uqMessages->Edit(); // Update existing record
}
uqMessages->FieldByName("sid")->AsString = sid;
uqMessages->FieldByName("account_sid")->AsString = jso->GetValue("account_sid")->Value();
uqMessages->FieldByName("api_version")->AsString = jso->GetValue("api_version")->Value();
uqMessages->FieldByName("body")->AsString = jso->GetValue("body")->Value();
uqMessages->FieldByName("date_created")->AsDateTime = ParseTwilioDateTime(jso->GetValue("date_created")->Value());
uqMessages->FieldByName("date_sent")->AsDateTime = ParseTwilioDateTime(jso->GetValue("date_sent")->Value());
uqMessages->FieldByName("date_updated")->AsDateTime = ParseTwilioDateTime(jso->GetValue("date_updated")->Value());
uqMessages->FieldByName("direction")->AsString = jso->GetValue("direction")->Value();
uqMessages->FieldByName("error_code")->AsInteger = jso->GetValue("error_code")->Value().ToIntDef(0);
uqMessages->FieldByName("error_message")->AsString = jso->GetValue("error_message")->Value();
uqMessages->FieldByName("from_number")->AsString = jso->GetValue("from")->Value();
uqMessages->FieldByName("messaging_service_sid")->AsString = jso->GetValue("messaging_service_sid")->Value();
uqMessages->FieldByName("num_media")->AsInteger = jso->GetValue("num_media")->Value().ToIntDef(0);
uqMessages->FieldByName("num_segments")->AsInteger = jso->GetValue("num_segments")->Value().ToIntDef(0);
uqMessages->FieldByName("price")->AsFloat = jso->GetValue("price")->Value().ToDouble();
uqMessages->FieldByName("price_unit")->AsString = jso->GetValue("price_unit")->Value();
uqMessages->FieldByName("status")->AsString = jso->GetValue("status")->Value();
uqMessages->FieldByName("to_number")->AsString = jso->GetValue("to")->Value();
uqMessages->FieldByName("uri")->AsString = jso->GetValue("uri")->Value();
uqMessages->Post();
}
}
//---------------------------------------------------------------------------
TDateTime TForm1::ParseTwilioDateTime(const UnicodeString &dateStr)
{
// Twilio format: "Wed, 12 Feb 2025 18:21:17 +0000"
std::map<UnicodeString, int> monthMap;
monthMap["Jan"] = 1; monthMap["Feb"] = 2; monthMap["Mar"] = 3;
monthMap["Apr"] = 4; monthMap["May"] = 5; monthMap["Jun"] = 6;
monthMap["Jul"] = 7; monthMap["Aug"] = 8; monthMap["Sep"] = 9;
monthMap["Oct"] = 10; monthMap["Nov"] = 11; monthMap["Dec"] = 12;
UnicodeString cleanedDateStr = dateStr.SubString(6, dateStr.Length() - 5);
cleanedDateStr = cleanedDateStr.SubString(1, cleanedDateStr.Length() - 6);
TStringList *parts = new TStringList();
parts->Delimiter = ' ';
parts->StrictDelimiter = true;
parts->DelimitedText = cleanedDateStr;
if (parts->Count < 4) {
delete parts;
throw EConvertError("Invalid Twilio date format: " + dateStr);
}
int day = parts->Strings[0].ToInt();
UnicodeString monthStr = parts->Strings[1];
int year = parts->Strings[2].ToInt();
UnicodeString timeStr = parts->Strings[3];
if (monthMap.find(monthStr) == monthMap.end()) {
delete parts;
throw EConvertError("Invalid month name: " + monthStr);
}
int month = monthMap[monthStr];
UnicodeString formattedDate = UnicodeString::Format(
L"%04d-%02d-%02d %s", ARRAYOFCONST((year, month, day, timeStr))
);
TFormatSettings formatSettings;
GetLocaleFormatSettings(0, formatSettings);
formatSettings.ShortDateFormat = "yyyy-mm-dd";
formatSettings.LongTimeFormat = "hh:nn:ss";
formatSettings.DateSeparator = '-';
formatSettings.TimeSeparator = ':';
TDateTime result = StrToDateTime(formattedDate, formatSettings);
delete parts;
return result;
}
//---------------------------------------------------------------------------
String TForm1::BuildMessageRequestURL()
{
String url = "/2010-04-01/Accounts/" + accountSid + "/Messages.json";
String pageSizeStr = edtPageSize->Text.Trim();
bool hasStartDate = !dtpStartDate->Text.IsEmpty();
bool hasEndDate = !dtpEndDate->Text.IsEmpty();
if (hasStartDate || hasEndDate)
{
TDateTime d1, d2;
if (hasStartDate) d1 = dtpStartDate->Date;
if (hasEndDate) d2 = dtpEndDate->Date;
if (hasStartDate && hasEndDate)
{
if (d1 > d2) std::swap(d1, d2);
url += "?DateSent>=" + FormatDateTime("yyyy-mm-dd", d1) +
"&DateSent<=" + FormatDateTime("yyyy-mm-dd", d2);
}
else if (hasStartDate)
{
url += "?DateSent>=" + FormatDateTime("yyyy-mm-dd", d1);
}
else if (hasEndDate)
{
url += "?DateSent<=" + FormatDateTime("yyyy-mm-dd", d2);
}
if (!pageSizeStr.IsEmpty())
url += "&PageSize=" + pageSizeStr;
}
else
{
if (!pageSizeStr.IsEmpty())
url += "?PageSize=" + pageSizeStr;
}
return url;
}
//---------------------------------------------------------------------------
void TForm1::GetFieldsFromJsonArray(TJSONArray* jaData)
{
String fieldname;
String str;
TJSONObject* jso;
fieldsList = new TStringList;
if(!jaData || jaData->Count == 0)
return;
jso = dynamic_cast<TJSONObject*>(jaData->Items[0]);
if(!jso)
return;
for( int i = 0; i < jso->Count; i++ ){
fieldname = jso->Pairs[i]->JsonString->Value();
str = fieldname + "=0";
fieldsList->Add( str );
}
}
//---------------------------------------------------------------------------
void TForm1::LoadJsonArray(TJSONArray* jaData, String detail)
{
TJSONObject* jso;
grdData->ClearAll();
grdData->RowCount = 1;
grdData->StartUpdate();
if(!jaData || jaData->Count == 0)
{
grdData->EndUpdate();
return;
}
jso = dynamic_cast<TJSONObject*>(jaData->Items[0]);
if(!jso)
{
grdData->EndUpdate();
return;
}
grdData->ColCount = jso->Count;
for( int e = 0; e < jso->Count; e++ )
grdData->Cells[e+1][0] = jso->Pairs[e]->JsonString->Value();
for( int i = 0; i < jaData->Count; i++ ){
jso = dynamic_cast<TJSONObject*>(jaData->Items[i]);
if(!jso)
continue;
grdData->RowCount++;
int row = grdData->RowCount - 1;
for( int e = 0; e < jso->Count; e++ )
grdData->Cells[e+1][row] = jso->Pairs[e]->JsonValue->Value();
}
grdData->EndUpdate();
}
//---------------------------------------------------------------------------
void TForm1::AppendJsonArray(TJSONArray* jaData)
{
if(!jaData || jaData->Count == 0)
return;
grdData->BeginUpdate();
for(int i = 0; i < jaData->Count; i++)
{
TJSONObject* jso = dynamic_cast<TJSONObject*>(jaData->Items[i]);
if(!jso)
continue;
grdData->RowCount++;
int row = grdData->RowCount - 1;
for(int e = 0; e < jso->Count; e++)
{
grdData->Cells[e+1][row] = jso->Pairs[e]->JsonValue->Value();
}
}
grdData->EndUpdate();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::dbcbMonthCloseUp(TwwDBComboBox *Sender, bool Select)
{
SetDatePickersFromMonthYear();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::dbcbYearCloseUp(TwwDBComboBox *Sender, bool Select)
{
SetDatePickersFromMonthYear();
}
//---------------------------------------------------------------------------
void TForm1::SetDatePickersFromMonthYear()
{
int year = 0;
int month = 0;
if(!dbcbYear->Value.IsEmpty())
year = StrToInt(dbcbYear->Value);
if(!dbcbMonth->Value.IsEmpty())
{
String selMonth = dbcbMonth->Value;
if(selMonth == "January") month = 1;
else if(selMonth == "February") month = 2;
else if(selMonth == "March") month = 3;
else if(selMonth == "April") month = 4;
else if(selMonth == "May") month = 5;
else if(selMonth == "June") month = 6;
else if(selMonth == "July") month = 7;
else if(selMonth == "August") month = 8;
else if(selMonth == "September") month = 9;
else if(selMonth == "October") month = 10;
else if(selMonth == "November") month = 11;
else if(selMonth == "December") month = 12;
}
if(month > 0 && year > 0)
{
TDateTime s = StartOfAMonth(year, month);
TDateTime e = EndOfAMonth(year, month);
dtpStartDate->Date = s;
dtpEndDate->Date = e;
}
else if(year > 0)
{
TDateTime s = StartOfAMonth(year, 1);
TDateTime ee = EndOfAMonth(year, 12);
dtpStartDate->Date = s;
dtpEndDate->Date = ee;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::btnNextPageClick(TObject *Sender)
{
// Stop if there's no next page URI
if (txtNextPageUri->Text.Trim().IsEmpty() || txtNextPageUri->Text == "null")
{
Memo2->Lines->Add("No more pages left to load.");
return;
}
TRESTClient* pRESTClient = new TRESTClient(NULL);
pRESTClient->BaseURL = "https://api.twilio.com";
TRESTRequest* pRESTRequest = new TRESTRequest(NULL);
pRESTRequest->Client = pRESTClient;
TRESTResponse* pRESTResponse = new TRESTResponse(NULL);
pRESTRequest->Response = pRESTResponse;
pRESTRequest->Method = rmGET;
pRESTRequest->Resource = txtNextPageUri->Text;
TRESTRequestParameter* param = pRESTRequest->Params->AddItem();
param->Name = "Authorization";
param->Kind = pkHTTPHEADER;
param->Options = TRESTRequestParameterOptions() << poDoNotEncode;
param->Value = authHeader;
pRESTRequest->Execute();
TJSONObject* jObj = dynamic_cast<TJSONObject*>(pRESTResponse->JSONValue);
if (!jObj)
{
Memo2->Lines->Add("No JSON object returned for next page.");
}
else
{
TJSONArray* jaMessages = dynamic_cast<TJSONArray*>(jObj->GetValue("messages"));
if (jaMessages && jaMessages->Count > 0)
{
AppendJsonArray(jaMessages); // Append new messages
pagesLoaded++;
Memo2->Lines->Add("Loaded next page (#" + IntToStr(pagesLoaded) + ").");
Memo2->Lines->Add("Total messages in grid: " + IntToStr(grdData->RowCount - 1));
// Update next_page_uri
if (jObj->Get("next_page_uri"))
txtNextPageUri->Text = jObj->Get("next_page_uri")->JsonValue->Value();
else
txtNextPageUri->Text = ""; // Stop further pagination
}
else
{
Memo2->Lines->Add("No messages in next page.");
}
}
delete pRESTClient;
delete pRESTRequest;
delete pRESTResponse;
}
//---------------------------------------------------------------------------
dev/Unit1.dfm 0 → 100644
object Form1: TForm1
Left = 0
Top = 0
Caption = 'Form1'
ClientHeight = 722
ClientWidth = 1184
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = []
Position = poDesktopCenter
TextHeight = 15
object AdvSplitter1: TAdvSplitter
Left = 0
Top = 450
Width = 1184
Height = 3
Cursor = crVSplit
Align = alTop
Appearance.BorderColor = clNone
Appearance.BorderColorHot = clNone
Appearance.Color = 12895944
Appearance.ColorTo = 12895944
Appearance.ColorHot = 15917525
Appearance.ColorHotTo = 15917525
GripStyle = sgDots
ExplicitTop = 346
ExplicitWidth = 36
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 1184
Height = 143
Align = alTop
TabOrder = 0
DesignSize = (
1184
143)
object Label2: TLabel
Left = 164
Top = 43
Width = 5
Height = 15
Caption = '-'
end
object Label1: TLabel
Left = 32
Top = 24
Width = 51
Height = 15
Caption = 'Start Date'
end
object Label3: TLabel
Left = 178
Top = 24
Width = 47
Height = 15
Caption = 'End Date'
end
object Label4: TLabel
Left = 342
Top = 24
Width = 36
Height = 15
Caption = 'Month'
end
object Label5: TLabel
Left = 494
Top = 24
Width = 22
Height = 15
Caption = 'Year'
end
object Label6: TLabel
Left = 662
Top = 24
Width = 37
Height = 15
Caption = 'Results'
end
object btnExit: TButton
Left = 1094
Top = 7
Width = 75
Height = 25
Anchors = [akTop, akRight]
Caption = 'Exit'
TabOrder = 0
OnClick = btnExitClick
end
object txtNextPageUri: TAdvEdit
Left = 84
Top = 116
Width = 1090
Height = 23
EmptyTextStyle = []
FlatLineColor = 11250603
FocusColor = clWindow
FocusFontColor = 3881787
LabelCaption = 'next_page_uri'
LabelPosition = lpLeftCenter
LabelFont.Charset = DEFAULT_CHARSET
LabelFont.Color = clWindowText
LabelFont.Height = -12
LabelFont.Name = 'Segoe UI'
LabelFont.Style = []
Lookup.Font.Charset = DEFAULT_CHARSET
Lookup.Font.Color = clWindowText
Lookup.Font.Height = -11
Lookup.Font.Name = 'Segoe UI'
Lookup.Font.Style = []
Lookup.Separator = ';'
Anchors = [akLeft, akTop, akRight]
Color = clWindow
TabOrder = 1
Text = ''
Visible = True
Version = '4.0.6.0'
end
object dtpStartDate: TwwDBDateTimePicker
Left = 32
Top = 40
Width = 121
Height = 23
Epoch = 1950
ShowButton = True
TabOrder = 2
end
object dtpEndDate: TwwDBDateTimePicker
Left = 178
Top = 40
Width = 121
Height = 23
Epoch = 1950
ShowButton = True
TabOrder = 3
end
object dbcbYear: TwwDBComboBox
Left = 494
Top = 40
Width = 123
Height = 23
ShowButton = True
Style = csDropDown
MapList = False
AllowClearKey = False
DropDownCount = 8
ItemHeight = 0
Sorted = False
TabOrder = 4
UnboundDataType = wwDefault
OnCloseUp = dbcbYearCloseUp
end
object edtPageSize: TAdvEdit
Left = 662
Top = 40
Width = 77
Height = 23
EmptyTextStyle = []
FlatLineColor = 11250603
FocusColor = clWindow
FocusFontColor = 3881787
LabelFont.Charset = DEFAULT_CHARSET
LabelFont.Color = clWindowText
LabelFont.Height = -12
LabelFont.Name = 'Segoe UI'
LabelFont.Style = []
Lookup.Font.Charset = DEFAULT_CHARSET
Lookup.Font.Color = clWindowText
Lookup.Font.Height = -11
Lookup.Font.Name = 'Segoe UI'
Lookup.Font.Style = []
Lookup.Separator = ';'
Color = clWindow
ParentShowHint = False
ShowHint = False
TabOrder = 5
Text = '1000'
Visible = True
Version = '4.0.6.0'
end
object cbSaveToDB: TCheckBox
Left = 138
Top = 82
Width = 171
Height = 17
Caption = 'Save Messages to Database'
TabOrder = 6
end
end
object Panel2: TPanel
Left = 0
Top = 453
Width = 1184
Height = 269
Align = alClient
TabOrder = 1
object AdvOfficePager1: TAdvOfficePager
Left = 1
Top = 1
Width = 1182
Height = 267
Align = alClient
ActivePage = AdvOfficePage1
ButtonSettings.CloseButtonPicture.Data = {
424DA20400000000000036040000280000000900000009000000010008000000
00006C000000C30E0000C30E00000001000000010000427B8400DEEFEF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0001000001010100000100
0000000202000100020200000000000202020002020200000000010002020202
0200010000000101000202020001010000000100020202020200010000000002
0202000202020000000000020200010002020000000001000001010100000100
0000}
ButtonSettings.PageListButtonPicture.Data = {
424DA20400000000000036040000280000000900000009000000010008000000
00006C000000C30E0000C30E00000001000000010000427B8400DEEFEF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0001010101000101010100
0000010101000200010101000000010100020202000101000000010002020202
0200010000000002020200020202000000000002020001000202000000000100
0001010100000100000001010101010101010100000001010101010101010100
0000}
ButtonSettings.ScrollButtonPrevPicture.Data = {
424DA20400000000000036040000280000000900000009000000010008000000
00006C000000C30E0000C30E00000001000000010000427B8400DEEFEF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0001010101000001010100
0000010101000202000101000000010100020202000101000000010002020200
0101010000000002020200010101010000000100020202000101010000000101
0002020200010100000001010100020200010100000001010101000001010100
0000}
ButtonSettings.ScrollButtonNextPicture.Data = {
424DA20400000000000036040000280000000900000009000000010008000000
00006C000000C30E0000C30E00000001000000010000427B8400DEEFEF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0001010000010101010100
0000010002020001010101000000010002020200010101000000010100020202
0001010000000101010002020200010000000101000202020001010000000100
0202020001010100000001000202000101010100000001010000010101010100
0000}
ButtonSettings.ScrollButtonFirstPicture.Data = {
424DC60400000000000036040000280000001000000009000000010008000000
000000000000C40E0000C40E00000001000000010000427B84FFDEEFEFFFFFFF
FFFF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF01010101010000010101
0101000001010101010100020200010101000202000101010100020202000101
0002020200010101000202020001010002020200010101000202020001010002
0202000101010101000202020001010002020200010101010100020202000101
0002020200010101010100020200010101000202000101010101010000010101
010100000101}
ButtonSettings.ScrollButtonLastPicture.Data = {
424DC60400000000000036040000280000001000000009000000010008000000
000000000000C40E0000C40E00000001000000010000427B84FFDEEFEFFFFFFF
FFFF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF01010000010101010100
0001010101010100020200010101000202000101010101000202020001010002
0202000101010101000202020001010002020200010101010100020202000101
0002020200010101000202020001010002020200010101000202020001010002
0202000101010100020200010101000202000101010101010000010101010100
000101010101}
ButtonSettings.ClosedListButtonPicture.Data = {
424DA20400000000000036040000280000000900000009000000010008000000
00006C000000C30E0000C30E00000001000000010000427B8400DEEFEF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0001010101000101010100
0000010101000200010101000000010100020202000101000000010002020202
0200010000000002020200020202000000000002020001000202000000000100
0001010100000100000001010101010101010100000001010101010101010100
0000}
ButtonSettings.CloseButtonHint = 'Close'
ButtonSettings.InsertButtonHint = 'Insert new page'
ButtonSettings.PageListButtonHint = 'Page List'
ButtonSettings.ScrollButtonNextHint = 'Next'
ButtonSettings.ScrollButtonPrevHint = 'Previous'
ButtonSettings.ScrollButtonFirstHint = 'First'
ButtonSettings.ScrollButtonLastHint = 'Last'
ButtonSettings.ClosedListButtonHint = 'Closed Pages'
ButtonSettings.ButtonSize = 13
ButtonSettings.FullHeight = True
DoubleBuffered = True
TabSettings.ButtonBorder = False
TabSettings.Rounding = 0
Text = ''
ShowShortCutHints = False
TabOrder = 0
UIStyle = tsOffice2019White
NextPictureChanged = False
PrevPictureChanged = False
TabFontHeight = -11
object AdvOfficePage1: TAdvOfficePage
Left = 1
Top = 26
Width = 1180
Height = 239
Caption = 'AdvOfficePage1'
DoubleBuffered = False
PageAppearance.BorderColor = clNone
PageAppearance.Color = clWhite
PageAppearance.ColorTo = clWhite
PageAppearance.ColorMirror = clWhite
PageAppearance.ColorMirrorTo = clWhite
PageAppearance.Gradient = ggVertical
PageAppearance.GradientMirror = ggVertical
Text = ''
TabAppearance.BorderColor = clWhite
TabAppearance.BorderColorHot = clNone
TabAppearance.BorderColorSelected = clNone
TabAppearance.BorderColorSelectedHot = clNone
TabAppearance.BorderColorDisabled = clNone
TabAppearance.BorderColorDown = clNone
TabAppearance.Color = clWhite
TabAppearance.ColorTo = clWhite
TabAppearance.ColorSelected = clWhite
TabAppearance.ColorSelectedTo = clWhite
TabAppearance.ColorDisabled = 15658734
TabAppearance.ColorDisabledTo = clNone
TabAppearance.ColorHot = 16316922
TabAppearance.ColorHotTo = 16316922
TabAppearance.ColorMirror = clWhite
TabAppearance.ColorMirrorTo = clWhite
TabAppearance.ColorMirrorHot = 16316922
TabAppearance.ColorMirrorHotTo = 16316922
TabAppearance.ColorMirrorSelected = clWhite
TabAppearance.ColorMirrorSelectedTo = clWhite
TabAppearance.ColorMirrorDisabled = 15658734
TabAppearance.ColorMirrorDisabledTo = clNone
TabAppearance.Font.Charset = DEFAULT_CHARSET
TabAppearance.Font.Color = clWindowText
TabAppearance.Font.Height = -11
TabAppearance.Font.Name = 'Segoe UI'
TabAppearance.Font.Style = []
TabAppearance.Gradient = ggVertical
TabAppearance.GradientMirror = ggVertical
TabAppearance.GradientHot = ggVertical
TabAppearance.GradientMirrorHot = ggVertical
TabAppearance.GradientSelected = ggVertical
TabAppearance.GradientMirrorSelected = ggVertical
TabAppearance.GradientDisabled = ggVertical
TabAppearance.GradientMirrorDisabled = ggVertical
TabAppearance.TextColor = 4474440
TabAppearance.TextColorHot = 14916384
TabAppearance.TextColorSelected = 4474440
TabAppearance.TextColorDisabled = 7303023
TabAppearance.ShadowColor = clNone
TabAppearance.HighLightColor = clNone
TabAppearance.HighLightColorHot = clNone
TabAppearance.HighLightColorSelected = clNone
TabAppearance.HighLightColorSelectedHot = clNone
TabAppearance.HighLightColorDown = clNone
TabAppearance.DrawLine = True
TabAppearance.TextSelectedBold = True
TabAppearance.BackGround.Color = clWhite
TabAppearance.BackGround.ColorTo = clWhite
TabAppearance.BackGround.Direction = gdHorizontal
object grdData: TAdvStringGrid
Left = 2
Top = 2
Width = 1176
Height = 235
Align = alClient
Ctl3D = True
DrawingStyle = gdsClassic
FixedColor = clWhite
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goEditing, goFixedColClick]
ParentCtl3D = False
TabOrder = 0
ActiveCellFont.Charset = DEFAULT_CHARSET
ActiveCellFont.Color = 4474440
ActiveCellFont.Height = -11
ActiveCellFont.Name = 'Tahoma'
ActiveCellFont.Style = [fsBold]
ActiveCellColor = 11565130
ActiveCellColorTo = 11565130
BorderColor = 11250603
ControlLook.FixedGradientFrom = clWhite
ControlLook.FixedGradientTo = clWhite
ControlLook.FixedGradientHoverFrom = clGray
ControlLook.FixedGradientHoverTo = clWhite
ControlLook.FixedGradientHoverMirrorFrom = clWhite
ControlLook.FixedGradientHoverMirrorTo = clWhite
ControlLook.FixedGradientHoverBorder = 11645361
ControlLook.FixedGradientDownFrom = clWhite
ControlLook.FixedGradientDownTo = clWhite
ControlLook.FixedGradientDownMirrorFrom = clWhite
ControlLook.FixedGradientDownMirrorTo = clWhite
ControlLook.FixedGradientDownBorder = 11250603
ControlLook.DropDownHeader.Font.Charset = DEFAULT_CHARSET
ControlLook.DropDownHeader.Font.Color = clWindowText
ControlLook.DropDownHeader.Font.Height = -11
ControlLook.DropDownHeader.Font.Name = 'Tahoma'
ControlLook.DropDownHeader.Font.Style = []
ControlLook.DropDownHeader.Visible = True
ControlLook.DropDownHeader.Buttons = <>
ControlLook.DropDownFooter.Font.Charset = DEFAULT_CHARSET
ControlLook.DropDownFooter.Font.Color = clWindowText
ControlLook.DropDownFooter.Font.Height = -11
ControlLook.DropDownFooter.Font.Name = 'Tahoma'
ControlLook.DropDownFooter.Font.Style = []
ControlLook.DropDownFooter.Visible = True
ControlLook.DropDownFooter.Buttons = <>
ControlLook.ToggleSwitch.BackgroundBorderWidth = 1.000000000000000000
ControlLook.ToggleSwitch.ButtonBorderWidth = 1.000000000000000000
ControlLook.ToggleSwitch.CaptionFont.Charset = DEFAULT_CHARSET
ControlLook.ToggleSwitch.CaptionFont.Color = clWindowText
ControlLook.ToggleSwitch.CaptionFont.Height = -12
ControlLook.ToggleSwitch.CaptionFont.Name = 'Segoe UI'
ControlLook.ToggleSwitch.CaptionFont.Style = []
ControlLook.ToggleSwitch.Shadow = False
Filter = <>
FilterDropDown.Font.Charset = DEFAULT_CHARSET
FilterDropDown.Font.Color = clWindowText
FilterDropDown.Font.Height = -11
FilterDropDown.Font.Name = 'Tahoma'
FilterDropDown.Font.Style = []
FilterDropDown.TextChecked = 'Checked'
FilterDropDown.TextUnChecked = 'Unchecked'
FilterDropDownClear = '(All)'
FilterEdit.TypeNames.Strings = (
'Starts with'
'Ends with'
'Contains'
'Not contains'
'Equal'
'Not equal'
'Larger than'
'Smaller than'
'Clear')
FixedColWidth = 16
FixedRowHeight = 22
FixedRowAlways = True
FixedFont.Charset = DEFAULT_CHARSET
FixedFont.Color = clWindowText
FixedFont.Height = -11
FixedFont.Name = 'Tahoma'
FixedFont.Style = [fsBold]
FloatFormat = '%.2f'
HoverButtons.Buttons = <>
HTMLSettings.ImageFolder = 'images'
HTMLSettings.ImageBaseName = 'img'
Look = glCustom
PrintSettings.DateFormat = 'dd/mm/yyyy'
PrintSettings.Font.Charset = DEFAULT_CHARSET
PrintSettings.Font.Color = clWindowText
PrintSettings.Font.Height = -11
PrintSettings.Font.Name = 'Tahoma'
PrintSettings.Font.Style = []
PrintSettings.FixedFont.Charset = DEFAULT_CHARSET
PrintSettings.FixedFont.Color = clWindowText
PrintSettings.FixedFont.Height = -11
PrintSettings.FixedFont.Name = 'Tahoma'
PrintSettings.FixedFont.Style = []
PrintSettings.HeaderFont.Charset = DEFAULT_CHARSET
PrintSettings.HeaderFont.Color = clWindowText
PrintSettings.HeaderFont.Height = -11
PrintSettings.HeaderFont.Name = 'Tahoma'
PrintSettings.HeaderFont.Style = []
PrintSettings.FooterFont.Charset = DEFAULT_CHARSET
PrintSettings.FooterFont.Color = clWindowText
PrintSettings.FooterFont.Height = -11
PrintSettings.FooterFont.Name = 'Tahoma'
PrintSettings.FooterFont.Style = []
PrintSettings.PageNumSep = '/'
SearchFooter.ColorTo = clNone
SearchFooter.FindNextCaption = 'Find &next'
SearchFooter.FindPrevCaption = 'Find &previous'
SearchFooter.Font.Charset = DEFAULT_CHARSET
SearchFooter.Font.Color = clWindowText
SearchFooter.Font.Height = -11
SearchFooter.Font.Name = 'Tahoma'
SearchFooter.Font.Style = []
SearchFooter.HighLightCaption = 'Highlight'
SearchFooter.HintClose = 'Close'
SearchFooter.HintFindNext = 'Find next occurrence'
SearchFooter.HintFindPrev = 'Find previous occurrence'
SearchFooter.HintHighlight = 'Highlight occurrences'
SearchFooter.MatchCaseCaption = 'Match case'
SearchFooter.ResultFormat = '(%d of %d)'
SelectionColor = 13744549
SelectionTextColor = clWindowText
SortSettings.HeaderColor = clWhite
SortSettings.HeaderColorTo = clWhite
SortSettings.HeaderMirrorColor = clWhite
SortSettings.HeaderMirrorColorTo = clWhite
Version = '9.1.4.1'
ColWidths = (
16
64
64
64
64)
RowHeights = (
22
22
22
22
22
22
22
22
22
22)
end
end
object AdvOfficePage2: TAdvOfficePage
Left = 1
Top = 26
Width = 1180
Height = 239
Caption = 'AdvOfficePage2'
DoubleBuffered = False
PageAppearance.BorderColor = clNone
PageAppearance.Color = clWhite
PageAppearance.ColorTo = clWhite
PageAppearance.ColorMirror = clWhite
PageAppearance.ColorMirrorTo = clWhite
PageAppearance.Gradient = ggVertical
PageAppearance.GradientMirror = ggVertical
Text = ''
TabAppearance.BorderColor = clWhite
TabAppearance.BorderColorHot = clNone
TabAppearance.BorderColorSelected = clNone
TabAppearance.BorderColorSelectedHot = clNone
TabAppearance.BorderColorDisabled = clNone
TabAppearance.BorderColorDown = clNone
TabAppearance.Color = clWhite
TabAppearance.ColorTo = clWhite
TabAppearance.ColorSelected = clWhite
TabAppearance.ColorSelectedTo = clWhite
TabAppearance.ColorDisabled = 15658734
TabAppearance.ColorDisabledTo = clNone
TabAppearance.ColorHot = 16316922
TabAppearance.ColorHotTo = 16316922
TabAppearance.ColorMirror = clWhite
TabAppearance.ColorMirrorTo = clWhite
TabAppearance.ColorMirrorHot = 16316922
TabAppearance.ColorMirrorHotTo = 16316922
TabAppearance.ColorMirrorSelected = clWhite
TabAppearance.ColorMirrorSelectedTo = clWhite
TabAppearance.ColorMirrorDisabled = 15658734
TabAppearance.ColorMirrorDisabledTo = clNone
TabAppearance.Font.Charset = DEFAULT_CHARSET
TabAppearance.Font.Color = clWindowText
TabAppearance.Font.Height = -11
TabAppearance.Font.Name = 'Segoe UI'
TabAppearance.Font.Style = []
TabAppearance.Gradient = ggVertical
TabAppearance.GradientMirror = ggVertical
TabAppearance.GradientHot = ggVertical
TabAppearance.GradientMirrorHot = ggVertical
TabAppearance.GradientSelected = ggVertical
TabAppearance.GradientMirrorSelected = ggVertical
TabAppearance.GradientDisabled = ggVertical
TabAppearance.GradientMirrorDisabled = ggVertical
TabAppearance.TextColor = 4474440
TabAppearance.TextColorHot = 14916384
TabAppearance.TextColorSelected = 4474440
TabAppearance.TextColorDisabled = 7303023
TabAppearance.ShadowColor = clNone
TabAppearance.HighLightColor = clNone
TabAppearance.HighLightColorHot = clNone
TabAppearance.HighLightColorSelected = clNone
TabAppearance.HighLightColorSelectedHot = clNone
TabAppearance.HighLightColorDown = clNone
TabAppearance.DrawLine = True
TabAppearance.TextSelectedBold = True
TabAppearance.BackGround.Color = clWhite
TabAppearance.BackGround.ColorTo = clWhite
TabAppearance.BackGround.Direction = gdHorizontal
object grdFields: TAdvStringGrid
Left = 2
Top = 2
Width = 1176
Height = 235
Align = alClient
Ctl3D = True
DrawingStyle = gdsClassic
FixedColor = clWhite
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goEditing, goFixedColClick]
ParentCtl3D = False
TabOrder = 0
ActiveCellFont.Charset = DEFAULT_CHARSET
ActiveCellFont.Color = 4474440
ActiveCellFont.Height = -11
ActiveCellFont.Name = 'Tahoma'
ActiveCellFont.Style = [fsBold]
ActiveCellColor = 11565130
ActiveCellColorTo = 11565130
BorderColor = 11250603
ControlLook.FixedGradientFrom = clWhite
ControlLook.FixedGradientTo = clWhite
ControlLook.FixedGradientHoverFrom = clGray
ControlLook.FixedGradientHoverTo = clWhite
ControlLook.FixedGradientHoverMirrorFrom = clWhite
ControlLook.FixedGradientHoverMirrorTo = clWhite
ControlLook.FixedGradientHoverBorder = 11645361
ControlLook.FixedGradientDownFrom = clWhite
ControlLook.FixedGradientDownTo = clWhite
ControlLook.FixedGradientDownMirrorFrom = clWhite
ControlLook.FixedGradientDownMirrorTo = clWhite
ControlLook.FixedGradientDownBorder = 11250603
ControlLook.DropDownHeader.Font.Charset = DEFAULT_CHARSET
ControlLook.DropDownHeader.Font.Color = clWindowText
ControlLook.DropDownHeader.Font.Height = -11
ControlLook.DropDownHeader.Font.Name = 'Tahoma'
ControlLook.DropDownHeader.Font.Style = []
ControlLook.DropDownHeader.Visible = True
ControlLook.DropDownHeader.Buttons = <>
ControlLook.DropDownFooter.Font.Charset = DEFAULT_CHARSET
ControlLook.DropDownFooter.Font.Color = clWindowText
ControlLook.DropDownFooter.Font.Height = -11
ControlLook.DropDownFooter.Font.Name = 'Tahoma'
ControlLook.DropDownFooter.Font.Style = []
ControlLook.DropDownFooter.Visible = True
ControlLook.DropDownFooter.Buttons = <>
ControlLook.ToggleSwitch.BackgroundBorderWidth = 1.000000000000000000
ControlLook.ToggleSwitch.ButtonBorderWidth = 1.000000000000000000
ControlLook.ToggleSwitch.CaptionFont.Charset = DEFAULT_CHARSET
ControlLook.ToggleSwitch.CaptionFont.Color = clWindowText
ControlLook.ToggleSwitch.CaptionFont.Height = -12
ControlLook.ToggleSwitch.CaptionFont.Name = 'Segoe UI'
ControlLook.ToggleSwitch.CaptionFont.Style = []
ControlLook.ToggleSwitch.Shadow = False
Filter = <>
FilterDropDown.Font.Charset = DEFAULT_CHARSET
FilterDropDown.Font.Color = clWindowText
FilterDropDown.Font.Height = -11
FilterDropDown.Font.Name = 'Tahoma'
FilterDropDown.Font.Style = []
FilterDropDown.TextChecked = 'Checked'
FilterDropDown.TextUnChecked = 'Unchecked'
FilterDropDownClear = '(All)'
FilterEdit.TypeNames.Strings = (
'Starts with'
'Ends with'
'Contains'
'Not contains'
'Equal'
'Not equal'
'Larger than'
'Smaller than'
'Clear')
FixedColWidth = 16
FixedRowHeight = 22
FixedRowAlways = True
FixedFont.Charset = DEFAULT_CHARSET
FixedFont.Color = clWindowText
FixedFont.Height = -11
FixedFont.Name = 'Tahoma'
FixedFont.Style = [fsBold]
FloatFormat = '%.2f'
HoverButtons.Buttons = <>
HTMLSettings.ImageFolder = 'images'
HTMLSettings.ImageBaseName = 'img'
Look = glCustom
PrintSettings.DateFormat = 'dd/mm/yyyy'
PrintSettings.Font.Charset = DEFAULT_CHARSET
PrintSettings.Font.Color = clWindowText
PrintSettings.Font.Height = -11
PrintSettings.Font.Name = 'Tahoma'
PrintSettings.Font.Style = []
PrintSettings.FixedFont.Charset = DEFAULT_CHARSET
PrintSettings.FixedFont.Color = clWindowText
PrintSettings.FixedFont.Height = -11
PrintSettings.FixedFont.Name = 'Tahoma'
PrintSettings.FixedFont.Style = []
PrintSettings.HeaderFont.Charset = DEFAULT_CHARSET
PrintSettings.HeaderFont.Color = clWindowText
PrintSettings.HeaderFont.Height = -11
PrintSettings.HeaderFont.Name = 'Tahoma'
PrintSettings.HeaderFont.Style = []
PrintSettings.FooterFont.Charset = DEFAULT_CHARSET
PrintSettings.FooterFont.Color = clWindowText
PrintSettings.FooterFont.Height = -11
PrintSettings.FooterFont.Name = 'Tahoma'
PrintSettings.FooterFont.Style = []
PrintSettings.PageNumSep = '/'
SearchFooter.ColorTo = clNone
SearchFooter.FindNextCaption = 'Find &next'
SearchFooter.FindPrevCaption = 'Find &previous'
SearchFooter.Font.Charset = DEFAULT_CHARSET
SearchFooter.Font.Color = clWindowText
SearchFooter.Font.Height = -11
SearchFooter.Font.Name = 'Tahoma'
SearchFooter.Font.Style = []
SearchFooter.HighLightCaption = 'Highlight'
SearchFooter.HintClose = 'Close'
SearchFooter.HintFindNext = 'Find next occurrence'
SearchFooter.HintFindPrev = 'Find previous occurrence'
SearchFooter.HintHighlight = 'Highlight occurrences'
SearchFooter.MatchCaseCaption = 'Match case'
SearchFooter.ResultFormat = '(%d of %d)'
SelectionColor = 13744549
SelectionTextColor = clWindowText
SortSettings.HeaderColor = clWhite
SortSettings.HeaderColorTo = clWhite
SortSettings.HeaderMirrorColor = clWhite
SortSettings.HeaderMirrorColorTo = clWhite
Version = '9.1.4.1'
ColWidths = (
16
64
64
64
64)
RowHeights = (
22
22
22
22
22
22
22
22
22
22)
end
end
object AdvOfficePage3: TAdvOfficePage
Left = 1
Top = 26
Width = 1180
Height = 239
Caption = 'AdvOfficePage3'
DoubleBuffered = False
PageAppearance.BorderColor = clNone
PageAppearance.Color = clWhite
PageAppearance.ColorTo = clWhite
PageAppearance.ColorMirror = clWhite
PageAppearance.ColorMirrorTo = clWhite
PageAppearance.Gradient = ggVertical
PageAppearance.GradientMirror = ggVertical
Text = ''
TabAppearance.BorderColor = clWhite
TabAppearance.BorderColorHot = clNone
TabAppearance.BorderColorSelected = clNone
TabAppearance.BorderColorSelectedHot = clNone
TabAppearance.BorderColorDisabled = clNone
TabAppearance.BorderColorDown = clNone
TabAppearance.Color = clWhite
TabAppearance.ColorTo = clWhite
TabAppearance.ColorSelected = clWhite
TabAppearance.ColorSelectedTo = clWhite
TabAppearance.ColorDisabled = 15658734
TabAppearance.ColorDisabledTo = clNone
TabAppearance.ColorHot = 16316922
TabAppearance.ColorHotTo = 16316922
TabAppearance.ColorMirror = clWhite
TabAppearance.ColorMirrorTo = clWhite
TabAppearance.ColorMirrorHot = 16316922
TabAppearance.ColorMirrorHotTo = 16316922
TabAppearance.ColorMirrorSelected = clWhite
TabAppearance.ColorMirrorSelectedTo = clWhite
TabAppearance.ColorMirrorDisabled = 15658734
TabAppearance.ColorMirrorDisabledTo = clNone
TabAppearance.Font.Charset = DEFAULT_CHARSET
TabAppearance.Font.Color = clWindowText
TabAppearance.Font.Height = -11
TabAppearance.Font.Name = 'Segoe UI'
TabAppearance.Font.Style = []
TabAppearance.Gradient = ggVertical
TabAppearance.GradientMirror = ggVertical
TabAppearance.GradientHot = ggVertical
TabAppearance.GradientMirrorHot = ggVertical
TabAppearance.GradientSelected = ggVertical
TabAppearance.GradientMirrorSelected = ggVertical
TabAppearance.GradientDisabled = ggVertical
TabAppearance.GradientMirrorDisabled = ggVertical
TabAppearance.TextColor = 4474440
TabAppearance.TextColorHot = 14916384
TabAppearance.TextColorSelected = 4474440
TabAppearance.TextColorDisabled = 7303023
TabAppearance.ShadowColor = clNone
TabAppearance.HighLightColor = clNone
TabAppearance.HighLightColorHot = clNone
TabAppearance.HighLightColorSelected = clNone
TabAppearance.HighLightColorSelectedHot = clNone
TabAppearance.HighLightColorDown = clNone
TabAppearance.DrawLine = True
TabAppearance.TextSelectedBold = True
TabAppearance.BackGround.Color = clWhite
TabAppearance.BackGround.ColorTo = clWhite
TabAppearance.BackGround.Direction = gdHorizontal
object asgData: TAdvStringGrid
Left = 2
Top = 2
Width = 1176
Height = 235
Align = alClient
Ctl3D = True
DrawingStyle = gdsClassic
FixedColor = clWhite
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goEditing, goFixedColClick]
ParentCtl3D = False
TabOrder = 0
ActiveCellFont.Charset = DEFAULT_CHARSET
ActiveCellFont.Color = 4474440
ActiveCellFont.Height = -11
ActiveCellFont.Name = 'Tahoma'
ActiveCellFont.Style = [fsBold]
ActiveCellColor = 11565130
ActiveCellColorTo = 11565130
BorderColor = 11250603
ControlLook.FixedGradientFrom = clWhite
ControlLook.FixedGradientTo = clWhite
ControlLook.FixedGradientHoverFrom = clGray
ControlLook.FixedGradientHoverTo = clWhite
ControlLook.FixedGradientHoverMirrorFrom = clWhite
ControlLook.FixedGradientHoverMirrorTo = clWhite
ControlLook.FixedGradientHoverBorder = 11645361
ControlLook.FixedGradientDownFrom = clWhite
ControlLook.FixedGradientDownTo = clWhite
ControlLook.FixedGradientDownMirrorFrom = clWhite
ControlLook.FixedGradientDownMirrorTo = clWhite
ControlLook.FixedGradientDownBorder = 11250603
ControlLook.DropDownHeader.Font.Charset = DEFAULT_CHARSET
ControlLook.DropDownHeader.Font.Color = clWindowText
ControlLook.DropDownHeader.Font.Height = -11
ControlLook.DropDownHeader.Font.Name = 'Tahoma'
ControlLook.DropDownHeader.Font.Style = []
ControlLook.DropDownHeader.Visible = True
ControlLook.DropDownHeader.Buttons = <>
ControlLook.DropDownFooter.Font.Charset = DEFAULT_CHARSET
ControlLook.DropDownFooter.Font.Color = clWindowText
ControlLook.DropDownFooter.Font.Height = -11
ControlLook.DropDownFooter.Font.Name = 'Tahoma'
ControlLook.DropDownFooter.Font.Style = []
ControlLook.DropDownFooter.Visible = True
ControlLook.DropDownFooter.Buttons = <>
ControlLook.ToggleSwitch.BackgroundBorderWidth = 1.000000000000000000
ControlLook.ToggleSwitch.ButtonBorderWidth = 1.000000000000000000
ControlLook.ToggleSwitch.CaptionFont.Charset = DEFAULT_CHARSET
ControlLook.ToggleSwitch.CaptionFont.Color = clWindowText
ControlLook.ToggleSwitch.CaptionFont.Height = -12
ControlLook.ToggleSwitch.CaptionFont.Name = 'Segoe UI'
ControlLook.ToggleSwitch.CaptionFont.Style = []
ControlLook.ToggleSwitch.Shadow = False
Filter = <>
FilterDropDown.Font.Charset = DEFAULT_CHARSET
FilterDropDown.Font.Color = clWindowText
FilterDropDown.Font.Height = -11
FilterDropDown.Font.Name = 'Tahoma'
FilterDropDown.Font.Style = []
FilterDropDown.TextChecked = 'Checked'
FilterDropDown.TextUnChecked = 'Unchecked'
FilterDropDownClear = '(All)'
FilterEdit.TypeNames.Strings = (
'Starts with'
'Ends with'
'Contains'
'Not contains'
'Equal'
'Not equal'
'Larger than'
'Smaller than'
'Clear')
FixedColWidth = 16
FixedRowHeight = 22
FixedRowAlways = True
FixedFont.Charset = DEFAULT_CHARSET
FixedFont.Color = clWindowText
FixedFont.Height = -11
FixedFont.Name = 'Tahoma'
FixedFont.Style = [fsBold]
FloatFormat = '%.2f'
HoverButtons.Buttons = <>
HTMLSettings.ImageFolder = 'images'
HTMLSettings.ImageBaseName = 'img'
Look = glCustom
PrintSettings.DateFormat = 'dd/mm/yyyy'
PrintSettings.Font.Charset = DEFAULT_CHARSET
PrintSettings.Font.Color = clWindowText
PrintSettings.Font.Height = -11
PrintSettings.Font.Name = 'Tahoma'
PrintSettings.Font.Style = []
PrintSettings.FixedFont.Charset = DEFAULT_CHARSET
PrintSettings.FixedFont.Color = clWindowText
PrintSettings.FixedFont.Height = -11
PrintSettings.FixedFont.Name = 'Tahoma'
PrintSettings.FixedFont.Style = []
PrintSettings.HeaderFont.Charset = DEFAULT_CHARSET
PrintSettings.HeaderFont.Color = clWindowText
PrintSettings.HeaderFont.Height = -11
PrintSettings.HeaderFont.Name = 'Tahoma'
PrintSettings.HeaderFont.Style = []
PrintSettings.FooterFont.Charset = DEFAULT_CHARSET
PrintSettings.FooterFont.Color = clWindowText
PrintSettings.FooterFont.Height = -11
PrintSettings.FooterFont.Name = 'Tahoma'
PrintSettings.FooterFont.Style = []
PrintSettings.PageNumSep = '/'
SearchFooter.ColorTo = clNone
SearchFooter.FindNextCaption = 'Find &next'
SearchFooter.FindPrevCaption = 'Find &previous'
SearchFooter.Font.Charset = DEFAULT_CHARSET
SearchFooter.Font.Color = clWindowText
SearchFooter.Font.Height = -11
SearchFooter.Font.Name = 'Tahoma'
SearchFooter.Font.Style = []
SearchFooter.HighLightCaption = 'Highlight'
SearchFooter.HintClose = 'Close'
SearchFooter.HintFindNext = 'Find next occurrence'
SearchFooter.HintFindPrev = 'Find previous occurrence'
SearchFooter.HintHighlight = 'Highlight occurrences'
SearchFooter.MatchCaseCaption = 'Match case'
SearchFooter.ResultFormat = '(%d of %d)'
SelectionColor = 13744549
SelectionTextColor = clWindowText
SortSettings.HeaderColor = clWhite
SortSettings.HeaderColorTo = clWhite
SortSettings.HeaderMirrorColor = clWhite
SortSettings.HeaderMirrorColorTo = clWhite
Version = '9.1.4.1'
ColWidths = (
16
64
64
64
64)
RowHeights = (
22
22
22
22
22
22
22
22
22
22)
end
end
end
end
object Panel3: TPanel
Left = 0
Top = 143
Width = 1184
Height = 307
Align = alTop
TabOrder = 2
object AdvSplitter2: TAdvSplitter
Left = 1
Top = 103
Width = 1182
Height = 3
Cursor = crVSplit
Align = alTop
Appearance.BorderColor = clNone
Appearance.BorderColorHot = clNone
Appearance.Color = 12895944
Appearance.ColorTo = 12895944
Appearance.ColorHot = 15917525
Appearance.ColorHotTo = 15917525
GripStyle = sgDots
ExplicitWidth = 196
end
object Memo1: TMemo
Left = 1
Top = 1
Width = 1182
Height = 102
Align = alTop
Lines.Strings = (
'Memo1')
ScrollBars = ssVertical
TabOrder = 0
WordWrap = False
ExplicitLeft = 0
ExplicitTop = 2
end
object Panel4: TPanel
Left = 1
Top = 106
Width = 1182
Height = 200
Align = alClient
TabOrder = 1
object AdvSplitter3: TAdvSplitter
Left = 593
Top = 1
Height = 198
Appearance.BorderColor = clNone
Appearance.BorderColorHot = clNone
Appearance.Color = 12895944
Appearance.ColorTo = 12895944
Appearance.ColorHot = 15917525
Appearance.ColorHotTo = 15917525
GripStyle = sgDots
ExplicitLeft = 523
ExplicitHeight = 191
end
object Memo2: TMemo
Left = 1
Top = 1
Width = 592
Height = 198
Align = alLeft
Lines.Strings = (
'Memo2')
ScrollBars = ssVertical
TabOrder = 0
WordWrap = False
ExplicitLeft = 4
ExplicitTop = 0
end
object Memo3: TMemo
Left = 596
Top = 1
Width = 585
Height = 198
Align = alClient
Lines.Strings = (
'Memo3')
ScrollBars = ssVertical
TabOrder = 1
WordWrap = False
end
end
end
object btnMessages: TButton
Left = 32
Top = 78
Width = 83
Height = 25
Caption = 'Get Messages'
TabOrder = 3
OnClick = btnMessagesClick
end
object dbcbMonth: TwwDBComboBox
Left = 342
Top = 40
Width = 123
Height = 23
ShowButton = True
Style = csDropDown
MapList = False
AllowClearKey = False
DropDownCount = 8
ItemHeight = 0
Sorted = False
TabOrder = 4
UnboundDataType = wwDefault
OnCloseUp = dbcbYearCloseUp
end
object btnNextPage: TButton
Left = 784
Top = 43
Width = 83
Height = 25
Caption = 'Next Page'
TabOrder = 5
OnClick = btnNextPageClick
end
object RESTClient1: TRESTClient
Accept = 'application/json, text/plain; q=0.9, text/html;q=0.8,'
AcceptCharset = 'utf-8, *;q=0.8'
BaseURL = 'https://api.twilio.com'
Params = <>
SynchronizedEvents = False
Left = 846
Top = 210
end
object RESTRequest1: TRESTRequest
AssignedValues = [rvConnectTimeout, rvReadTimeout]
Client = RESTClient1
Params = <
item
Kind = pkHTTPHEADER
Name = 'Authorization'
Options = [poDoNotEncode]
Value =
'Basic QUMzN2FlZWY5YzM2YTJjY2NiYWVjYmFkYWZjMTcyYjJmZjo5NzM5OTAwYT' +
'gyZmRlNjVlMzI2ODFmZjVmMmI5ZGZjZgo='
end>
Response = RESTResponse1
SynchronizedEvents = False
Left = 846
Top = 264
end
object RESTResponse1: TRESTResponse
ContentType = 'application/json'
RootElement = 'calls'
Left = 846
Top = 318
end
object ucTwilioDB: TUniConnection
ProviderName = 'PostgreSQL'
Database = 'twilio_db'
Username = 'postgres'
Server = '192.168.102.130'
Connected = True
LoginPrompt = False
Left = 562
Top = 169
EncryptedPassword = '8FFF90FF8CFF8BFF98FF8DFF9AFFACFFAEFFB3FF'
end
object uqMessages: TUniQuery
Connection = ucTwilioDB
SQL.Strings = (
'select * from public.messages')
Active = True
Left = 676
Top = 169
object uqMessagessid: TMemoField
FieldName = 'sid'
Required = True
BlobType = ftMemo
end
object uqMessagesaccount_sid: TMemoField
FieldName = 'account_sid'
Required = True
BlobType = ftMemo
end
object uqMessagesapi_version: TMemoField
FieldName = 'api_version'
BlobType = ftMemo
end
object uqMessagesbody: TMemoField
FieldName = 'body'
BlobType = ftMemo
end
object uqMessagesdate_created: TDateTimeField
FieldName = 'date_created'
end
object uqMessagesdate_sent: TDateTimeField
FieldName = 'date_sent'
end
object uqMessagesdate_updated: TDateTimeField
FieldName = 'date_updated'
end
object uqMessagesdirection: TMemoField
FieldName = 'direction'
BlobType = ftMemo
end
object uqMessageserror_code: TIntegerField
FieldName = 'error_code'
end
object uqMessageserror_message: TMemoField
FieldName = 'error_message'
BlobType = ftMemo
end
object uqMessagesfrom_number: TMemoField
FieldName = 'from_number'
Required = True
BlobType = ftMemo
end
object uqMessagesmessaging_service_sid: TMemoField
FieldName = 'messaging_service_sid'
BlobType = ftMemo
end
object uqMessagesnum_media: TIntegerField
FieldName = 'num_media'
end
object uqMessagesnum_segments: TIntegerField
FieldName = 'num_segments'
end
object uqMessagesprice: TFloatField
FieldName = 'price'
end
object uqMessagesprice_unit: TMemoField
FieldName = 'price_unit'
BlobType = ftMemo
end
object uqMessagesstatus: TMemoField
FieldName = 'status'
BlobType = ftMemo
end
object uqMessagesto_number: TMemoField
FieldName = 'to_number'
Required = True
BlobType = ftMemo
end
object uqMessagesuri: TMemoField
FieldName = 'uri'
BlobType = ftMemo
end
end
object PostgreSQLUniProvider1: TPostgreSQLUniProvider
Left = 631
Top = 277
end
end
dev/Unit1.h 0 → 100644
//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <System.Classes.hpp>
#include <Vcl.Controls.hpp>
#include <Vcl.StdCtrls.hpp>
#include <Vcl.Forms.hpp>
#include "AdvGrid.hpp"
#include "AdvObj.hpp"
#include "AdvUtil.hpp"
#include "BaseGrid.hpp"
#include "DBAdvGrid.hpp"
#include <Vcl.Graphics.hpp>
#include <Vcl.Grids.hpp>
#include <Data.Bind.Components.hpp>
#include <Data.Bind.ObjectScope.hpp>
#include <Data.DB.hpp>
#include <FireDAC.Comp.Client.hpp>
#include <FireDAC.Comp.DataSet.hpp>
#include <FireDAC.DApt.Intf.hpp>
#include <FireDAC.DatS.hpp>
#include <FireDAC.Phys.Intf.hpp>
#include <FireDAC.Stan.Error.hpp>
#include <FireDAC.Stan.Intf.hpp>
#include <FireDAC.Stan.Option.hpp>
#include <FireDAC.Stan.Param.hpp>
#include <REST.Client.hpp>
#include <REST.Response.Adapter.hpp>
#include <REST.Types.hpp>
#include "AdvSplitter.hpp"
#include <Vcl.ExtCtrls.hpp>
#include "AdvEdit.hpp"
#include "vcl.wwdbcomb.hpp"
#include "vcl.wwdbedit.hpp"
#include "vcl.wwdotdot.hpp"
#include <Vcl.Mask.hpp>
#include "AdvOfficePager.hpp"
#include "MemDS.hpp"
#include "VirtualTable.hpp"
#include "DBAccess.hpp"
#include "Uni.hpp"
#include "vcl.wwdbdatetimepicker.hpp"
#include "PostgreSQLUniProvider.hpp"
#include "UniProvider.hpp"
#include <dinkumware\map>
#include <SysUtils.hpp>
#include <DateUtils.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
TRESTClient *RESTClient1;
TRESTRequest *RESTRequest1;
TRESTResponse *RESTResponse1;
TPanel *Panel1;
TPanel *Panel2;
TPanel *Panel3;
TAdvSplitter *AdvSplitter1;
TMemo *Memo1;
TAdvSplitter *AdvSplitter2;
TPanel *Panel4;
TMemo *Memo2;
TAdvSplitter *AdvSplitter3;
TMemo *Memo3;
TButton *btnExit;
TAdvOfficePager *AdvOfficePager1;
TAdvEdit *txtNextPageUri;
TAdvOfficePage *AdvOfficePage1;
TAdvStringGrid *grdData;
TAdvOfficePage *AdvOfficePage2;
TAdvStringGrid *grdFields;
TAdvOfficePage *AdvOfficePage3;
TAdvStringGrid *asgData;
TButton *btnMessages;
TUniConnection *ucTwilioDB;
TUniQuery *uqMessages;
TwwDBDateTimePicker *dtpStartDate;
TwwDBDateTimePicker *dtpEndDate;
TwwDBComboBox *dbcbYear;
TLabel *Label2;
TAdvEdit *edtPageSize;
TLabel *Label1;
TLabel *Label3;
TLabel *Label4;
TLabel *Label5;
TwwDBComboBox *dbcbMonth;
TLabel *Label6;
TButton *btnNextPage;
TCheckBox *cbSaveToDB;
TPostgreSQLUniProvider *PostgreSQLUniProvider1;
TMemoField *uqMessagessid;
TMemoField *uqMessagesaccount_sid;
TMemoField *uqMessagesapi_version;
TMemoField *uqMessagesbody;
TDateTimeField *uqMessagesdate_created;
TDateTimeField *uqMessagesdate_sent;
TDateTimeField *uqMessagesdate_updated;
TMemoField *uqMessagesdirection;
TIntegerField *uqMessageserror_code;
TMemoField *uqMessageserror_message;
TMemoField *uqMessagesfrom_number;
TMemoField *uqMessagesmessaging_service_sid;
TIntegerField *uqMessagesnum_media;
TIntegerField *uqMessagesnum_segments;
TFloatField *uqMessagesprice;
TMemoField *uqMessagesprice_unit;
TMemoField *uqMessagesstatus;
TMemoField *uqMessagesto_number;
TMemoField *uqMessagesuri;
void __fastcall btnExitClick(TObject *Sender);
void __fastcall btnMessagesClick(TObject *Sender);
void __fastcall dbcbMonthCloseUp(TwwDBComboBox *Sender, bool Select);
void __fastcall dbcbYearCloseUp(TwwDBComboBox *Sender, bool Select);
void __fastcall btnNextPageClick(TObject *Sender);
private: // User declarations
String accountSid;
String authHeader;
TStringList *fieldsList;
int pagesLoaded;
void TForm1::SaveMessagesToDB(TJSONArray* jaMessages);
void GetFieldsFromJsonArray(TJSONArray* jaData);
void LoadJsonArray(TJSONArray* jaData, String detail);
void SetDatePickersFromMonthYear();
void AppendJsonArray(TJSONArray* jaData);
String TForm1::BuildMessageRequestURL();
public: // User declarations
__fastcall TForm1(TComponent* Owner);
TDateTime ParseTwilioDateTime(const UnicodeString &dateStr);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
dev/fDocEntryFind.cpp 0 → 100644
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "fDocEntryFind.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "AdvDateTimePicker"
#pragma link "AdvEdit"
#pragma link "AdvGlowButton"
#pragma link "AdvGrid"
#pragma link "AdvPanel"
#pragma link "AdvSmoothPanel"
#pragma link "AdvToolBar"
#pragma link "BaseGrid"
#pragma link "DBAdvGrid"
#pragma link "AdvDBDateTimePicker"
#pragma link "DBAccess"
#pragma link "MemDS"
#pragma link "Uni"
#pragma link "AdvEdBtn"
#pragma link "PlannerDatePicker"
#pragma link "AdvPageControl"
#pragma link "AdvOfficeButtons"
#pragma link "AdvObj"
#pragma link "AdvUtil"
#pragma link "vcl.Wwdbcomb"
#pragma link "vcl.Wwdbedit"
#pragma link "vcl.Wwdotdot"
#pragma link "vcl.wwdbdatetimepicker"
#pragma resource "*.dfm"
TfrmDocEntryFind *frmDocEntryFind;
//---------------------------------------------------------------------------
__fastcall TfrmDocEntryFind::TfrmDocEntryFind(TComponent* Owner)
: TForm(Owner)
{
TDateTime dtDate = Date();
unsigned short year, month, day;
dtDate.DecodeDate(&year, &month, &day);
for( int i = 0; i < 12; i++ )
dbcbYear->Items->Add( year - i );
dbcbYear->ItemIndex = 0;
}
//---------------------------------------------------------------------------
void TfrmDocEntryFind::FindDocuments()
{
String whereStr;
whereStr = "";
if( !dtpDocDate->Text.IsEmpty() && !dtpDocDate2->Text.IsEmpty() )
whereStr = "d.doc_date between '" + dtpDocDate->Text + "' and '" + dtpDocDate2->Text + "' and ";
else if( !dtpDocDate->Text.IsEmpty() )
whereStr = "d.doc_date = '" + dtpDocDate->Text + "' and ";
}
//---------------------------------------------------------------------------
void __fastcall TfrmDocEntryFind::dbcbMonthCloseUp(TwwDBComboBox *Sender, bool Select)
{
SetDocumentDates();
}
//---------------------------------------------------------------------------
void __fastcall TfrmDocEntryFind::dbcbYearCloseUp(TwwDBComboBox *Sender, bool Select)
{
SetDocumentDates();
}
//---------------------------------------------------------------------------
void TfrmDocEntryFind::SetDocumentDates()
{
int year = 0;
int month = 0;
TDateTime startDate;
TDateTime endDate;
if( !dbcbYear->Value.IsEmpty() )
year = StrToInt( dbcbYear->Value );
if( !dbcbMonth->Value.IsEmpty() )
month = StrToInt( dbcbMonth->Value );
if( month > 0 && year > 0 ){
startDate = StartOfAMonth( year, month );
endDate = EndOfAMonth( year, month );
dtpDocDate->Date = startDate;
dtpDocDate2->Date = endDate;
}
else if (year > 0){
startDate = StartOfAMonth( year, 1 );
endDate = EndOfAMonth( year, 12 );
dtpDocDate->Date = startDate;
dtpDocDate2->Date = endDate;
}
}
//---------------------------------------------------------------------------
dev/fDocEntryFind.dfm 0 → 100644
object frmDocEntryFind: TfrmDocEntryFind
Left = 0
Top = 0
Caption = 'Doc Entry Find'
ClientHeight = 641
ClientWidth = 900
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Position = poMainFormCenter
TextHeight = 13
object pnlMain: TAdvPanel
Left = 0
Top = 41
Width = 900
Height = 201
Align = alTop
Color = 16445929
Font.Charset = DEFAULT_CHARSET
Font.Color = 7485192
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 0
UseDockManager = True
Version = '2.7.0.1'
BorderColor = 16765615
Caption.Color = 16773091
Caption.ColorTo = 16765615
Caption.Font.Charset = DEFAULT_CHARSET
Caption.Font.Color = clBlack
Caption.Font.Height = -11
Caption.Font.Name = 'Tahoma'
Caption.Font.Style = []
Caption.GradientDirection = gdVertical
Caption.Indent = 2
Caption.ShadeLight = 255
CollapsColor = clHighlight
CollapsDelay = 0
ColorTo = 15587527
ColorMirror = 15587527
ColorMirrorTo = 16773863
DoubleBuffered = True
ShadowColor = clBlack
ShadowOffset = 0
StatusBar.BorderColor = 16765615
StatusBar.BorderStyle = bsSingle
StatusBar.Font.Charset = DEFAULT_CHARSET
StatusBar.Font.Color = 7485192
StatusBar.Font.Height = -11
StatusBar.Font.Name = 'Tahoma'
StatusBar.Font.Style = []
StatusBar.Color = 16245715
StatusBar.ColorTo = 16109747
StatusBar.GradientDirection = gdVertical
Text = ''
FullHeight = 0
object Label1: TLabel
Left = 23
Top = 11
Width = 74
Height = 13
Alignment = taRightJustify
Caption = 'Document Date'
end
object Label2: TLabel
Left = 233
Top = 11
Width = 4
Height = 13
Caption = '-'
end
object dtpDocDate: TwwDBDateTimePicker
Left = 99
Top = 7
Width = 124
Height = 21
CalendarAttributes.DefaultFont = False
CalendarAttributes.Font.Charset = DEFAULT_CHARSET
CalendarAttributes.Font.Color = clWindowText
CalendarAttributes.Font.Height = -11
CalendarAttributes.Font.Name = 'Tahoma'
CalendarAttributes.Font.Style = []
Epoch = 1950
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
ShowButton = True
TabOrder = 0
end
object dtpDocDate2: TwwDBDateTimePicker
Left = 247
Top = 7
Width = 124
Height = 21
CalendarAttributes.DefaultFont = False
CalendarAttributes.Font.Charset = DEFAULT_CHARSET
CalendarAttributes.Font.Color = clWindowText
CalendarAttributes.Font.Height = -11
CalendarAttributes.Font.Name = 'Tahoma'
CalendarAttributes.Font.Style = []
Epoch = 1950
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
ShowButton = True
TabOrder = 1
end
object dbcbMonth: TwwDBComboBox
Left = 387
Top = 7
Width = 120
Height = 21
ShowButton = True
Style = csDropDown
MapList = True
AllowClearKey = False
DropDownCount = 12
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ItemHeight = 0
Items.Strings = (
'January'#9'01'
'February'#9'02'
'March'#9'03'
'April'#9'04'
'May'#9'05'
'June'#9'06'
'July'#9'07'
'August'#9'08'
'September'#9'09'
'October'#9'10'
'November'#9'11'
'December'#9'12')
ParentFont = False
Sorted = False
TabOrder = 2
UnboundDataType = wwDefault
OnCloseUp = dbcbMonthCloseUp
end
object dbcbYear: TwwDBComboBox
Left = 513
Top = 7
Width = 84
Height = 21
ShowButton = True
Style = csDropDown
MapList = False
AllowClearKey = False
DropDownCount = 8
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ItemHeight = 0
ItemIndex = 0
ParentFont = False
Sorted = False
TabOrder = 3
UnboundDataType = wwDefault
OnCloseUp = dbcbYearCloseUp
end
end
object AdvPanel1: TAdvPanel
Left = 0
Top = 0
Width = 900
Height = 41
Align = alTop
Color = 16445929
Font.Charset = DEFAULT_CHARSET
Font.Color = 7485192
Font.Height = -7
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 1
UseDockManager = True
Version = '2.7.0.1'
BorderColor = 16765615
Caption.Color = 16773091
Caption.ColorTo = 16765615
Caption.Font.Charset = DEFAULT_CHARSET
Caption.Font.Color = clBlack
Caption.Font.Height = -7
Caption.Font.Name = 'Tahoma'
Caption.Font.Style = []
Caption.GradientDirection = gdVertical
Caption.Indent = 2
Caption.ShadeLight = 255
CollapsColor = clNone
CollapsDelay = 0
ColorTo = 15587527
ColorMirror = 15587527
ColorMirrorTo = 16773863
DoubleBuffered = True
ShadowColor = clBlack
ShadowOffset = 0
StatusBar.BorderColor = 16765615
StatusBar.BorderStyle = bsSingle
StatusBar.Font.Charset = DEFAULT_CHARSET
StatusBar.Font.Color = 7485192
StatusBar.Font.Height = -7
StatusBar.Font.Name = 'Tahoma'
StatusBar.Font.Style = []
StatusBar.Color = 16245715
StatusBar.ColorTo = 16109747
StatusBar.GradientDirection = gdVertical
Text = ''
FullHeight = 48
object btnOk: TAdvGlowButton
AlignWithMargins = True
Left = 747
Top = 3
Width = 72
Height = 35
Align = alRight
Caption = 'Ok'
Font.Charset = DEFAULT_CHARSET
Font.Color = 7485192
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ImageIndex = 7
FocusType = ftHot
MarginVert = 6
NotesFont.Charset = DEFAULT_CHARSET
NotesFont.Color = clWindowText
NotesFont.Height = -12
NotesFont.Name = 'Tahoma'
NotesFont.Style = []
ParentFont = False
Rounded = True
Spacing = 6
TabOrder = 0
Appearance.BorderColor = 14727579
Appearance.BorderColorHot = 10079963
Appearance.BorderColorCheckedHot = 11565130
Appearance.BorderColorDown = 4548219
Appearance.BorderColorChecked = 4548219
Appearance.BorderColorDisabled = 13948116
Appearance.Color = 15653832
Appearance.ColorTo = 16178633
Appearance.ColorChecked = 11918331
Appearance.ColorCheckedTo = 7915518
Appearance.ColorDisabled = 15921906
Appearance.ColorDisabledTo = 15921906
Appearance.ColorDown = 7778289
Appearance.ColorDownTo = 4296947
Appearance.ColorHot = 15465983
Appearance.ColorHotTo = 11332863
Appearance.ColorMirror = 15586496
Appearance.ColorMirrorTo = 16245200
Appearance.ColorMirrorHot = 5888767
Appearance.ColorMirrorHotTo = 10807807
Appearance.ColorMirrorDown = 946929
Appearance.ColorMirrorDownTo = 5021693
Appearance.ColorMirrorChecked = 10480637
Appearance.ColorMirrorCheckedTo = 5682430
Appearance.ColorMirrorDisabled = 11974326
Appearance.ColorMirrorDisabledTo = 15921906
Appearance.GradientHot = ggVertical
Appearance.GradientMirrorHot = ggVertical
Appearance.GradientDown = ggVertical
Appearance.GradientMirrorDown = ggVertical
Appearance.GradientChecked = ggVertical
Appearance.TextColorChecked = 3750459
Appearance.TextColorDown = 2303013
Appearance.TextColorHot = 2303013
Appearance.TextColorDisabled = 13948116
Enabled = False
end
object btnCancel: TAdvGlowButton
AlignWithMargins = True
Left = 825
Top = 3
Width = 72
Height = 35
Align = alRight
Caption = 'Cancel'
Font.Charset = DEFAULT_CHARSET
Font.Color = 7485192
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ImageIndex = 1
FocusType = ftHot
MarginVert = 6
NotesFont.Charset = DEFAULT_CHARSET
NotesFont.Color = clWindowText
NotesFont.Height = -12
NotesFont.Name = 'Tahoma'
NotesFont.Style = []
ParentFont = False
Rounded = True
Spacing = 6
TabOrder = 1
Appearance.BorderColor = 14727579
Appearance.BorderColorHot = 10079963
Appearance.BorderColorCheckedHot = 11565130
Appearance.BorderColorDown = 4548219
Appearance.BorderColorChecked = 4548219
Appearance.BorderColorDisabled = 13948116
Appearance.Color = 15653832
Appearance.ColorTo = 16178633
Appearance.ColorChecked = 11918331
Appearance.ColorCheckedTo = 7915518
Appearance.ColorDisabled = 15921906
Appearance.ColorDisabledTo = 15921906
Appearance.ColorDown = 7778289
Appearance.ColorDownTo = 4296947
Appearance.ColorHot = 15465983
Appearance.ColorHotTo = 11332863
Appearance.ColorMirror = 15586496
Appearance.ColorMirrorTo = 16245200
Appearance.ColorMirrorHot = 5888767
Appearance.ColorMirrorHotTo = 10807807
Appearance.ColorMirrorDown = 946929
Appearance.ColorMirrorDownTo = 5021693
Appearance.ColorMirrorChecked = 10480637
Appearance.ColorMirrorCheckedTo = 5682430
Appearance.ColorMirrorDisabled = 11974326
Appearance.ColorMirrorDisabledTo = 15921906
Appearance.GradientHot = ggVertical
Appearance.GradientMirrorHot = ggVertical
Appearance.GradientDown = ggVertical
Appearance.GradientMirrorDown = ggVertical
Appearance.GradientChecked = ggVertical
Appearance.TextColorChecked = 3750459
Appearance.TextColorDown = 2303013
Appearance.TextColorHot = 2303013
Appearance.TextColorDisabled = 13948116
end
object txtRecCount: TAdvEdit
Left = 369
Top = 13
Width = 90
Height = 16
TabStop = False
EmptyTextStyle = []
FlatLineColor = 11250603
FocusColor = clWindow
FocusFontColor = 3881787
LabelCaption = 'Records Count'
LabelPosition = lpLeftCenter
LabelTransparent = True
LabelFont.Charset = DEFAULT_CHARSET
LabelFont.Color = clWindowText
LabelFont.Height = -11
LabelFont.Name = 'Tahoma'
LabelFont.Style = []
Lookup.Font.Charset = DEFAULT_CHARSET
Lookup.Font.Color = 7485192
Lookup.Font.Height = -11
Lookup.Font.Name = 'Tahoma'
Lookup.Font.Style = []
Lookup.Separator = ';'
Color = clWindow
TabOrder = 2
Text = ''
Visible = True
Version = '4.0.6.0'
end
object AdvGlowButton1: TAdvGlowButton
Left = 154
Top = 4
Width = 72
Height = 31
Caption = 'Find'
Font.Charset = DEFAULT_CHARSET
Font.Color = 7485192
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ImageIndex = 5
FocusType = ftHot
MarginVert = 6
NotesFont.Charset = DEFAULT_CHARSET
NotesFont.Color = clWindowText
NotesFont.Height = -12
NotesFont.Name = 'Tahoma'
NotesFont.Style = []
ParentFont = False
Rounded = True
Spacing = 6
TabOrder = 3
Appearance.BorderColor = 14727579
Appearance.BorderColorHot = 10079963
Appearance.BorderColorCheckedHot = 11565130
Appearance.BorderColorDown = 4548219
Appearance.BorderColorChecked = 4548219
Appearance.BorderColorDisabled = 13948116
Appearance.Color = 15653832
Appearance.ColorTo = 16178633
Appearance.ColorChecked = 11918331
Appearance.ColorCheckedTo = 7915518
Appearance.ColorDisabled = 15921906
Appearance.ColorDisabledTo = 15921906
Appearance.ColorDown = 7778289
Appearance.ColorDownTo = 4296947
Appearance.ColorHot = 15465983
Appearance.ColorHotTo = 11332863
Appearance.ColorMirror = 15586496
Appearance.ColorMirrorTo = 16245200
Appearance.ColorMirrorHot = 5888767
Appearance.ColorMirrorHotTo = 10807807
Appearance.ColorMirrorDown = 946929
Appearance.ColorMirrorDownTo = 5021693
Appearance.ColorMirrorChecked = 10480637
Appearance.ColorMirrorCheckedTo = 5682430
Appearance.ColorMirrorDisabled = 11974326
Appearance.ColorMirrorDisabledTo = 15921906
Appearance.GradientHot = ggVertical
Appearance.GradientMirrorHot = ggVertical
Appearance.GradientDown = ggVertical
Appearance.GradientMirrorDown = ggVertical
Appearance.GradientChecked = ggVertical
Appearance.TextColorChecked = 3750459
Appearance.TextColorDown = 2303013
Appearance.TextColorHot = 2303013
Appearance.TextColorDisabled = 13948116
end
end
object dbgrdDocData: TDBAdvGrid
Left = 0
Top = 242
Width = 900
Height = 399
Align = alClient
ColCount = 10
DrawingStyle = gdsClassic
RowCount = 2
FixedRows = 1
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goDrawFocusSelected, goColSizing, goRowSelect]
ParentFont = False
TabOrder = 2
ActiveCellFont.Charset = DEFAULT_CHARSET
ActiveCellFont.Color = clWindowText
ActiveCellFont.Height = -11
ActiveCellFont.Name = 'Tahoma'
ActiveCellFont.Style = [fsBold]
ActiveCellColor = 9758459
ActiveCellColorTo = 1414638
ControlLook.FixedGradientFrom = 16572875
ControlLook.FixedGradientTo = 14722429
ControlLook.FixedGradientHoverFrom = clGray
ControlLook.FixedGradientHoverTo = clWhite
ControlLook.FixedGradientDownFrom = clGray
ControlLook.FixedGradientDownTo = clSilver
ControlLook.DropDownHeader.Font.Charset = DEFAULT_CHARSET
ControlLook.DropDownHeader.Font.Color = clWindowText
ControlLook.DropDownHeader.Font.Height = -11
ControlLook.DropDownHeader.Font.Name = 'Tahoma'
ControlLook.DropDownHeader.Font.Style = []
ControlLook.DropDownHeader.Visible = True
ControlLook.DropDownHeader.Buttons = <>
ControlLook.DropDownFooter.Font.Charset = DEFAULT_CHARSET
ControlLook.DropDownFooter.Font.Color = clWindowText
ControlLook.DropDownFooter.Font.Height = -11
ControlLook.DropDownFooter.Font.Name = 'Tahoma'
ControlLook.DropDownFooter.Font.Style = []
ControlLook.DropDownFooter.Visible = True
ControlLook.DropDownFooter.Buttons = <>
ControlLook.ToggleSwitch.BackgroundBorderWidth = 1.000000000000000000
ControlLook.ToggleSwitch.ButtonBorderWidth = 1.000000000000000000
ControlLook.ToggleSwitch.CaptionFont.Charset = DEFAULT_CHARSET
ControlLook.ToggleSwitch.CaptionFont.Color = clWindowText
ControlLook.ToggleSwitch.CaptionFont.Height = -12
ControlLook.ToggleSwitch.CaptionFont.Name = 'Segoe UI'
ControlLook.ToggleSwitch.CaptionFont.Style = []
ControlLook.ToggleSwitch.Shadow = False
Filter = <>
FilterDropDown.Font.Charset = DEFAULT_CHARSET
FilterDropDown.Font.Color = clWindowText
FilterDropDown.Font.Height = -11
FilterDropDown.Font.Name = 'Tahoma'
FilterDropDown.Font.Style = []
FilterDropDown.TextChecked = 'Checked'
FilterDropDown.TextUnChecked = 'Unchecked'
FilterDropDownClear = '(All)'
FilterEdit.TypeNames.Strings = (
'Starts with'
'Ends with'
'Contains'
'Not contains'
'Equal'
'Not equal'
'Clear')
FixedColWidth = 20
FixedRowHeight = 22
FixedFont.Charset = DEFAULT_CHARSET
FixedFont.Color = clBlack
FixedFont.Height = -11
FixedFont.Name = 'Tahoma'
FixedFont.Style = [fsBold]
FloatFormat = '%.2f'
HoverButtons.Buttons = <>
HTMLSettings.ImageFolder = 'images'
HTMLSettings.ImageBaseName = 'img'
PrintSettings.DateFormat = 'dd/mm/yyyy'
PrintSettings.Font.Charset = DEFAULT_CHARSET
PrintSettings.Font.Color = clWindowText
PrintSettings.Font.Height = -11
PrintSettings.Font.Name = 'Tahoma'
PrintSettings.Font.Style = []
PrintSettings.FixedFont.Charset = DEFAULT_CHARSET
PrintSettings.FixedFont.Color = clWindowText
PrintSettings.FixedFont.Height = -11
PrintSettings.FixedFont.Name = 'Tahoma'
PrintSettings.FixedFont.Style = []
PrintSettings.HeaderFont.Charset = DEFAULT_CHARSET
PrintSettings.HeaderFont.Color = clWindowText
PrintSettings.HeaderFont.Height = -11
PrintSettings.HeaderFont.Name = 'Tahoma'
PrintSettings.HeaderFont.Style = []
PrintSettings.FooterFont.Charset = DEFAULT_CHARSET
PrintSettings.FooterFont.Color = clWindowText
PrintSettings.FooterFont.Height = -11
PrintSettings.FooterFont.Name = 'Tahoma'
PrintSettings.FooterFont.Style = []
PrintSettings.PageNumSep = '/'
ScrollWidth = 26
SearchFooter.Color = 16572875
SearchFooter.ColorTo = clNone
SearchFooter.FindNextCaption = 'Find &next'
SearchFooter.FindPrevCaption = 'Find &previous'
SearchFooter.Font.Charset = DEFAULT_CHARSET
SearchFooter.Font.Color = clWindowText
SearchFooter.Font.Height = -11
SearchFooter.Font.Name = 'Tahoma'
SearchFooter.Font.Style = []
SearchFooter.HighLightCaption = 'Highlight'
SearchFooter.HintClose = 'Close'
SearchFooter.HintFindNext = 'Find next occurence'
SearchFooter.HintFindPrev = 'Find previous occurence'
SearchFooter.HintHighlight = 'Highlight occurences'
SearchFooter.MatchCaseCaption = 'Match case'
SearchFooter.ResultFormat = '(%d of %d)'
SelectionColor = 9758459
SelectionColorTo = 1414638
SortSettings.Column = 1
SortSettings.Show = True
UIStyle = tsOffice2003Blue
Version = '2.8.3.3'
AutoCreateColumns = True
AutoRemoveColumns = True
Columns = <
item
Borders = []
BorderPen.Color = clSilver
ButtonHeight = 18
CheckFalse = 'N'
CheckTrue = 'Y'
Color = clWindow
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = clWindowText
HeaderFont.Height = -11
HeaderFont.Name = 'Tahoma'
HeaderFont.Style = []
PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]
PrintFont.Charset = DEFAULT_CHARSET
PrintFont.Color = clWindowText
PrintFont.Height = -11
PrintFont.Name = 'Tahoma'
PrintFont.Style = []
Width = 20
end
item
Borders = []
BorderPen.Color = clSilver
ButtonHeight = 18
CheckFalse = 'N'
CheckTrue = 'Y'
Color = clWindow
FieldName = 'DOC_DATE'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Header = 'Doc Date'
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = clWindowText
HeaderFont.Height = -11
HeaderFont.Name = 'Tahoma'
HeaderFont.Style = []
PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]
PrintFont.Charset = DEFAULT_CHARSET
PrintFont.Color = clWindowText
PrintFont.Height = -11
PrintFont.Name = 'Tahoma'
PrintFont.Style = []
Width = 66
end
item
Borders = []
BorderPen.Color = clSilver
ButtonHeight = 18
CheckFalse = 'N'
CheckTrue = 'Y'
Color = clWindow
FieldName = 'DDocType'
Font.Charset = DEFAULT_CHARSET
Font.Color = 7485192
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Header = 'Doc Type'
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = 7485192
HeaderFont.Height = -11
HeaderFont.Name = 'Tahoma'
HeaderFont.Style = []
PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]
PrintFont.Charset = DEFAULT_CHARSET
PrintFont.Color = 7485192
PrintFont.Height = -11
PrintFont.Name = 'Tahoma'
PrintFont.Style = []
Width = 67
end
item
Borders = []
BorderPen.Color = clSilver
ButtonHeight = 18
CheckFalse = 'N'
CheckTrue = 'Y'
Color = clWhite
FieldName = 'REF_NUM'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Header = 'Ref Num'
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = clWindowText
HeaderFont.Height = -11
HeaderFont.Name = 'Tahoma'
HeaderFont.Style = []
PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]
PrintFont.Charset = DEFAULT_CHARSET
PrintFont.Color = clWindowText
PrintFont.Height = -11
PrintFont.Name = 'Tahoma'
PrintFont.Style = []
Width = 64
end
item
Borders = []
BorderPen.Color = clSilver
ButtonHeight = 18
CheckFalse = 'N'
CheckTrue = 'Y'
Color = clWindow
FieldName = 'DAccount'
Font.Charset = DEFAULT_CHARSET
Font.Color = 7485192
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Header = 'Account'
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = 7485192
HeaderFont.Height = -11
HeaderFont.Name = 'Tahoma'
HeaderFont.Style = []
PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]
PrintFont.Charset = DEFAULT_CHARSET
PrintFont.Color = 7485192
PrintFont.Height = -11
PrintFont.Name = 'Tahoma'
PrintFont.Style = []
Width = 120
end
item
Borders = []
BorderPen.Color = clSilver
ButtonHeight = 18
CheckFalse = 'N'
CheckTrue = 'Y'
Color = clWindow
FieldName = 'AMOUNT'
Font.Charset = DEFAULT_CHARSET
Font.Color = 7485192
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Header = 'Amount'
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = 7485192
HeaderFont.Height = -11
HeaderFont.Name = 'Tahoma'
HeaderFont.Style = []
PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]
PrintFont.Charset = DEFAULT_CHARSET
PrintFont.Color = 7485192
PrintFont.Height = -11
PrintFont.Name = 'Tahoma'
PrintFont.Style = []
end
item
Borders = []
BorderPen.Color = clSilver
ButtonHeight = 18
CheckFalse = 'N'
CheckTrue = 'Y'
Color = clWindow
FieldName = 'DAccountFrom'
Font.Charset = DEFAULT_CHARSET
Font.Color = 7485192
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Header = 'Account From'
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = 7485192
HeaderFont.Height = -11
HeaderFont.Name = 'Tahoma'
HeaderFont.Style = []
PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]
PrintFont.Charset = DEFAULT_CHARSET
PrintFont.Color = 7485192
PrintFont.Height = -11
PrintFont.Name = 'Tahoma'
PrintFont.Style = []
Width = 120
end
item
Borders = []
BorderPen.Color = clSilver
ButtonHeight = 18
CheckFalse = 'N'
CheckTrue = 'Y'
Color = clWindow
FieldName = 'DUE_DATE'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Header = 'Due Date'
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = clBlack
HeaderFont.Height = -11
HeaderFont.Name = 'Tahoma'
HeaderFont.Style = []
PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]
PrintFont.Charset = DEFAULT_CHARSET
PrintFont.Color = clBlack
PrintFont.Height = -11
PrintFont.Name = 'Tahoma'
PrintFont.Style = []
Width = 59
end
item
Borders = []
BorderPen.Color = clSilver
ButtonHeight = 18
CheckFalse = 'N'
CheckTrue = 'Y'
Color = clWindow
FieldName = 'DUE_AMOUNT'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Header = 'Due Amount'
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = clBlack
HeaderFont.Height = -11
HeaderFont.Name = 'Tahoma'
HeaderFont.Style = []
PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]
PrintFont.Charset = DEFAULT_CHARSET
PrintFont.Color = clBlack
PrintFont.Height = -11
PrintFont.Name = 'Tahoma'
PrintFont.Style = []
Width = 71
end
item
Borders = []
BorderPen.Color = clSilver
ButtonHeight = 18
CheckFalse = 'N'
CheckTrue = 'Y'
Color = clWindow
FieldName = 'DOC_DESC'
Font.Charset = DEFAULT_CHARSET
Font.Color = 7485192
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Header = 'Description'
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = 7485192
HeaderFont.Height = -11
HeaderFont.Name = 'Tahoma'
HeaderFont.Style = []
PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]
PrintFont.Charset = DEFAULT_CHARSET
PrintFont.Color = 7485192
PrintFont.Height = -11
PrintFont.Name = 'Tahoma'
PrintFont.Style = []
Width = 238
end>
DataSource = dsDocFind
PageMode = False
InvalidPicture.Data = {
055449636F6E0000010001002020200000000000A81000001600000028000000
2000000040000000010020000000000000100000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000003000000290000005C0000008B000000AF000000C1
000000CA000000CB000000C9000000C1000000AF0000008A0000005E0000002C
0000000400000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000220000007100001CBE000047F401015DFF01016CFF000074FF
000075FF00006CFF01015EFF010145FF000020FF000001F3000000DE000000AE
0000006B00000026000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000005401013DC5010175FF010186FF010189FF000085FF000082FF000081FF
000080FF000080FF000080FF000083FF000082FF01016EFF01013FFF000007FB
000000E0000000A10000004D0000000700000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000300003A8B
010178FF010191FF00008AFF000085FF000085FF000085FF000085FF000086FF
000086FF000084FF000081FF000080FF00007FFF000081FF000085FF010172FF
000030FF000000F5000000C3000000610000000A000000000000000000000000
000000000000000000000000000000000000000000000001010159A5010193FF
01018EFF000089FF000089FF00008CFF00008CFF00008FFF000090FF000090FF
000090FF00008FFF00008BFF00008AFF000086FF000082FF00007EFF000081FF
010182FF00004FFF000000FC000000CB0000005F000000080000000000000000
0000000000000000000000000000000000000000010167AA02029EFF01018EFF
00008CFF00008FFF000092FF000095FF000098FF000099FF000098FF00009BFF
00009AFF000098FF000097FF000094FF00008FFF00008BFF000087FF000082FF
00007FFF010188FF00005BFF000000FC000000C4000000530000000000000000
00000000000000000000000000000000010169850202A4FF010191FF000090FF
000095FF000093FF000096FF00009DFF0000A2FF0000A2FF0000A2FF0000A3FF
0000A2FF0000A1FF00009FFF00009BFF000097FF00008DFF00008BFF00008AFF
000084FF00007FFF01018BFF000054FF000000F6000000AC0000003000000000
000000000000000000000000000168400202A6FF020294FF000094FF00009AFF
000098FF4949BFFF5353C4FF00009DFF0000A7FF0000A9FF0101AAFF0101AAFF
0101A9FF0101A8FF0000A5FF0000A2FF00009AFF5F5FC5FF3A3AB3FF00008AFF
00008BFF000086FF010183FF01018BFF000037FF000000E50000007900000009
0000000000000000000000000202A2D803039EFF00009AFF0000A0FF0000A1FF
2929ABFFFFFFFAFFFFFFFFFF4A4AC8FF0000A5FF0000AFFF0000AFFF0101AEFF
0101B0FF0000AFFF0000ACFF0000A5FF4848B6FFFFFFFFFFFFFFFFFF2424AEFF
00008FFF000090FF000089FF01018BFF010180FF00000CFF000000BB00000038
00000000000000000101655C0303B2FF02029EFF0000A4FF0000AAFF2F2FA9FF
CCCCC0FFFFFFF4FFFFFFFFFFFFFFFFFF4141CAFF0000ACFF0000B3FF0000B3FF
0000B3FF0000B2FF0000ADFF4343B5FFEDEDD9FFFFFFFFFFFFFFFFFFFFFFFFFF
3232AFFF000095FF000092FF01018BFF020293FF010155FF000000E50000006F
00000000000000000303A6D70303A2FF0202A5FF0000ACFF0000B2FF78788DFF
CBCBA5FFFFFFFCFFFFFFFFFFFFFFFFFFFFFFFFFF4F4FCEFF0000AEFF0000B5FF
0000B6FF0000B2FF4B4BBDFFF2F2D9FFFFFFF8FFFFFFFFFFFFFFFFFFF8F8D4FF
8282AEFF0000A2FF00009DFF010194FF020291FF02028CFF000110FD0000009F
000000180000C5200404A3FF0404A7FF0202ADFF0101B3FF0000BCFF0000B0FF
606073FFC4C4A9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF4040CFFF0000B1FF
0000B3FF4E4EC8FFF6F6DFFFFFFFF6FFFFFFFFFFFFFFFFFFE7E7CBFF737393FF
0000A9FF0000ABFF0000A4FF01019BFF020292FF02029BFF010139FF000000C2
000000370201BE6D0505A7FF0404AEFF0303B6FF0303BBFF0101C1FF0000CDFF
0000B9FF56566EFFC0C0A5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3B3BCFFF
5050D7FFFFFFFAFFFFFFF5FFFFFFFFFFFFFFFFFFE0E0C8FF6D6D8FFF0000B2FF
0000B8FF0000B1FF0101ABFF0101A3FF01019AFF02029EFF02026FFF000000DC
0000004D0405BAA10707ADFF0606B5FF0404BBFF0505C2FF0505C8FF0303CBFF
0000D2FF0000BAFF616177FFC6C6ABFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE9E9CDFF747495FF0000B7FF0000C2FF
0101BDFF0202B8FF0202B2FF0101AAFF02029FFF03039EFF020289FF000004E6
000000550606B9CB0808B5FF0606BBFF0606C4FF0606C9FF0606CDFF0606D0FF
0202CFFF0000D4FF0000BDFF6E6E86FFDADABDFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFF5F5DAFF8181A4FF0000BCFF0000C5FF0000C4FF
0303C1FF0303BEFF0202B8FF0202B0FF0202A6FF0303A1FF03039FFF00000CEC
000000590909BBE80909BAFF0808C2FF0808CAFF0808D0FF0909D4FF0707D4FF
0303D2FF0000D0FF0000D4FF0000C2FF8A8AAEFFF7F7EAFFFFFFFFFFFEFEFEFF
FEFEFEFFFFFFFFFFFFFFF9FF9393C8FF0000C3FF0000C8FF0000C6FF0101C6FF
0404C6FF0505C5FF0303BEFF0202B6FF0202ACFF0303A3FF0606AEFF010113ED
0000005A0A0ABFF80C0CC2FF0B0BC9FF0B0BD0FF0B0BD8FF0D0DDCFF0808D9FF
0303D5FF0000D2FF0000D2FF0000D4FF4648C5FFF9F9E6FFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFF6FF3A3ACEFF0000C6FF0000CBFF0000C9FF0303CAFF
0505CAFF0505CAFF0505C4FF0404BEFF0404B2FF0505A9FF0505B9FF010115EB
000000570B0BC6EA1010C9FF0E0ED0FF0E0EDAFF0F0FE1FF0F0FE2FF0B0BE0FF
0303DAFF0000D6FF0000D4FF4242CBFFE9E9D5FFFFFFFBFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFEFFFFFFF9FF4949DEFF0000C6FF0000CCFF0101CDFF
0606CFFF0707CFFF0606C9FF0505C3FF0505B7FF0606ADFF0707B8FF010113E2
0000004F0C0CCDCE1313CFFF1212D7FF1313E1FF1313E9FF1313ECFF0C0CE7FF
0000E0FF0000DCFF3F3FCDFFEAEAD2FFFFFFF6FFFFFFFFFFFFFFFFFFFFFFF5FF
FFFFF3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF4343DCFF0000CAFF0000D2FF
0606D4FF0A0AD3FF0808CEFF0808C6FF0707BBFF0808B4FF0606B3FF01010ED4
000000410909D7A41515D4FF1717E0FF1818E9FF1A1AF2FF1A1AF5FF0E0EF3FF
0000EBFF4848D2FFECECD0FFFFFFF5FFFFFFFFFFFFFFFFFFEEEED6FF8585BBFF
8787ADFFDDDDC5FFFFFFFEFFFFFFFFFFFFFFFFFFFFFFFFFF4E4EE2FF0000D2FF
0505DBFF0C0CD9FF0B0BD3FF0A0ACAFF0A0ABEFF0B0BBCFF0606A5FF000004B1
000000200608DE751919D6FF1C1CE6FF1E1EF2FF2121FCFF1E1EFFFF0606FFFF
4D4DE0FFE6E6CBFFFFFFF4FFFFFFFFFFFFFFFFFFEAEACAFF7B7BA3FF0000D9FF
0000D4FF737389FFCBCBABFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF4F4FEEFF
0000E4FF0B0BE1FF0D0DDAFF0C0CCEFF0C0CC2FF0F0FC7FF060690FF00000085
000000050000E6221717DCFF2222E9FF2626F9FF2727FFFF2424FFFF5E5ED6FF
DFDFC0FFFFFFF5FFFFFFFFFFFFFFFFFFDFDFC2FF72729BFF0000DDFF0000E8FF
0000E9FF0000D1FF605F7AFFC2C2A4FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAFF
5656DFFF0606E8FF1010E0FF1111D4FF0F0FC7FF0E0ECEFF020253E200000047
00000000000000001010E3D92424ECFF2D2DFFFF3131FFFF2F2FFFFF7C7C9FFF
D8D8B2FFFFFFFFFFFFFFFFFFE1E1C0FF696996FF0000E0FF0000E9FF0000E6FF
0000E4FF0000ECFF0000D4FF595971FFBEBE9DFFFFFFFFFFFFFFFDFFD6D6A6FF
7272BFFF1010F6FF1616E4FF1515D6FF1313CFFF0D0DC5FF000021A200000012
00000000000000000607E85C2121EDFF3030FFFF3C3CFFFF3E3EFFFF3B3BF8FF
71719AFFD8D8BDFFD9D9BAFF6C6C99FF0000F1FF0000F6FF0000E9FF0000E6FF
0000E7FF0000E8FF0000F5FF0000DEFF565674FFBBBB98FFC1C19BFF5F5FA8FF
1717FFFF1919FAFF1C1CE7FF1919D9FF1515DBFF05058CF20000004300000000
0000000000000000000000001313EED32E2EFDFF4040FFFF4B4BFFFF4F4FFFFF
4C4CFBFF696981FF6B6B80FF2525FBFF1212FFFF0D0DFFFF0707FAFF0404F3FF
0505F2FF0606F5FF0A0AFCFF0C0CFFFF1A1AF4FF606067FF5B5B8FFF2323FFFF
2626FFFF2727FBFF2222E9FF1D1DE0FF1010D2FF000025880000000800000000
0000000000000000000000000202F1352020F8FF3B3BFFFF4D4DFFFF5C5CFFFF
6666FFFF6464FCFF5F5FF7FF5555FFFF4343FFFF3131FFFF2121FFFF1919FFFF
1818FFFF1C1CFFFF2525FFFF3131FFFF3737FFFF3D3DF6FF3939FEFF3535FFFF
3333FFFF2C2CFAFF2525EAFF1A1AE8FF030380C1000000170000000000000000
000000000000000000000000000000000909F3712B2BFEFF4646FFFF5D5DFFFF
6E6EFFFF7B7BFFFF8080FFFF8181FFFF7575FFFF6767FFFF5555FFFF4949FFFF
4646FFFF4848FFFF4E4EFFFF5454FFFF5757FFFF5050FFFF4949FFFF4040FFFF
3838FFFF2D2DF6FF2020F6FF0808B6DF00000423000000000000000000000000
00000000000000000000000000000000000000000D0EF6902F2FFFFF4D4DFFFF
6666FFFF7C7CFFFF8B8BFFFF9494FFFF9696FFFF9191FFFF8A8AFFFF7E7EFFFF
7878FFFF7373FFFF7171FFFF6C6CFFFF6464FFFF5B5BFFFF5050FFFF4343FFFF
3636FFFF2626FFFF0D0ECCE30000072800000000000000000000000000000000
0000000000000000000000000000000000000000000000000A0AF8782B2BFDFF
4E4EFFFF6868FFFF7F7FFFFF9292FFFFA0A0FFFFA5A5FFFFA7A7FFFFA2A2FFFF
9999FFFF8E8EFFFF8282FFFF7575FFFF6868FFFF5959FFFF4B4BFFFF3A3AFFFF
2727FFFF0B0BCEC600000A150000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000001F841
2121FCDD4545FFFF6262FFFF7979FFFF8C8CFFFF9B9BFFFFA4A4FFFFA3A3FFFF
9B9BFFFF8E8EFFFF7E7EFFFF6C6CFFFF5D5DFFFF4B4BFFFF3838FFFF1F1FEFFF
0405B77D00000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000708F96B2827FDE24646FEFF6464FFFF7474FFFF8080FFFF8484FFFF
7E7EFFFF7373FFFF6363FFFF5353FFFF3F3FFEFF2323FAF40C0CE69800007B1C
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000A0AF9321415F9802727F9B03C3CFBD84949FFF1
4848FFF53939FCDE2727F9BB1516F88B0608F9480708E4070000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000FF8000FFFF00007FFE00001FF800000FF0000007F0000007E0000003
C0000001C0000001800000018000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000180000001
80000003C0000003C0000007E000000FF000001FF800003FFC0000FFFF0001FF
FFC007FF}
ShowUnicode = False
ColWidths = (
20
66
67
64
120
50
120
59
71
238)
RowHeights = (
22
22)
end
object uqDocFind: TUniQuery
SQL.Strings = (
'select * from doc_data')
Left = 1017
Top = 190
object uqDocFindDOC_ID: TIntegerField
FieldName = 'DOC_ID'
Required = True
end
object uqDocFindDOC_DATE: TDateField
FieldName = 'DOC_DATE'
end
object uqDocFindAMOUNT: TFloatField
FieldName = 'AMOUNT'
DisplayFormat = '0.00'
end
object uqDocFindDOC_DESC: TStringField
FieldName = 'DOC_DESC'
Size = 256
end
object uqDocFindACCOUNT_FROM: TIntegerField
FieldName = 'ACCOUNT_FROM'
end
object uqDocFindACCOUNT: TIntegerField
FieldName = 'ACCOUNT'
end
object uqDocFindREF_NUM: TStringField
FieldName = 'REF_NUM'
Size = 10
end
object uqDocFindDOC_TYPE: TIntegerField
FieldName = 'DOC_TYPE'
end
object uqDocFindDDocType: TStringField
FieldKind = fkLookup
FieldName = 'DDocType'
LookupKeyFields = 'TYPE_ID'
LookupResultField = 'TYPE_NAME'
KeyFields = 'DOC_TYPE'
Lookup = True
end
object uqDocFindDAccount: TStringField
FieldKind = fkLookup
FieldName = 'DAccount'
LookupKeyFields = 'ACCOUNT_ID'
LookupResultField = 'ACCOUNT_NAME'
KeyFields = 'ACCOUNT'
Size = 100
Lookup = True
end
object uqDocFindDAccountFrom: TStringField
DisplayLabel = 'Account From'
FieldKind = fkLookup
FieldName = 'DAccountFrom'
LookupKeyFields = 'ACCOUNT_ID'
LookupResultField = 'ACCOUNT_NAME'
KeyFields = 'ACCOUNT_FROM'
Size = 60
Lookup = True
end
object uqDocFindDUE_AMOUNT: TFloatField
FieldName = 'DUE_AMOUNT'
end
object uqDocFindDUE_DATE: TDateField
FieldName = 'DUE_DATE'
end
end
object dsDocFind: TDataSource
AutoEdit = False
DataSet = uqDocFind
Left = 1019
Top = 291
end
object uqMisc: TUniQuery
Left = 1163
Top = 192
end
end
dev/fDocEntryFind.h 0 → 100644
//---------------------------------------------------------------------------
#ifndef fDocEntryFindH
#define fDocEntryFindH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "AdvDateTimePicker.hpp"
#include "AdvEdit.hpp"
#include "AdvGlowButton.hpp"
#include "AdvGrid.hpp"
#include "AdvPanel.hpp"
#include "AdvSmoothPanel.hpp"
#include "AdvToolBar.hpp"
#include "BaseGrid.hpp"
#include "DBAdvGrid.hpp"
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <Graphics.hpp>
#include <Grids.hpp>
#include "AdvDBDateTimePicker.hpp"
#include "DBAccess.hpp"
#include "MemDS.hpp"
#include "Uni.hpp"
#include <DB.hpp>
#include "AdvEdBtn.hpp"
#include "PlannerDatePicker.hpp"
#include "AdvPageControl.hpp"
#include "AdvOfficeButtons.hpp"
#include "AdvObj.hpp"
#include "vcl.wwdblook.hpp"
#include <Vcl.Dialogs.hpp>
#include "AdvUtil.hpp"
#include "vcl.Wwdbcomb.hpp"
#include "vcl.Wwdbedit.hpp"
#include "vcl.Wwdotdot.hpp"
#include <Vcl.Mask.hpp>
#include "vcl.wwdbdatetimepicker.hpp"
//---------------------------------------------------------------------------
class TfrmDocEntryFind : public TForm
{
__published: // IDE-managed Components
TAdvPanel *pnlMain;
TUniQuery *uqDocFind;
TDataSource *dsDocFind;
TIntegerField *uqDocFindDOC_ID;
TDateField *uqDocFindDOC_DATE;
TFloatField *uqDocFindAMOUNT;
TStringField *uqDocFindDAccountFrom;
TStringField *uqDocFindDOC_DESC;
TIntegerField *uqDocFindACCOUNT_FROM;
TIntegerField *uqDocFindACCOUNT;
TStringField *uqDocFindDAccount;
TStringField *uqDocFindDDocType;
TIntegerField *uqDocFindDOC_TYPE;
TStringField *uqDocFindREF_NUM;
TFloatField *uqDocFindDUE_AMOUNT;
TDateField *uqDocFindDUE_DATE;
TAdvPanel *AdvPanel1;
TAdvGlowButton *btnOk;
TAdvGlowButton *btnCancel;
TAdvEdit *txtRecCount;
TAdvGlowButton *AdvGlowButton1;
TLabel *Label1;
TwwDBDateTimePicker *dtpDocDate;
TLabel *Label2;
TwwDBDateTimePicker *dtpDocDate2;
TwwDBComboBox *dbcbMonth;
TwwDBComboBox *dbcbYear;
TUniQuery *uqMisc;
TDBAdvGrid *dbgrdDocData;
void __fastcall dbcbMonthCloseUp(TwwDBComboBox *Sender, bool Select);
void __fastcall dbcbYearCloseUp(TwwDBComboBox *Sender, bool Select);
private: // User declarations
public: // User declarations
String sqlStr;
__fastcall TfrmDocEntryFind(TComponent* Owner);
void SetDocumentDates();
void FindDocuments();
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmDocEntryFind *frmDocEntryFind;
//---------------------------------------------------------------------------
#endif
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment