VPF::TXMLDocument - Форум программистов

Ak47black

Дата 23.12.2006, 15:00 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

Репутация: 1
Всего: 0

Можете ктонибудь подкинуть статей про TXMLDocument ,а то мне эта тема очень мутная.

Snowy

Дата 23.12.2006, 17:48 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

Почитай умную книжку.
Например Пачеко или Кэнту smile

Там всё есть.

Ak47black

Дата 23.12.2006, 18:00 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

Репутация: 1
Всего: 0

У меня теперь конкретный вопрос
Имею следуший код

Код


var
  XMLDocument: TXMLDocument;
  node: IXMLNode;
begin
  CoInitialize(nil);
  XMLDocument := TXMLDocument.Create(nil);
  XMLDocument.Active := True;
  node:= XMLDocument.AddChild('Test');
  node.AddChild('hi1');
  node.AddChild('hi2');
  ShowMessage(XMLDocument.XML.Text);
  XMLDocument.SaveToFile('xml.xml');
  //FreeAndNil(XMLDocument);
end;

Как сделать что-бы результат был

Код


<Test>
<hi1/>
<hi2/>
</Test>

А не всё в одной строке?

Код


<Test><hi1/><hi2/></Test>

MetalFan

Дата 23.12.2006, 20:09 (ссылка)

(нет голосов)

Загрузка ...

Аццкий Сотона

Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 62
Всего: 128

Код


XMLDocument.Options := XMLDocument.Options + [doNodeAutoIndent];

--------------------

There are always someone smarter than you...

Ak47black

Дата 23.12.2006, 20:27 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

Репутация: 1
Всего: 0

MetalFan, Спасибо +

yus

Дата 24.7.2008, 07:09 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 27
Регистрация: 1.2.2007
Где: Tomsk

Репутация: нет
Всего: нет

В продолжение вопроса по разметке XML.
Имеется XML файл в котором все выглядит как

Код


<Test><hi1/><hi2/></Test>

При загрузке XML документа в TXMLDocument и последующем сохранении в другой файл все равно XML код остается одной строкой.
Как сделать, чтоб он сохранился структурировано?
вот так

Код


<Test>
<hi1/>
<hi2/>
</Test>

Это сообщение отредактировал(а) yus - 24.7.2008, 07:11

hawkins

Дата 24.7.2008, 13:22 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 148
Регистрация: 8.9.2003

Репутация: нет
Всего: нет

Попробуй загнать эту строку в XMLDocument.XML а потом сохранить.

yus

Дата 25.7.2008, 13:35 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 27
Регистрация: 1.2.2007
Где: Tomsk

Репутация: нет
Всего: нет

не помогает вот код как я это делаю

Код


procedure TForm1.Button1Click(Sender: TObject);
var
  XMLDocument: TXMLDocument;
  Str: string;
begin
  XMLDocument := TXMLDocument.Create(nil);
  XMLDocument.Options := XMLDocument.Options + [doNodeAutoIndent];
  XMLDocument.Active := true;
  XMLDocument.LoadFromFile('C:\test.xml');
  Str := XMLDocument.XML.Text;
  FreeAndNil(XMLDocument);

  XMLDocument := TXMLDocument.Create(nil);
  XMLDocument.Options := XMLDocument.Options + [doNodeAutoIndent];
  XMLDocument.XML.Text := Str;
  XMLDocument.Active := true;
  XMLDocument.SaveToFile('c:\test1.xml');
  FreeAndNil(XMLDocument);

end;

Если самому узлы заполнять то они нормально заполняются а когда вот таким вот присваиванием, то не получается.

Это сообщение отредактировал(а) yus - 28.7.2008, 08:45

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »