Einzelnen Beitrag anzeigen

voodoo

Registriert seit: 9. Apr 2005
17 Beiträge
 
#1

Seltsames Probelm mit SaveDialog + XML

  Alt 12. Apr 2005, 16:01
Hallo,
ich habe ein Programm mit XML & SaveDialog. Ich arbeite das erste Mal mit XML in Delphi und habe auch mit Delphi weniger Erfahrung, vielleicht ist es also auch ein ganz einfacher, dummer Fehler von mir.

Ich habe zwei Edit-Felder (2 Strings, dabei soll ein String ein Dateipfad sein), deren Inhalt ich in eine XML-Datei integriere, also etwas wie Hinzufügen. Das geht bei den normalen Eingaben auch ohne Probleme.
Da nun der eine String ein Pfad sein soll, habe ich zusätzlich einen Button erstellt, über den man ein SaveDialog aufrufen kann (Datei wird später eh erst erstellt / überschrieben, daher SaveDialog).

Jedenfalls wird nichts mehr an die XML-Datei angehängt, sobald ich den SaveDialog benutzt habe.
Sobald ich seinen Aufruf wieder auskommentiere, geht wieder alles. Warum?

Hier zwei Code-Auszüge:

Aufruf des Dialogs
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
begin
if SaveDialog1.Execute then
      begin
           //Dateiname
           Edit1.Text := SaveDialog1.FileName;
      end;
ShowMessage(SaveDialog1.FileName); //ist der korrekte Pfad
end;

Speicherung der XML-Daten in Datei
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
   playlist: IXMLNode;
   value : IXMLElement;
begin
playlist := XMLDoc.createElement('playlist');

value := XMLDoc.createElement('name');
value.text := Edit1.Text;
playlist.appendChild(value);

value := XMLDoc.createElement('path');
value.text := Edit2.Text;
playlist.appendChild(value);

XMLDoc.DocumentElement.appendChild(playlist);


XMLDoc.save('bla.xml');

end;
  Mit Zitat antworten Zitat