pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

onguard: Fix compilation with at least Laz 1.4.4 / FPC 2.6.4

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8736 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2023-02-23 13:55:39 +00:00
parent 0a8755d05b
commit a5bdd38008
54 changed files with 926 additions and 505 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
components/onguard/examples/exdtp21/exdtp21.lpi
View File

@ -59,8 +59,8 @@
<UnitName Value="Exdtp21u"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="1"/>
<TopLine Value="69"/>
<CursorPos X="3" Y="102"/>
<TopLine Value="53"/>
<CursorPos Y="69"/>
<UsageCount Value="836"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
@ -74,7 +74,7 @@
<Loaded Value="True"/>
</Unit2>
</Units>
<JumpHistory Count="17" HistoryIndex="16">
<JumpHistory Count="18" HistoryIndex="17">
<Position1>
<Filename Value="exdtp21u.pas"/>
<Caret Line="83" Column="17" TopLine="69"/>
@ -143,6 +143,10 @@
<Filename Value="exdtp21u.pas"/>
<Caret Line="123" TopLine="88"/>
</Position17>
<Position18>
<Filename Value="exdtp21u.pas"/>
<Caret Line="102" Column="3" TopLine="69"/>
</Position18>
</JumpHistory>
</ProjectOptions>
<CompilerOptions>

1
components/onguard/examples/exdtp21/exdtp21u.pas
View File

@ -66,7 +66,6 @@ var
IniFile : TIniFile;
S : string;
SD, ED : TDateTime;
L : integer;
begin
{force the INI file to be in the same directory as the application}
TheDir := ExtractFilePath(ParamStr(0));