; Initialiser un tableau de Strings
; Voici un exemple qui exploite directement les chaînes en mémoire,
;    l'affectation des données est instantanée

Structure TString
   String.s{10}[0]
EndStructure

*MonTableau.TString = ?MonTableau
DataSection
   MonTableau:
   Data.s "ENZO     ", "AUDREY   ", "MOHAMED  ", "AURELIE  ", "QUENTIN  ", "MANON    ", "JULIEN   ", "JADE     ", "LUCAS    ", "LEA      ", "ETHAN    "
   Data.s "CHLOE    ", "THOMAS   ", "EMMA     ", "NATHAN   ", "CAROLINE ", "NICOLAS  ", "CAMILLE  ", "ALEXANDRE", "MARIE    ", "THEO     ", "PAULINE  "
   Data.s "HUGO     ", "SARAH    ", "YANIS    ", "LILOU    ", "RAYAN    ", "JULIE    ", "ANTOINE  ", "MELISSA  ", "ROMAIN   ", "INES     ", "XAVIER   ", "FANNY    "
   Data.s "SACHA    ", "LOLA     ", "LOUIS    ", "ABIGAIL  ", "OLIVIER  ", "CLARA    ", "RAPHAEL  ", "MATHILDE ", "TOM      ", "SABRINA  ", "MAXIME   "
   Data.s "LAURA    ", "BENJAMIN ", "ALEXIA   ", "CLEMENT  ", "OCEANE   ", "JULES    ", "AMBRE    ", "PIERRE   ", "AMANDINE ", "AXEL     ", "ANAIS    "
   Data.s "MAXENCE  ", "SOPHIE   ", "MAEL     ", "MARGAUX  ", "GABRIEL  ", "EMILIE   ", "GUILLAUME", "CORALIE  ", "EVAN     ", "URSULE   ", "MALIKA   "
   Data.s "SEBASTIEN", "OPHELIE  ", "ARTHUR   ", "ELODIE   ", "KEVIN    ", "CELIA    ", "MATHIEU  ", "LOUISE   ", "NOAH     ", "ALINE    ", "DAVID    "
   Data.s "LENA     ", "LEO      ", "CHARLOTTE", "MATHIS   ", "CELINE   ", "PAUL     ", "NOEMIE   ", "FLORIAN  ", "EMELINE  ", "TRISTAN  ", "LOUNA    "
   Data.s "SIMON    ", "GAETANE  ", "MATTHIEU ", "SOLENE   ", "VINCENT  ", "ALICE    ", "CEDRIC   ", "LUCIE    ", "TIMEO    ", "MARION   ", "ESTEBAN  "
EndDataSection

For i = 0 To 99
  Debug *MonTableau\String[i]
Next