Prestwood IT: Array (Cross Reference Coding Encyclopedia: Delphi)

To/From Code

	Languages
BROWSEBYLANGUAGE Access VBA ASP Classic C# C++ C++/CLI Corel Paradox Delphi Delphi Prism Java JavaScript Perl PHP VB Classic VB.Net

	Categories
BROWSEBYCATEGORY +Tool Basics +Language Basics +Language Details +Data Structures +Statements +Operators +Commands +Database +OOP Basics +OOP Details

	Delphi Guides
Delphi To/From Conversion Guides Delphi and Access VBA Delphi and ASP Classic Delphi and C# Delphi and C++ Delphi and C++/CLI Delphi and Corel Paradox Delphi and Delphi Prism Delphi and Java Delphi and JavaScript Delphi and Perl Delphi and PHP Delphi and VB Classic Delphi and VB.Net

	Browse Language
DELPHILANGUAGE Delphi ◄╣ +Tool Basics +Language Basics +Language Details +Data Structures +Statements +Operators +Commands +OOP Basics +OOP Details

	Members-Only
Sign in to see member-only pages.

► KB ► To/From Guides ► Delphi

Print This

Array

Languages Focus

A data structure in which individual values (called elements or items) may be located by reference to one or more integer index variables, the number of such indices being the number of dimensions in the array.

Arrays can start with an index value of 0 or 1, sometimes referred to as 0 based or 1 based.

Delphi: x=Array[0..3] of string;

Delphi supports both static and dynamic arrays as well as single and multi dimensional arrays.

Syntax Example:

var
  MyArray: array[0..3] of string;
  i: Integer;
begin
  MyArray[0] := 'Mike';
  MyArray[1] := 'Lisa';
  MyArray[2] := 'Felicia';
  MyArray[3] := 'Nathan';

  for i := 0 to High(MyArray) do
    ShowMessage(MyArray[i]);
end;

Delphi Array (x=Array[0..3] of string;) 1 certification question.

Cross Reference Examples:

Access VBA: x = Array()

Arrays in Access VBA use a 0-based indice. Use UBound to get the number of elements. UBound returns -1 if the array has no elements, 0 if it has 1, 1 if it has 2, etc.

Syntax Example: 1 certification question.

Dim MyArray As Variant
Dim i As Integer
 
MyArray = Array("Mike", "Lisa", "Felicia", "Nathan")
 
If UBound(MyArray) > -1 Then
  For i = 0 To UBound(MyArray)
    MsgBox (MyArray(i))
  Next
End If

ASP Classic: x = Array()

Arrays in ASP Classic use a 0-based indice.

Use UBound to get the number of elements. UBound returns -1 if the array has no elements, 0 if it has 1, 1 if it has 2, etc.

Syntax Example: 1 certification question.

Dim MyArray, i

MyArray = Array("Mike", "Lisa", "Felicia", "Nathan")

If UBound(MyArray) > -1 Then
  For i = 0 to UBound(MyArray)

    Response.Write MyArray(i)

  Next

End If

Corel Paradox: Array[] type

Arrays in ObjectPAL use a 1-based subscript (also known as an index). Use [] with a subscript to refer to an element (i.e. MyArray[1], MyArray[2]).

The number of elements for a given array in ObjectPAL are either fixed or resizeable. Specify the size when you declare it for fixed. Use size() to get the number of elements, size() returns 0 if the array has no elements. Use setSize(), grow(), addLast(), etc. to add elements to an array.

Syntax Example:

var
  MyArray Array[4] String ;Fixed size array.
  i LongInt
endVar
MyArray[1] = "Mike"
MyArray[2] = "Lisa"
MyArray[3] = "Felicia"
MyArray[4] = "Nathan"
if MyArray.size() > 0 then
  for i from 1 to MyArray.size()
    msgInfo("", MyArray[i])
  endFor
endIf

ObjectPAL Array (Array[] type) 1 certification question.

VB Classic: x = Array()

Arrays in VB Classic use a 0-based indice. Use UBound to get the number of elements. UBound returns -1 if the array has no elements, 0 if it has 1, 1 if it has 2, etc.

Syntax Example: 1 certification question.

Dim MyArray As Variant
Dim i As Integer
 
MyArray = Array("Mike", "Lisa", "Felicia", "Nathan")
 
If UBound(MyArray) > -1 Then
  For i = 0 To UBound(MyArray)
    MsgBox (MyArray(i))
  Next
End If