Çok yönlü web programlama dili Delphi'de, diziler bir geliştiricinin aynı ada sahip bir dizi değişkeni ifade etmesine ve bunları ayırmak için bir sayı - bir dizin - kullanmasına izin verin.
Çoğu senaryoda, bir diziyi değişken olarak bildirirsiniz, bu da dizi öğelerinin çalışma zamanında değiştirilmesine izin verir.
Ancak, bazen sabit bir dizi (salt okunur bir dizi) bildirmeniz gerekir. Bir sabit veya salt okunur değişkenin değerini değiştiremezsiniz. Bu nedenle, bir sabit dizi, ayrıca başlatmanız gerekir.
Üç Sabit Dizinin Örnek Beyanı
Bu kod örneği, adlandırılmış üç sabit diziyi bildirir ve başlatır. günler, CursorMode, ve Öğeler.
- günler altı öğeden oluşan dize dizisidir. Gün [1] Pzt dizesini döndürür.
- CursorMode bir iki eleman dizisiburada CursorMode [false] = crHourGlass ve CursorMode = crSQLWait bildirimi. "cr *" sabitleri geçerli ekran imlecini değiştirmek için kullanılabilir.
- Öğeler üç TShopItem dizisini tanımlar kayıtlar.
tip
TShopItem = kayıt
İsim: string;
Fiyat: para birimi;
son;
const
Günler: dizenin [0..6] dizisi =
(
'Güneş', 'Pzt', 'Sal', 'Çar',
'Perş', 'Cum', 'Cts'
) ;
CursorMode: TCursor = dizisi [boolean] dizisi
(
crHourGlass, crSQLWait
) ;
Öğeler: dizi [1..3] TShopItem =
(
(İsim: 'Saat'; Fiyat: 20.99),
(İsim: 'Kalem'; Fiyat: 15.75),
(İsim tahtası'; Fiyat: 42.96)
);
Sabit dizideki bir öğeye değer atamaya çalışmak, "Sol tarafa atanamıyor" derleme zamanı hatasını artırır. Örneğin, aşağıdaki kod başarıyla yürütülmez:
Öğeler [1] .Ad: = 'İzleyin'; //derlenmeyecek