Hoe constante arrays in Delphi te declareren en initialiseren

In Delphi, de veelzijdige web-programmeertaal, stellen arrays een ontwikkelaar in staat om naar een reeks variabelen met dezelfde naam te verwijzen en een nummer - een index - te gebruiken om ze uit elkaar te houden.

In de meeste scenario's declareert u een array als een variabele, waarmee arrayelementen tijdens runtime kunnen worden gewijzigd.

Soms moet u echter een constante array declareren als een alleen-lezen array. U kunt de waarde van een constante of een alleen-lezen variabele niet wijzigen. Daarom moet u een constante array declareren, maar ook initialiseren.

Voorbeeldverklaring van drie constante reeksen

Dit codevoorbeeld declareert en initialiseert drie constante arrays, genaamd dagen, CursorMode, en items.

• dagen is een reeks van zes elementen. Days [1] geeft de Mon-string terug.
• CursorMode is een array van twee elementen, waarbij declaratie CursorMode [false] = crHourGlass en CursorMode = crSQLWait. "cr *" -constanten kunnen worden gebruikt om de huidige schermcursor te wijzigen.
• items definieert een array van drie TShopItem-records.

type
   TShopItem = record
     Naam: string;
     Prijs: valuta;
   einde;
const
   Days: array [0… 6] van string =
   (
     'Sun', 'Mon', 'Di', 'Wed',
     'Thu', 'Fri', 'Sat'
   );
   CursorMode: array [boolean] van TCursor =
   (
     crHourGlass, crSQLWait
   );
   Items: array [1… 3] van TShopItem =
   (
     (Naam: 'Clock'; Prijs: 20,99),
     (Naam: 'Pencil'; Prijs: 15.75),
     (Naam: 'Board'; Prijs: 42.96)
   );

Als u probeert een waarde toe te wijzen voor een item in een constante array, wordt de fout 'Linkerzijde kan niet worden toegewezen' verhoogd. De volgende code wordt bijvoorbeeld niet succesvol uitgevoerd:

 Items [1] .Name: = 'Bekijken'; //zal niet compileren