[Oleg]

Имеется файл, нужно прочитать только, например:
1)всё из 'page id="1"'
2)из 'page id="2"' со значением 't id="1"'...
3) Как вообще записать что-то типа <t id="ID">test1</t>
Помогите плизз Использую

Код:

uses
MSXML_TLB

[Oleg]

Может использовать компонент XML Document(сейчас пытаюсь разобраться , помогите )
Как вообще записать вот в такой структуре <t id="ID">test1</t>.
Плизз, помогите

[Oleg]

Объясните, как мне например создать новый файл как в примере, как прочитать и записать определенные значения, ветви, какие компоненты использовать .Надеюсь на помощь знающих .

[Rosenkrantz]

Создать новый XML-документ:

Код:

procedure TMainForm.Button1Click(Sender: TObject);
var
  XML       : TXMLDocument;
  Paragraf,
  Node      : IXMLNode;
begin
  XML := TXMLDocument.Create(nil);
  try
    XML.Active := True;
    XML.Version := '1.0';
    XML.Encoding := 'UTF-8';
    XML.DocumentElement := XML.CreateNode('document');
    XML.DocumentElement.Attributes['name'] := 'Новый документ';


    Paragraf := XML.DocumentElement.AddChild('paragraf');
    Paragraf.Attributes['justify'] := 'left';

    Node      := Paragraf.AddChild('topindent');
    Node.Text := '12';

    Node      := Paragraf.AddChild('bottomindent');
    Node.Text := '6';

    Node      := Paragraf.AddChild('text');
    Node.Text := 'Здесь текст абзаца';

    XML.SaveToFile('c:\newfile.xml');
  finally
    XML.Free;
  end;
end;

Про XML доступно можно почитать например здесь.

[Oleg]

Этому я научился, но мне нужно точно такой структуры как в примере, т.е. <t id="ID">TEXT</t>. Может поможете как сделать такой структуры, а то получается либо <t>TEXT</t> либо <t> id="ID"</>, а как мне сделать как в примере, помогите ...

[Oleg]

Вот код

Код:

procedure TForm1.Button5Click(Sender: TObject);
var
Temp:IXMLDOMNode;
 Dom:IxmlDomDocument;
 attr:IXMLDOMAttribute;
 begin
 Dom:=CoDOMDocument.Create;
 try
  DOM.load('D:\test.xml');
  if DOM.parseError.reason<>'' then Label1.Caption:=DOM.parseError.reason;
  Temp:=DOM.createElement('t');
    attr:=DOM.createAttribute('id');
    attr.value:=7;
  Temp.text:='Testings Value';
  Temp.attributes.setNamedItem(attr);
  DOM.getElementsByTagName('page').item[0].appendChild(Temp);
  DOM.save('D:\newtest.xml');
  finally
  DOM:=nil;
 end;
end;

Теперь раскажите пожалуйста как прочитать только, например:
1)всё из 'page id="1"'
2)из 'page id="2"' со значением 't id="1"'...
3)как проверить существование какого-то page с каким-то t id. Буду очень благодарен

[Rosenkrantz]

Сообщение от Oleg

Этому я научился, но мне нужно точно такой структуры как в примере, т.е. <t id="ID">TEXT</t>. Может поможете как сделать такой структуры, а то получается либо <t>TEXT</t> либо <t> id="ID"</>, а как мне сделать как в примере, помогите ...

Код:

Node := XML.DocumentElement.AddChild('t');
Node.Attributes['id'] := 'ID';
Node.Text := 'TEXT';