[SOLVED]A case of blindness, probably. Old hands, plz help.

[dseligo]

AND most important, if you pass an array to a procedure or function it is always 0 based in FPC, Delphi etc...

Try this:

Code: Pascal  [Select][+][-]

1. type TMyArray = array[-100..100] of integer;
2.  
3. procedure Test(AData: TMyArray);
4. begin
5.   WriteLn(Low(AData), ' - ', High(AData));
6. end;
7.  
8. var A: TMyArray;
9.  
10. begin
11.   Test(A);
12. end.

[Thaddy]

AND most important, if you pass an array to a procedure or function it is always 0 based in FPC, Delphi etc...

Try this:

Code: Pascal  [Select][+][-]

1. type TMyArray = array[-100..100] of integer;
2.  
3. procedure Test(AData: TMyArray);
4. begin
5.   WriteLn(Low(AData), ' - ', High(AData));
6. end;
7.  
8. var A: TMyArray;
9.  
10. begin
11.   Test(A);
12. end.

i think you are on the wrong thread?