Supprimer un item dans un array

natsou_k Messages postés 17 Date d'inscription lundi 18 avril 2005 Statut Membre Dernière intervention 5 juin 2021 - 14 mai 2005 à 16:22
natsou_k Messages postés 17 Date d'inscription lundi 18 avril 2005 Statut Membre Dernière intervention 5 juin 2021 - 14 mai 2005 à 16:22
Salut a tous, j ai un petit probleme.
Connaissez vous une procédure qui supprime un item d un tableau svp?
j'ai celle-ci mais j'ai des ennui lorsque l'item a supprimer est le dernier du tableau :

procedure deletearrayitem()
begin
if index=high(x)then
begin
setlength(x,length(x)-1);
exit;
end;
finalize(x[index]);
system.move(x[index+1],x[index],(length(x)-index-1)*sizeof(string)+1);
Setlength(x,length(x)-1);
end;

quand il rentre dans le premier teste, il ne redimenssionne pas le tableau. parcontre dans le second, il fait tout correctement.
merci d'avance


Natsou-K
Rejoignez-nous