Ik hoop dat je Delphi 6 hebt, dan kun je dat heel eenvoudig doen met een XMLDocument component. Als je daarop dubbelklikt krijg je een wizard waarmee je een interface voor je XML bestand kunt genereren. Met behulp van die interface kun je code schrijven die er ongeveer zo uitziet:
Code:
for MasterIndex := 0 to MasterList.Count - 1 do
begin
MasterDataSet.Append;
// vul hier je masterdataset
MasterDataSet.FieldByName('Name').AsString :=
MasterList[MasterIndex].Name;
MasterDataSet.Post;
for DetailIndex := 0 to MasterList[MasterIndex].Details.Count - 1 do
begin
DetailDataSet.Append;
DetailDataSet.FieldByName('Name').AsString :=
MasterList[MasterIndex].Details[DetailIndex].Name;
DetailDataSet.Post;
end;
end;
Bookmarks