Telefonbuch-Programm (Datensätze?)

[dopeline]

DungeeBug hat mir folgenden Code gegeben (DANKE!) aber da ist noch irgentwo ein haken.

Delphi-Quellcode:

procedure TFormHaupt.Speichern1Click(Sender: TObject); 
var 
MyStream : TFileStream; 
i : integer; 
MyDaten : TDatei;
 
begin 
MyStream.Create('C:\text.txt',fmCreate); 
FOR i := 1 TO 30 DO 
BEGIN 
// Daten einlesen 
MyDaten.Name := StringGrid1.Cells[0,i]; 
MyDaten.Nummer := StrToInt(StringGrid1.Cells[1,i]); 
MyDaten.Mobil := StrToInt(StringGrid1.Cells[2,i]); 
MyDaten.Adresse := StringGrid1.Cells[3,i]; 
MyDaten.Mail := StringGrid1.Cells[4,i]; 
// Daten schreiben 
MyStream.Write(MyDaten.Name[1],SizeOf(MyDaten.Name)); 
MyStream.Write(MyDaten.Nummer[1],SizeOf(MyDaten.Nummer)); 
MyStream.Write(MyDaten.Mobil[1],SizeOf(MyDaten.Mobil)); 
MyStream.Write(MyDaten.Adresse[1],SizeOf(MyDaten.Adresse)); 
MyStream.Write(MyDaten.Mail[1],SizeOf(MyDaten.Mail)); 
END; 
MyStream.Free; 
end;

delphi meckert, dass es irgend einen arrey-typ braucht (oder so ähnlich).

dopeline