Στους Δελφούς, η ευέλικτη γλώσσα προγραμματισμού ιστού, συστοιχίες επιτρέψτε σε έναν προγραμματιστή να αναφερθεί σε μια σειρά μεταβλητών με το ίδιο όνομα και να χρησιμοποιήσει έναν αριθμό - έναν δείκτη - για να τα ξεχωρίσει.
Στα περισσότερα σενάρια, δηλώνετε έναν πίνακα ως μεταβλητή, ο οποίος επιτρέπει την αλλαγή των στοιχείων του πίνακα σε χρόνο εκτέλεσης.
Ωστόσο, μερικές φορές πρέπει να δηλώσετε μια σταθερή διάταξη - μια συστοιχία μόνο για ανάγνωση. Δεν μπορείτε να αλλάξετε την τιμή μίας σταθερής μεταβλητής ή μιας μεταβλητής μόνο για ανάγνωση. Επομένως, ενώ δηλώνει a σταθερή συστοιχία, πρέπει επίσης να την αρχικοποιήσετε.
Παράδειγμα δήλωσης τριών σταθερών συστοιχιών
Αυτό το παράδειγμα κώδικα δηλώνει και αρχικοποιεί τρεις σταθερές συστοιχίες, που ονομάζονται Ημέρες, CursorMode, και Στοιχεία.
- Ημέρες είναι μια σειρά συμβολοσειρών έξι στοιχείων. Ημέρες [1] επιστρέφει τη συμβολοσειρά Mon.
- CursorMode είναι ένα σειρά από δύο στοιχεία, με την οποία δηλώνει το CursorMode [false] = crHourGlass και το CursorMode = crSQLWait. Οι "cr *" σταθερές μπορούν να χρησιμοποιηθούν για να αλλάξουν τον τρέχοντα δρομέα οθόνης.
- Στοιχεία ορίζει μια σειρά τριών TShopItem αρχεία.
τύπος
TShopItem = εγγραφή
Όνομα: συμβολοσειρά;
Τιμή: νόμισμα;
τέλος;
const
Ημέρες: πίνακας [0..6] της συμβολοσειράς =
(
'Sun', 'Mon', 'Tue', 'Wed',
«Πέμ», «Παρ», «Σαβ»,
) ;
CursorMode: πίνακας [boolean] του TCursor =
(
crHourGlass, crSQLWait
) ;
Στοιχεία: πίνακας [1..3] του TShopItem =
(
(Όνομα: 'Ρολόι'; Τιμή: 20.99),
(Όνομα: 'Μολύβι'; Τιμή: 15.75),
(Όνομα: «συμβούλιο»; Τιμή: 42.96)
);
Προσπαθώντας να ορίσετε μια τιμή για ένα στοιχείο σε ένα σταθερό πίνακα αυξάνει το σφάλμα χρόνου "Compiled time" δεν μπορεί να εκχωρηθεί στο "αριστερό μέρος". Για παράδειγμα, ο ακόλουθος κώδικας δεν εκτελέστηκε με επιτυχία:
Στοιχεία [1] .Name: = 'Παρακολουθήστε'; //δεν θα καταρτίσει