| リビジョン | 4 (tree) |
|---|---|
| 日時 | 2020-04-08 11:03:42 |
| 作者 |  derekwildstar |
Aplicado um estilo vcl
trunk/prj/FacebookTools.dpr (diff) trunk/prj/FacebookTools.dproj (diff) trunk/src/UFORMPrincipal.dfm (diff)| @@ -3,7 +3,10 @@ | ||
| 3 | 3 | uses |
| 4 | 4 | Vcl.Forms, |
| 5 | 5 | UFormPrincipal in '..\src\UFormPrincipal.pas' {FORMPrincipal}, |
| 6 | - UDAMOPrincipal in '..\src\UDAMOPrincipal.pas' {DAMOPrincipal: TDataModule}; | |
| 6 | + UDAMOPrincipal in '..\src\UDAMOPrincipal.pas' {DAMOPrincipal: TDataModule}, | |
| 7 | + Vcl.Themes, | |
| 8 | + Vcl.Styles, | |
| 9 | + KRK.Vcl.Forms; | |
| 7 | 10 | |
| 8 | 11 | {$R *.res} |
| 9 | 12 |
| @@ -10,6 +13,7 @@ | ||
| 10 | 13 | begin |
| 11 | 14 | Application.Initialize; |
| 12 | 15 | Application.MainFormOnTaskbar := True; |
| 16 | + TStyleManager.TrySetStyle('Sky'); | |
| 13 | 17 | Application.CreateForm(TFORMPrincipal, FORMPrincipal); |
| 14 | 18 | Application.Run; |
| 15 | 19 | end. |
| @@ -60,6 +60,7 @@ | ||
| 60 | 60 | <SanitizedProjectName>FacebookTools</SanitizedProjectName> |
| 61 | 61 | <VerInfo_Locale>1046</VerInfo_Locale> |
| 62 | 62 | <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> |
| 63 | + <Custom_Styles>Sky|VCLSTYLE|$(BDSCOMMONDIR)\Styles\Sky.vsf</Custom_Styles> | |
| 63 | 64 | </PropertyGroup> |
| 64 | 65 | <PropertyGroup Condition="'$(Base_Win32)'!=''"> |
| 65 | 66 | <DCC_UsePackage>DBXSqliteDriver;bindcompdbx;IndyIPCommon;RESTComponents;DBXInterBaseDriver;vcl;IndyIPServer;vclactnband;GR32_D;vclFireDAC;IndySystem;tethering;svnui;dsnapcon;FireDACADSDriver;FireDACMSAccDriver;fmxFireDAC;vclimg;TeeDB;FireDAC;vcltouch;vcldb;bindcompfmx;svn;FireDACSqliteDriver;FireDACPgDriver;inetdb;FMXTee;soaprtl;DbxCommonDriver;FmxTeeUI;FireDACIBDriver;fmx;fmxdae;xmlrtl;soapmidas;Tee;fmxobj;vclwinx;GR32_R;rtl;DbxClientDriver;CustomIPTransport;vcldsnap;dbexpress;IndyCore;vclx;bindcomp;appanalytics;dsnap;FireDACCommon;IndyIPClient;bindcompvcl;RESTBackendComponents;KRKLib;TeeUI;VCLRESTComponents;soapserver;dbxcds;VclSmp;adortl;PNGComponentsR;vclie;bindengine;DBXMySQLDriver;CloudService;dsnapxml;FireDACMySQLDriver;dbrtl;inetdbxpress;IndyProtocols;FireDACCommonODBC;FireDACCommonDriver;inet;fmxase;$(DCC_UsePackage)</DCC_UsePackage> |
