XML "String Wurst" formatieren

[Bernhard Geyer]

Zitat:

Zitat von t4rI

... doch kann ich diese dann auch bearbeiten ? :gruebel: ^^

Ich verwende seit einiger Zeit XML Notepad

[t4rI]

@ naphets
Ja das dacht ich mit auch schon nur er kennt kein AnsiReplaceText! :cry:

Gruß
t4rI

[t4rI]

bin gerade dabei etwas auszuprobieren
und zwar möchte ich einfach alles löschen was zwischen "/>" und "<" steht doch ich weiß nicht wie ich die zeichen zwischen den zeichen ansprechen soll!
^^ wie ihr wahrscheinlich schon alle gemerkt habt bin ich blutiger anfänger und programmiere jetzt erst seid 1nem monat :oops:
Gruß
t4rI

[nahpets]

Hallo,

für AnsiReplaceText musst Du StrUtils in die Usesliste aufnehmen.

Um die von Dir eingefügten Leerzeichen zur Formatierung zu entfernen, könntest Du folgendermaßen vorgehen:

Delphi-Quellcode:

Uses
  ...
  StrUtils;

var 
  xml  : TStringList; 
  i    : Integer; 
begin 
  xml  := TStringList.Create; 
  xml.LoadFromFile('XML-Datei.xml'); 
  for i := 0 to xml.Count - 1 do xml[i] := Trim(xml[i]); 
  xml.Text := AnsiReplaceText(xml.text,#13#10,'');
  xml.SaveToFile('XML-Datei.neu.xml'); 
  xml.Free; 
end;

[t4rI]

Danke !!!! klappt super!!!
:dp:
Gruß
t4rI