Constante arrays declareren en initialiseren in Delphi

In Delphi, de veelzijdige web-programmeertaal, arrays laat een ontwikkelaar verwijzen naar een reeks variabelen met dezelfde naam en een nummer - een index - gebruiken om ze van elkaar te onderscheiden.

In de meeste scenario's declareert u een array als een variabele, waardoor array-elementen tijdens runtime kunnen worden gewijzigd.

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

Voorbeeldverklaring van drie constante arrays

Dit codevoorbeeld declareert en initialiseert drie constante arrays, genaamd Dagen, Cursormodus, en Artikelen.

  • Dagen is een reeks van zes elementen. Dagen [1] retourneert de Mon-tekenreeks.
  • CursorMode is een reeks van twee elementen, waarbij verklaring CursorMode [false] = crHourGlass en CursorMode = crSQLWait. "cr *" constanten kunnen worden gebruikt om de huidige schermcursor te wijzigen.
  • Artikelen definieert een array van drie TShopItem records.
instagram viewer
type
TShopItem = record
Naam: string;
Prijs: valuta;
einde;
const
Dagen: array [0..6] van string =
(
'Sun', 'Mon', 'Di', 'Wed',
'Do', 'vr', 'za'
) ;
CursorMode: array [boolean] of TCursor =
(
crHourGlass, crSQLWait
) ;
Items: array [1..3] van TShopItem =
(
(Naam: 'Clock'; Prijs: 20,99),
(Naam: 'Potlood'; Prijs: 15,75),
(Naambordje'; Prijs: 42,96)
);

Als u probeert een waarde toe te wijzen voor een item in een constante matrix, wordt de compileertijdfout "Linkerkant kan niet worden toegewezen" verhoogd. De volgende code wordt bijvoorbeeld niet met succes uitgevoerd:

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

instagram story viewer