Hallo zusammen,
ich habe das Internetz bereits durchsucht und nur wenige hilfreiche/verständliche Tipps erhalten.
Zu meinem Problem. Ich möchte eine
XML-Datei speichern. Dies soll über einen SaveDialog geschehen.
Zur Zeit sieht das so aus:
Data.SaveToFile('Dateiname.xml');
Ich habe es jetzt folgendermaßen geändert:
Delphi-Quellcode:
procedure TXmlfunction.Save;
begin
SaveDialog := TSaveDialog.Create(
nil);
SaveDialog.Title := '
XML speichern';
SaveDialog.InitialDir := GetCurrentDir;
SaveDialog.Filter := '
XML|*.xml';
SaveDialog.DefaultExt := '
xml';
if SaveDialog.Execute
then
begin
ShowMessage('
Die Datei konnte gespeichert werden.');
end
else
begin
ShowMessage('
Die Datei konnte nicht gespeichert werden.');
end;
SaveDialog.Free;
end;
Aber wenn ich meine Daten geschrieben habe, werden diese der bestehenden
XML-Datei nicht hinzugefügt.
Auch eine neue Datei wird nicht angelegt - Wenn ich es nicht besser wüsste, würde ich sagen, ich mache was falsch.
Also Vorschau:
Ich möchte auch gerne noch einen OpenDialog - speichern ist mir aber gerade wichtiger.
Gruß
Jan