4D v13.4

ARRAY PICTURE

Home

 
4D v13.4
4D Language Reference
Arrays
ARRAY PICTURE

ARRAY PICTURE 


 

ARRAY PICTURE ( arrayName ; size {; size2} ) 
Parameter Type   Description
arrayName  Array in Name of the array
size  Longint in Number of elements in the array, or Number of rows if size2 is specified
size2  Longint in Number of columns in a two-dimensional array

 The ARRAY PICTURE command creates and/or resizes an array of Picture elements in memory.

  • The arrayName parameter is the name of the array.
  • The size parameter is the number of elements in the array.The size2 parameter is optional; if size2 is specified, the command creates a two-dimensional array. In this case, size specifies the number of rows and size2 specifies the number of columns in each array. Each row in a two-dimensional array can be treated as both an element and an array. This means that while working with the first dimension of the array, you can use other array commands to insert and delete entire arrays in a two-dimensional array.

While applying to an existing array:

  • If you enlarge the array size, the existing elements are left unchanged, and the new elements are initialized to empty pictures. This means that Picture size applied to one of these elements will return 0.
  • If you reduce the array size, the last elements deleted from the array are lost.

This example creates a process array of 100 Picture elements:

 ARRAY PICTURE(agValues;100)

This example creates a local array of 100 rows of 50 Picture elements:

 ARRAY PICTURE($agValues;100;50)

This example creates an interprocess array of Picture elements and loads each picture into one of the elements of the array. The array’s size is equal to the number of 'PICT' resources available to the database. The array’s resource name starts with "User Intf/":

 RESOURCE LIST("PICT";$aiResIDs;$asResNames)
 ARRAY PICTURE(◊agValues;Size of array($aiResIDs))
 $vlPictElem:=0
 For($vlElem;1;Size of array(◊agValues))
    If($asResNames{$vlElem}="User Intf/@")
       $vlPictElem:=$vlPictElem+1
       GET PICTURE RESOURCE("PICT";$aiResIDs{$vlElem};$vgPicture)
       ◊agValues{$vlPictElem}:=$vgPicture
    End if
 End for
 ARRAY PICTURE(◊agValues;$vlPictElem)

 
PROPERTIES 

Product: 4D
Theme: Arrays
Number: 279

 
INDEX

Alphabetical list of commands

 
HISTORY 

Created: < 4D v6