OnGuard: Fix compilation under 64-bit Windows.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8708 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2023-02-18 17:11:00 +00:00
parent a9c3a3022c
commit 7740070b5a
10 changed files with 181 additions and 80 deletions

View File

@ -40,13 +40,13 @@
<MinVersion Valid="True"/>
</Item2>
</RequiredPackages>
<Units Count="23">
<Units Count="26">
<Unit0>
<Filename Value="codegen.lpr"/>
<IsPartOfProject Value="True"/>
<UnitName Value="CodeGen"/>
<CursorPos X="73" Y="15"/>
<UsageCount Value="27"/>
<UsageCount Value="28"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
</Unit0>
@ -57,10 +57,9 @@
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="CodeGenU"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="1"/>
<CursorPos X="21" Y="8"/>
<UsageCount Value="27"/>
<CursorPos X="40" Y="18"/>
<UsageCount Value="28"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
</Unit1>
@ -69,7 +68,7 @@
<ComponentName Value="KeyMaintFrm"/>
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<EditorIndex Value="4"/>
<EditorIndex Value="7"/>
<TopLine Value="38"/>
<CursorPos X="32" Y="50"/>
<UsageCount Value="12"/>
@ -118,18 +117,17 @@
<ComponentName Value="CodeGenerateFrm"/>
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<EditorIndex Value="3"/>
<TopLine Value="500"/>
<CursorPos X="3" Y="504"/>
<EditorIndex Value="6"/>
<UsageCount Value="12"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
</Unit9>
<Unit10>
<Filename Value="..\..\source\onguard.pas"/>
<EditorIndex Value="2"/>
<TopLine Value="1488"/>
<CursorPos X="18" Y="1498"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="5"/>
<TopLine Value="922"/>
<CursorPos X="6" Y="940"/>
<UsageCount Value="11"/>
<Loaded Value="True"/>
</Unit10>
@ -153,9 +151,11 @@
</Unit12>
<Unit13>
<Filename Value="..\..\source\ogutil.pas"/>
<TopLine Value="714"/>
<CursorPos X="32" Y="693"/>
<EditorIndex Value="4"/>
<TopLine Value="1247"/>
<CursorPos X="6" Y="1271"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit13>
<Unit14>
<Filename Value="codegenu.lfm"/>
@ -199,9 +199,11 @@
</Unit19>
<Unit20>
<Filename Value="..\..\source\idesn.pas"/>
<TopLine Value="37"/>
<CursorPos Y="23"/>
<EditorIndex Value="8"/>
<TopLine Value="137"/>
<CursorPos X="6" Y="155"/>
<UsageCount Value="11"/>
<Loaded Value="True"/>
</Unit20>
<Unit21>
<Filename Value="..\..\..\..\..\..\temp\fpc\rtl\inc\systemh.inc"/>
@ -211,48 +213,157 @@
</Unit21>
<Unit22>
<Filename Value="..\..\source\onguard.inc"/>
<EditorIndex Value="-1"/>
<EditorIndex Value="10"/>
<TopLine Value="31"/>
<CursorPos X="19" Y="50"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit22>
<Unit23>
<Filename Value="..\..\source\ogfirst.pas"/>
<EditorIndex Value="2"/>
<TopLine Value="133"/>
<CursorPos X="9" Y="152"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit23>
<Unit24>
<Filename Value="..\..\source\ogproexe.pas"/>
<EditorIndex Value="3"/>
<TopLine Value="644"/>
<CursorPos X="9" Y="663"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit24>
<Unit25>
<Filename Value="..\..\source\ogsrmgr.pas"/>
<EditorIndex Value="9"/>
<TopLine Value="456"/>
<CursorPos X="9" Y="482"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
</Unit25>
</Units>
<JumpHistory Count="9" HistoryIndex="8">
<JumpHistory Count="30" HistoryIndex="29">
<Position1>
<Filename Value="codegenu.pas"/>
<Caret Line="47" Column="51" TopLine="26"/>
<Filename Value="..\..\source\qonguard2.pas"/>
<Caret Line="504" Column="3" TopLine="500"/>
</Position1>
<Position2>
<Filename Value="codegenu.pas"/>
<Caret Line="17" Column="18"/>
<Caret Line="18" Column="40"/>
</Position2>
<Position3>
<Filename Value="..\..\source\onguard.pas"/>
<Caret Line="273" Column="18" TopLine="247"/>
<Filename Value="..\..\source\qonguard2.pas"/>
<Caret Line="209" Column="19" TopLine="209"/>
</Position3>
<Position4>
<Filename Value="..\..\source\onguard.pas"/>
<Caret Line="1494" TopLine="1488"/>
<Filename Value="..\..\source\qonguard2.pas"/>
</Position4>
<Position5>
<Filename Value="..\..\source\qonguard2.pas"/>
<Caret Line="86" Column="32" TopLine="57"/>
<Filename Value="..\..\source\idesn.pas"/>
<Caret Line="155" Column="6" TopLine="137"/>
</Position5>
<Position6>
<Filename Value="..\..\source\qonguard2.pas"/>
<Caret Line="19" TopLine="19"/>
<Filename Value="..\..\source\ogfirst.pas"/>
<Caret Line="152" Column="16" TopLine="165"/>
</Position6>
<Position7>
<Filename Value="..\..\source\onguard.pas"/>
<Caret Line="1498" Column="18" TopLine="1488"/>
<Filename Value="..\..\source\ogfirst.pas"/>
<Caret Line="69" Column="9" TopLine="50"/>
</Position7>
<Position8>
<Filename Value="..\..\source\qonguard2.pas"/>
<Caret Line="76" Column="3" TopLine="58"/>
<Filename Value="..\..\source\ogfirst.pas"/>
<Caret Line="86" Column="11" TopLine="55"/>
</Position8>
<Position9>
<Filename Value="..\..\source\qonguard2.pas"/>
<Caret Line="504" Column="3" TopLine="500"/>
<Filename Value="..\..\source\ogfirst.pas"/>
<Caret Line="97" Column="9" TopLine="78"/>
</Position9>
<Position10>
<Filename Value="..\..\source\ogfirst.pas"/>
<Caret Line="152" Column="9" TopLine="133"/>
</Position10>
<Position11>
<Filename Value="..\..\source\ogproexe.pas"/>
<Caret Line="675" Column="24" TopLine="643"/>
</Position11>
<Position12>
<Filename Value="..\..\source\ogproexe.pas"/>
<Caret Line="262" Column="9" TopLine="243"/>
</Position12>
<Position13>
<Filename Value="..\..\source\ogproexe.pas"/>
<Caret Line="377" Column="9" TopLine="358"/>
</Position13>
<Position14>
<Filename Value="..\..\source\ogproexe.pas"/>
<Caret Line="532" Column="9" TopLine="513"/>
</Position14>
<Position15>
<Filename Value="..\..\source\ogproexe.pas"/>
<Caret Line="663" Column="9" TopLine="644"/>
</Position15>
<Position16>
<Filename Value="..\..\source\ogsrmgr.pas"/>
<Caret Line="482" Column="18" TopLine="456"/>
</Position16>
<Position17>
<Filename Value="..\..\source\ogsrmgr.pas"/>
<Caret Line="100" Column="9" TopLine="81"/>
</Position17>
<Position18>
<Filename Value="..\..\source\ogsrmgr.pas"/>
<Caret Line="142" Column="9" TopLine="123"/>
</Position18>
<Position19>
<Filename Value="..\..\source\ogsrmgr.pas"/>
<Caret Line="190" Column="9" TopLine="172"/>
</Position19>
<Position20>
<Filename Value="..\..\source\ogsrmgr.pas"/>
<Caret Line="228" Column="9" TopLine="209"/>
</Position20>
<Position21>
<Filename Value="..\..\source\ogsrmgr.pas"/>
<Caret Line="482" Column="9" TopLine="456"/>
</Position21>
<Position22>
<Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="545" Column="18" TopLine="690"/>
</Position22>
<Position23>
<Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="55" Column="9" TopLine="36"/>
</Position23>
<Position24>
<Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="77" Column="11" TopLine="58"/>
</Position24>
<Position25>
<Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="304" Column="19" TopLine="288"/>
</Position25>
<Position26>
<Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="548" Column="9" TopLine="529"/>
</Position26>
<Position27>
<Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="847" Column="18" TopLine="831"/>
</Position27>
<Position28>
<Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="1159" Column="18" TopLine="1143"/>
</Position28>
<Position29>
<Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="1271" Column="6" TopLine="1247"/>
</Position29>
<Position30>
<Filename Value="..\..\source\onguard.inc"/>
<Caret Line="50" Column="19" TopLine="31"/>
</Position30>
</JumpHistory>
</ProjectOptions>
<CompilerOptions>
@ -284,7 +395,7 @@
</Linking>
</CompilerOptions>
<Debugging>
<BreakPoints Count="3">
<BreakPoints Count="2">
<Item1>
<Kind Value="bpkSource"/>
<WatchScope Value="wpsGlobal"/>
@ -299,13 +410,6 @@
<Source Value="..\..\source\qonguard3.pas"/>
<Line Value="212"/>
</Item2>
<Item3>
<Kind Value="bpkSource"/>
<WatchScope Value="wpsGlobal"/>
<WatchKind Value="wpkWrite"/>
<Source Value="..\..\source\qonguard2.pas"/>
<Line Value="236"/>
</Item3>
</BreakPoints>
<Watches Count="1">
<Item1>

View File

@ -74,7 +74,7 @@
<IsVisibleTab Value="True"/>
<EditorIndex Value="2"/>
<TopLine Value="20"/>
<CursorPos X="70" Y="32"/>
<CursorPos X="37" Y="38"/>
<UsageCount Value="21"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>