Wednesday, January 8, 2020

How to Declare and Initialize Constant Arrays in Delphi

In Delphi, the versatile web-programming language,  arrays allow a developer to refer to a series of variables by the same name and to use a number—an index—to tell them apart. In most scenarios, you declare an array as a variable, which allows  for array elements to be changed at run-time. However, sometimes you need to declare a constant array—a read-only array. You cannot change the value of a constant or a read-only variable. Therefore, while declaring a constant array, you must also initialize it. Example Declaration of Three Constant Arrays This code example declares and initializes three constant arrays, named Days, CursorMode, and Items. Days is a string array of six elements. Days[1] returns the Mon string.CursorMode is an  array of two elements, whereby declaration CursorMode[false] crHourGlass and CursorMode crSQLWait. cr* constants can be used to change the current screen cursor.Items defines an array of three TShopItem  records. type   Ã‚   TShopItem record   Ã‚  Ã‚  Ã‚   Name : string;   Ã‚  Ã‚  Ã‚   Price : currency;   Ã‚   end; const   Ã‚   Days : array[0..6] of string   Ã‚   (   Ã‚  Ã‚  Ã‚  Ã‚  Sun, Mon, Tue, Wed,   Ã‚  Ã‚  Ã‚  Ã‚  Thu, Fri, Sat   Ã‚   ) ;   Ã‚   CursorMode : array[boolean] of TCursor   Ã‚   (   Ã‚  Ã‚  Ã‚   crHourGlass, crSQLWait   Ã‚   ) ;   Ã‚   Items : array[1..3] of TShopItem   Ã‚   (   Ã‚  Ã‚  Ã‚   (Name : Clock; Price : 20.99),   Ã‚  Ã‚  Ã‚   (Name : Pencil; Price : 15.75),   Ã‚  Ã‚  Ã‚   (Name : Board; Price : 42.96)   Ã‚   ) ; Trying to assign a value for an item in a constant array raises the Left side cannot be assigned to compile time error. For example, the following code does not successfully execute: Items[1].Name : Watch; //will not compile

No comments:

Post a Comment

Note: Only a member of this blog may post a comment.