Range Checking Directive
lazarus / 9-Editor

----------------------------------------------------------------------
IndianaJones · 2009-01-29 08:09

Hi all,

I dont know where to place this post, i placed it in here.
My question is so simple that, i add the {$R+} range checking
directive but fpc compiles the following code without any error.
Thanks.

procedure TForm1.FormCreate(Sender: TObject);
var
   a: longint;
begin
   edit1.Text:=inttostr(high(a)+10);
end;

----------------------------------------------------------------------
Vincent Snijders · 2009-01-29 08:30

And what if you add overflow checking {$Q+} ?

----------------------------------------------------------------------
IndianaJones · 2009-01-29 12:15

Hi Vincent,

Also add the {$Q+} (overflow checking, but it doesnt effect.
I got the same result.
Thanks

----------------------------------------------------------------------
Vincent Snijders · 2009-01-29 13:57

I have no idea. Maybe you can convert your program to a console app
(not requiring the LCL) and ask on the fpc mailing lists?

----------------------------------------------------------------------
Phil · 2009-01-29 14:21

IntToStr is overloaded, with a version that also takes Int64 as input.

Thanks.

-Phil