Topic complex |
Array functions |
Function |
inarray() |
Short |
checks if number is in an array |
Syntax |
INARRAY(n : INTEGER; VAR v : INTEGER[]) : 0|1 |
Parameter |
n : any INTEGER-number <> 0
v : INTEGER-field |
Return |
1 : n is in v
0 : n is not in v |
See also: |
|
Description |
Can be used if the marking list is saved in a INTEGER field with PUMARKS.
Essential is a query via a TBITS field:
VAR temp : TBITS[];
...
InitArray(temp[filesize(db)]);
GetMarks(db,temp);
IF temp[x] THEN ...
|