Leven

Hoe constante arrays in Delphi te declareren en initialiseren

Hoe constante arrays in Delphi te declareren en initialiseren



We are searching data for your request:

Forums and discussions:
Manuals and reference books:
Data from registers:
Wait the end of the search in all databases.
Upon completion, a link will appear to access the found materials.

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, terwijl u een constante array declareert, deze 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. Days1 retourneert de Mon-string.
  • CursorMode is een array van twee elementen, waarbij declaratie CursorModefalse = 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
Dagen: array0… 6 van string =
   (
'Sun', 'Mon', 'Di', 'Wed',
'Thu', 'Fri', 'Sat'
   ) ;
CursorMode: arrayboolean of TCursor =
   (
crHourGlass, crSQLWait
   ) ;
Items: array1… 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:

Items1.Name: = 'Bekijken'; //zal niet compileren


Bekijk de video: Delphi Programming Series: - Creating a constant array (Augustus 2022).