OnGuard: Replace in all demo projects .lrs resource by .res resource. Less hints and warnings.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8724 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/onguard/examples/exusg2/exusg2u.pas

@@ -14,12 +14,8 @@ unit Exusg2u;
 interface
 
 uses
-  SysUtils,Classes,Controls,
-  Forms, Dialogs, StdCtrls, Buttons, OnGuard,
-  LResources,
-
-  OgUtil,
-  IniFiles;
+  SysUtils,Classes,Controls, Forms, Dialogs, StdCtrls, Buttons, IniFiles,
+  OnGuard, OgUtil;
 
 const
   CKey : TKey = ($E5,$8F,$84,$D6,$92,$C9,$A4,$D8,
@@ -51,7 +47,7 @@ var
 
 implementation
 
-
+{$R *.lfm}
 
 {==========================================================================}
 
@@ -100,8 +96,7 @@ begin
                        Exit;
                      end;
 
-    ogRunCountUsed : S := 'No more runs allowed' + #13
-                        + '    Register NOW    ';
+    ogRunCountUsed : S := 'No more runs allowed.' + LineEnding + 'Register NOW';
 
     ogInvalidCode  : begin
                        if not (FileExists(TheDir + 'Usage2.ini')) then begin
@@ -124,8 +119,7 @@ begin
                          S := 'Invalid Code';
                      end;
 
-    ogCodeExpired  : S := 'Trial Run period expired' + #13
-                        + '      Register NOW      ';
+    ogCodeExpired  : S := 'Trial Run period expired.' + LineEnding + 'Register NOW';
   end;
 
   ShowMessage(S);
@@ -153,9 +147,5 @@ begin
 end;
 
 
-initialization
-{$i exusg2u.lrs}
-
-
 end.