Delphi peut également implémenter des tableaux de contrôle en définissant des variables de tableau pour implémenter des tableaux de contrôle.
Ma capacité d'expression est limitée et cet article est la première fois que je publie un document, alors pardonnez-moi tout inconvénient.
Lorsque nous utilisons Delphi, nous rencontrons parfois un problème, c'est-à-dire que Delphi ne nous permet pas de définir des tableaux de contrôle aussi facilement qu'un logiciel tel que VB ou VF. Lorsque j'écris un CD de démonstration multimédia, je dois utiliser de nombreux contrôles Image, et si je n'utilise pas de tableau de contrôle, il sera très difficile et compliqué d'écrire le programme. Ainsi, après avoir longuement réfléchi, j'ai finalement décidé d'implémenter le tableau de contrôle en définissant des variables de tableau.
Voici le code :
PRocédure Tfrm_main.FormCreate(Expéditeur : TObject);
var
image:array[1..12] of TImage; //Utilisé pour stocker 12 images
label:array[1..12] de TLabel;//utilisé pour stocker 12 étiquettes d'étiquette
commencer
// Payez l'objet image au tableau d'images
image[1]:=image1;
image[2]:=image2;
image[3]:=image3;
image[4]:=image4;
image[5]:=image5;
image[6]:=image6;
image[7]:=image7;
image[8]:=image8;
image[9]:=image9;
image[10]:=image10;
image[11]:=image11;
image[12]:=image12;
// Payez l'objet label au tableau label
étiquette[1]:=étiquette1;
étiquette[2]:=étiquette2;
étiquette[3]:=étiquette3;
étiquette[4]:=étiquette4;
étiquette[5]:=étiquette5;
étiquette[6]:=étiquette6;
étiquette[7]:=étiquette7;
étiquette[8]:=étiquette8;
étiquette[9]:=étiquette9;
étiquette[10]:=étiquette10;
étiquette[11]:=étiquette11;
étiquette[12]:=étiquette12;
fin;