Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus / 2012-01

TpOnGuard question

4 messages · 2 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Antônio

Running StampExe.exe from IDE I get 201 RunTime error (Range Check Error) on the first line of this IF statement (line 399):

if (PSignatureRec(@Memory[I]).Sig1 = $407E7E21) and (PSignatureRec(@Memory[I]).Sig2 = $33435243) and
(PSignatureRec(@Memory[I]).Sig3 = $7E7E4032) and
(PSignatureRec(@Memory[I]).Sig4 = $407E7E21) and
(PSignatureRec(@Memory[I]).Sig5 = $33435243) and
(PSignatureRec(@Memory[I]).Sig6 = $7E7E4032) then

How can I solve this?

Ant?nio

Reply by email

Graeme Geldenhuys
to Antônio
Ant?nio wrote
Running StampExe.exe from IDE I get 201 RunTime error (Range Check Error) on the first line of this IF statement (line 399):

In what file is that? I'm maintaining my own port of OnGuard (on GitHub) - but to be honest, I haven't worked through all the units and examples yet - only those I needed for our projects.

Regards, ? - Graeme - _______________________________________________ fpGUI - a cross-platform Free Pascal GUI toolkit http://fpgui.sourceforge.net

Reply by email

Antônio
to Graeme Geldenhuys

The file is ogProExe.pas.

Ant?nio

2012/1/25 Graeme Geldenhuys :

Show quoted text 23 lines
On 24 January 2012 19:26, Ant?nio wrote: > Running StampExe.exe from IDE I get 201 RunTime error (Range Check > Error) on the first line of this IF statement (line 399): In what file is that? ?I'm maintaining my own port of OnGuard (on GitHub) - but to be honest, I haven't worked through all the units and examples yet - only those I needed for our projects. -- Regards, ? - Graeme - _______________________________________________ fpGUI - a cross-platform Free Pascal GUI toolkit http://fpgui.sourceforge.net -- _______________________________________________ Lazarus mailing list http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply by email

Antônio
to Antônio

There is a second version of this statement:

if (PSignatureRec(@Memory[I])^.Sig1 = $407E7E21) and (PSignatureRec(@Memory[I])^.Sig2 = $33435243) and
(PSignatureRec(@Memory[I])^.Sig3 = $7E7E4032) and
(PSignatureRec(@Memory[I])^.Sig4 = $407E7E21) and
(PSignatureRec(@Memory[I])^.Sig5 = $33435243) and
(PSignatureRec(@Memory[I])^.Sig6 = $7E7E4032) then

But it does not change anything.

Ant?nio

2012/1/25 Ant?nio :

Show quoted text 28 lines
The file is ogProExe.pas. Ant?nio 2012/1/25 Graeme Geldenhuys : > On 24 January 2012 19:26, Ant?nio wrote: >> Running StampExe.exe from IDE I get 201 RunTime error (Range Check >> Error) on the first line of this IF statement (line 399): > > In what file is that? ?I'm maintaining my own port of OnGuard (on > GitHub) - but to be honest, I haven't worked through all the units and > examples yet - only those I needed for our projects. > > > -- > Regards, > ? - Graeme - > > > _______________________________________________ > fpGUI - a cross-platform Free Pascal GUI toolkit > http://fpgui.sourceforge.net > > -- > _______________________________________________ > Lazarus mailing list > > http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply by email