Supprimer d'un élément du tableau dans fichier

cs_lehcen Messages postés 12 Date d'inscription mercredi 2 novembre 2005 Statut Membre Dernière intervention 26 mai 2011 - 26 mai 2011 à 12:13
cs_lehcen Messages postés 12 Date d'inscription mercredi 2 novembre 2005 Statut Membre Dernière intervention 26 mai 2011 - 26 mai 2011 à 12:13
Salut a tous, j'ai un petit probleme.

Coment supprimer un item d'un tableau ?

j'ai le code suivant ,mais marche pas :

Je veux supprimer l'élément sélectionné dans ListView, et mise à jour

Unit....
.
.
Type
MemberData = Record
MemberId,
MemberPassword : String[10];
MemberName,
MemberPhone : String[20];
Comments : String[50];
MemBerDebt : Real;
PrePayed : Boolean;
CreatedAt : TDate;
End;

......
MemberFile : File Of MemberData;
ElDelMember : MemberData;
Records : Array Of MemberData;
....
{$R *.dfm}

Procedure TMembersFrm.FormCreate(Sender: TObject);
Begin
AssignFile(MemberFile,'members.dat');
{$I-} Reset(MemberFile); {$I+}
If IoResult <> 0 Then Rewrite(MemberFile);
end;
....
//Supprimir l'enrigistrement (l'élément sélectionné) dans ListView
// Suppression d'éléments du tableau par le déplacement
Procedure TMembersFrm.Delete1Click(Sender: TObject);

for i:= ListView1.Selected.Index to FileSize(MemberFile)-1 do //
begin
Records[i]:=Records[i+1];
end;
SetLength(Records,FileSize(MemberFile));
end;
mais ce marche pas
Rejoignez-nous