Add files via upload

vrwallace · Apr 16, 2024 · 9d30b1b · 9d30b1b
1 parent 5a01e00
commit 9d30b1b
Show file tree

Hide file tree

Showing 5 changed files with 9 additions and 11 deletions.
diff --git a/ScannerScreen.nsi b/ScannerScreen.nsi
@@ -2,7 +2,7 @@
 
 ; HM NIS Edit Wizard helper defines
 !define PRODUCT_NAME "Scanner Screen"
-!define PRODUCT_VERSION "2.670"
+!define PRODUCT_VERSION "2.671"
 !define PRODUCT_PUBLISHER "Von Wallace"
 !define PRODUCT_WEB_SITE "http://vonwallace.com"
 !define PRODUCT_DIR_REGKEY "Software\Microsoft\Windows\CurrentVersion\App Paths\ScannerScreen.exe"

diff --git a/project1.lpi b/project1.lpi
@@ -9,6 +9,7 @@
       </Flags>
       <SessionStorage Value="InProjectDir"/>
       <Title Value="Scanner Screen"/>
+      <Scaled Value="True"/>
       <ResourceType Value="res"/>
       <UseXPManifest Value="True"/>
       <Icon Value="0"/>

diff --git a/project1.lpr b/project1.lpr
@@ -13,6 +13,7 @@
 {$R *.res}
 
 begin
+  Application.Scaled:=True;
   Application.Title:='Scanner Screen';
   RequireDerivedFormResource := True;
   Application.Initialize;

diff --git a/project1.lps b/project1.lps
@@ -9,7 +9,7 @@
         <Filename Value="project1.lpr"/>
         <IsPartOfProject Value="True"/>
         <EditorIndex Value="3"/>
-        <CursorPos Y="22"/>
+        <CursorPos Y="23"/>
         <UsageCount Value="116"/>
         <Loaded Value="True"/>
       </Unit0>
@@ -22,7 +22,7 @@
         <UnitName Value="ScannerScreen"/>
         <IsVisibleTab Value="True"/>
         <TopLine Value="837"/>
-        <CursorPos X="15" Y="877"/>
+        <CursorPos Y="877"/>
         <UsageCount Value="116"/>
         <Loaded Value="True"/>
         <LoadedDesigner Value="True"/>
@@ -234,7 +234,7 @@
         <UsageCount Value="10"/>
       </Unit32>
     </Units>
-    <JumpHistory Count="30" HistoryIndex="29">
+    <JumpHistory Count="29" HistoryIndex="28">
       <Position1>
         <Filename Value="scannerscreen.pas"/>
         <Caret Line="92" Column="27" TopLine="47"/>
@@ -345,16 +345,12 @@
       </Position27>
       <Position28>
         <Filename Value="scannerscreen.pas"/>
-        <Caret Line="155" Column="28" TopLine="188"/>
+        <Caret Line="839" Column="211" TopLine="824"/>
       </Position28>
       <Position29>
-        <Filename Value="scannerscreen.pas"/>
-        <Caret Line="839" Column="211" TopLine="824"/>
-      </Position29>
-      <Position30>
         <Filename Value="scannerscreen.pas"/>
         <Caret Line="879" Column="15" TopLine="838"/>
-      </Position30>
+      </Position29>
     </JumpHistory>
     <RunParams>
       <FormatVersion Value="2"/>

diff --git a/scannerscreen.lfm b/scannerscreen.lfm
@@ -4,7 +4,7 @@ object Form1: TForm1
   Top = 157
   Width = 1666
   Anchors = []
-  Caption = 'Scanner Screen - Version 2.670MAC  - By Von Wallace'
+  Caption = 'Scanner Screen - Version 2.671MAC  - By Von Wallace'
   ClientHeight = 914
   ClientWidth = 1666
   Color = clWhite