Добавление поддержки масштабирования DPI

This commit is contained in:
Andrey Sotnikov 2024-09-08 20:47:09 +05:00
parent 25e44a3bd6
commit b6cd11e5f0
2 changed files with 9 additions and 5 deletions

View File

@ -1,7 +1,7 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<CONFIG> <CONFIG>
<ProjectOptions> <ProjectOptions>
<Version Value="10"/> <Version Value="12"/>
<PathDelim Value="\"/> <PathDelim Value="\"/>
<General> <General>
<Flags> <Flags>
@ -9,10 +9,11 @@
<LRSInOutputDirectory Value="False"/> <LRSInOutputDirectory Value="False"/>
<SaveJumpHistory Value="False"/> <SaveJumpHistory Value="False"/>
<SaveFoldState Value="False"/> <SaveFoldState Value="False"/>
<CompatibilityMode Value="True"/>
</Flags> </Flags>
<SessionStorage Value="None"/> <SessionStorage Value="None"/>
<MainUnit Value="0"/>
<Title Value="Калькулятор"/> <Title Value="Калькулятор"/>
<Scaled Value="True"/>
<ResourceType Value="res"/> <ResourceType Value="res"/>
<UseXPManifest Value="True"/> <UseXPManifest Value="True"/>
<XPManifest> <XPManifest>
@ -30,9 +31,10 @@
<Version Value="2"/> <Version Value="2"/>
</PublishOptions> </PublishOptions>
<RunParams> <RunParams>
<local> <FormatVersion Value="2"/>
<FormatVersion Value="1"/> <Modes Count="1">
</local> <Mode0 Name="default"/>
</Modes>
</RunParams> </RunParams>
<RequiredPackages Count="1"> <RequiredPackages Count="1">
<Item1> <Item1>
@ -83,6 +85,7 @@
<Linking> <Linking>
<Debugging> <Debugging>
<GenerateDebugInfo Value="False"/> <GenerateDebugInfo Value="False"/>
<DebugInfoType Value="dsDwarf3"/>
<StripSymbols Value="True"/> <StripSymbols Value="True"/>
</Debugging> </Debugging>
<LinkSmart Value="True"/> <LinkSmart Value="True"/>

View File

@ -8,6 +8,7 @@ uses
{$R *.res} {$R *.res}
begin begin
Application.Scaled:=True;
Application.Title:='Калькулятор'; Application.Title:='Калькулятор';
RequireDerivedFormResource := True; RequireDerivedFormResource := True;
Application.Initialize; Application.Initialize;