Recent

Author Topic: Turbo Power OnGuard package  (Read 18318 times)

Anonymous

  • Guest
Turbo Power OnGuard package
« on: June 18, 2006, 02:50:39 pm »
Turbo Power OnGurad package has been ported to Lazarus (by me :) )

Check here : http://wiki.lazarus.freepascal.org/index.php/OnGuard


P.S. Volunteers are needed to test it.

Regards
Boguslaw Brandys

Anonymous

  • Guest
RE: Turbo Power OnGuard package
« Reply #1 on: June 18, 2006, 10:24:17 pm »
looks very good
(0.9.17 linux)

tatamata

  • Hero Member
  • *****
  • Posts: 693
    • ZMSQL - SQL enhanced in-memory database
Turbo Power OnGuard package
« Reply #2 on: November 28, 2007, 08:18:55 pm »
I couldn't compile it and install with recent Lazarus 0.9.23 developer snapshot (fpc 2.2.1)...

tatamata

  • Hero Member
  • *****
  • Posts: 693
    • ZMSQL - SQL enhanced in-memory database
Turbo Power OnGuard package
« Reply #3 on: January 24, 2008, 12:48:55 pm »
Recently I tried to use OnGuard on Windows. I compiled CODEGEN example, but when I tried to generate release codes it just doesn't accept any dates input. I tried with many different date formats but none worked. It was always rejected with error messages such as "Start date invalid".
Then I tried the same on Linux. On my surprise, it works!
Does anybody know why it works on Linux and doesn't work on Windows?
Does somebody successfully use it on Windows?

Leledumbo

  • Hero Member
  • *****
  • Posts: 8114
  • Programming + Glam Metal + Tae Kwon Do = Me
Turbo Power OnGuard package
« Reply #4 on: January 25, 2008, 10:29:18 am »
Windows store its date format information based on localization. To check yours:
Code: [Select]

uses
  SysUtils;
...
ShowMessage(DateToStr(Date));

tatamata

  • Hero Member
  • *****
  • Posts: 693
    • ZMSQL - SQL enhanced in-memory database
Turbo Power OnGuard package
« Reply #5 on: January 25, 2008, 12:07:02 pm »
Well, the format is "25.1.2008", but OnGuard CODEGEN does not accept it...

Leledumbo

  • Hero Member
  • *****
  • Posts: 8114
  • Programming + Glam Metal + Tae Kwon Do = Me
Turbo Power OnGuard package
« Reply #6 on: January 25, 2008, 12:22:50 pm »
Check CODEGEN source, how does it store date format?

Csabi64

  • Newbie
  • Posts: 4
Re: Turbo Power OnGuard package
« Reply #7 on: August 13, 2011, 04:46:00 pm »
Hi Everyone,

I tried to install the component tponguard.
I use Lazarus 0.9.30.1. and Windows XP Professional SP3.
The compiler says:
  c:\lazarus\components\tponguardfpc\source\onguard.pas(887,33) Error: Unknown record field identifier "U"

(the line is:
PDWord(@Buf[0])^ := SysInfo.u.dwOemId;
)

You should delete that .u (I think...) .
« Last Edit: August 13, 2011, 05:11:11 pm by Csabi64 »

JD

  • Hero Member
  • *****
  • Posts: 1762
Re: Turbo Power OnGuard package
« Reply #8 on: August 13, 2011, 05:15:14 pm »
Hi Everyone,

I tried to install the component tponguard.
I use Lazarus 0.9.30.1. and Windows XP Professional SP3.
The compiler says:
  c:\lazarus\components\tponguardfpc\source\onguard.pas(887,33) Error: Unknown record field identifier "U"

(the line is:
PDWord(@Buf[0])^ := SysInfo.u.dwOemId;
)

You should delete that .u (I think...) .

What version of TurboPower OnGuard are you trying to install? I have version 1.0.0.1 installed in Lazarus 0.9.31/FPC 2.4.4 svn 31847 in Vista & XP SP3.
Windows (10, 7) - Lazarus 2.0.6/FPC 3.2, Delphi

Indy 10.6 series; mORMot; Zeos 7.3; SQLite, Firebird, PostgreSQL & MariaDB; VirtualTreeView 5.5.3 R1

IPguy

  • Sr. Member
  • ****
  • Posts: 385
Re: Turbo Power OnGuard package
« Reply #9 on: August 13, 2011, 05:52:13 pm »
FYI - the version of OnGuard in the lazarus-ccr SVN is 1.13.
https://lazarus-ccr.svn.sourceforge.net/svnroot/lazarus-ccr

Is it possible there are two different branches of OnGuard floating around?



Code: [Select]
{*********************************************************}
{*                  ONGUARD7.PAS 1.13                    *}
{*     Copyright (c) 1996-02 TurboPower Software Co      *}
{*                 All rights reserved.                  *}
{*********************************************************}

JD

  • Hero Member
  • *****
  • Posts: 1762
Re: Turbo Power OnGuard package
« Reply #10 on: August 13, 2011, 07:10:43 pm »
FYI - the version of OnGuard in the lazarus-ccr SVN is 1.13.
https://lazarus-ccr.svn.sourceforge.net/svnroot/lazarus-ccr

Is it possible there are two different branches of OnGuard floating around?



Code: [Select]
{*********************************************************}
{*                  ONGUARD7.PAS 1.13                    *}
{*     Copyright (c) 1996-02 TurboPower Software Co      *}
{*                 All rights reserved.                  *}
{*********************************************************}

I have the same header in my Onguard7.pas I think it is the package version that is 1.0.0.1
In any case, I just reinstalled OnGuard from svn & it looks the same as before.
Windows (10, 7) - Lazarus 2.0.6/FPC 3.2, Delphi

Indy 10.6 series; mORMot; Zeos 7.3; SQLite, Firebird, PostgreSQL & MariaDB; VirtualTreeView 5.5.3 R1

Jagluiperd

  • Newbie
  • Posts: 2
Re: Turbo Power OnGuard package
« Reply #11 on: October 09, 2011, 12:30:51 pm »
Hello from Spain.

First: Sorry, but my english is'nt good.

I have the same problem too: I couldn't compile it and install "tponguardfpc", the compiler show me this error:
C:\lazarus\components\tponguardfpc\source\onguard.pas(887,33) Error: Unknown record field identifier "U"

But, i solve this doing that in the codesource:

   //PDWord(@Buf[0])^ := SysInfo.u.dwOemId;
   PDWord(@Buf[0])^ := SysInfo.dwOemId;

Hope this help to someone.

mica

  • Full Member
  • ***
  • Posts: 192
Re: Turbo Power OnGuard package
« Reply #12 on: October 13, 2011, 06:05:07 pm »
hmm it installs fine after the change,but the examples dont find the units (onguard etc..)
strange

JD

  • Hero Member
  • *****
  • Posts: 1762
Re: Turbo Power OnGuard package
« Reply #13 on: October 13, 2011, 07:51:57 pm »
hmm it installs fine after the change,but the examples dont find the units (onguard etc..)
strange

Hi there,

You need to put the path to the OnGuard package source files in each example's (or your own project's) "Compiler Options ---> Paths --> Other Unit Files. Once you do this, the examples will work.

For instance, on my computer I add it like this:
Code: [Select]
$(LazarusDir)\components_extra\OnGuard\source;$(LazarusDir)\components_extra\OnGuard\packages

I hope that helps.

Cheers,

JD
Windows (10, 7) - Lazarus 2.0.6/FPC 3.2, Delphi

Indy 10.6 series; mORMot; Zeos 7.3; SQLite, Firebird, PostgreSQL & MariaDB; VirtualTreeView 5.5.3 R1

freeman35

  • Jr. Member
  • **
  • Posts: 92
Re: Turbo Power OnGuard package
« Reply #14 on: September 21, 2012, 04:02:13 pm »
I try install on win 7 x64 & Lazarus-1.1-38770-fpc-2.6.1-20120921-win64
When I compile, in ogutil.pas on this function "function SimulateRealModeInt" 
Code: [Select]
  xor     bx,bx
  mov     bl,IntNo
  xor     cx,cx       {StackWords = 0}
  les     di,Regs    {-> ERROR on this line}
  mov     ax,0300h
  int     31h
  jc      @@ExitPoint

  xor     ax,ax
@@ExitPoint:
on this line stop compiling and this errors in message box. I think problem is in asm code for not x64. Has anyone fix this or any idea ?

Code: [Select]
C:\tponguardfpc\source\ogutil.pas(357,14) Error: Asm: Opcode les not in table
C:\tponguardfpc\source\ogutil.pas(375,22) Error: Identifier not found "GlobalDosAlloc"
C:\tponguardfpc\source\ogutil.pas(379,39) Error: Incompatible types: got "FarPointer" expected "PMediaIDRec"
C:\tponguardfpc\source\ogutil.pas(380,39) Error: Incompatible types: got "FarPointer" expected "PMediaIDRec"
C:\tponguardfpc\source\ogutil.pas(381,18) Hint: Local variable "Regs" does not seem to be initialized
C:\tponguardfpc\source\ogutil.pas(383,13) Error: Illegal type conversion: "PMediaIDRec" to "OS"
C:\tponguardfpc\source\ogutil.pas(384,13) Error: Illegal type conversion: "PMediaIDRec" to "OS"
C:\tponguardfpc\source\ogutil.pas(396,18) Error: Identifier not found "GlobalDosFree"
C:\tponguardfpc\source\ogutil.pas(396,19) Error: Illegal type conversion: "PMediaIDRec" to "OS"
C:\tponguardfpc\source\ogutil.pas(404,50) Hint: Local variable "MR" does not seem to be initialized
C:\tponguardfpc\source\ogutil.pas(1870) Fatal: There were 8 errors compiling module, stopping