Je lui défini bien 2 dimensions: T'es sur ?
var MonTableau: array of String; S : TSearchRec; begin SetLength(MonTableau, 10, 2); //10 lignes, 2 colonnes Chemin := IncludeTrailingPathDelimiter(Chemin); MonTableau[0, 0] := '1'; MonTableau[1, 0] := Chemin+S.Name;
var MonTableau: array[0..9, 0..1] of String; S : TSearchRec; begin Chemin := IncludeTrailingPathDelimiter(Chemin); MonTableau[0, 0] := '1'; MonTableau[1, 0] := Chemin+S.Name;
var c: Integer; MonTableau: array of String; begin For c:=0 To (Form1.CheckListBox1.Items.Count-1) do Form1.CheckListBox1.Checked[c] := True; SetLength(MonTableau,1,c);
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question