[Lazarus] TpOnGuard question

[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 <antoniog12345 at gmail.com>:
> The file is ogProExe.pas.
>
> Antônio
>
> 2012/1/25 Graeme Geldenhuys <graemeg.lists at gmail.com>:
>> 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
>> Lazarus at lists.lazarus.freepascal.org
>> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus