0

Xml ファイルのノードに入力してみます。アプリによって生成された xml ファイルを読み書きするヘルパー クラスを作成します。コンストラクターは、次の xml 構造を作成します。

<raiz>
  <proyecto>
    <obra>Shopping</obra>
    <cliente>Pepito</cliente>
    <ubicacion>NO 24° S 32°</ubicacion>
    <fecha>08/07/2013</fecha>
    <sondeo>4</sondeo>
    <estudio>21</estudio>
    <nFreatico>3,52</nFreatico>
  </proyecto>
  <muestras/>
  <enps/>
</raiz>

これはうまくいきます。ここで、サブノードをmuestrasノードに追加してみます。muestraサブノードの例:

<muestra numero=1 />

私のヘルパー クラスにはagregarMuestra(nro: integer);があります。サブノードを挿入してみます。コードは次のとおりです。

procedure TXmlManager.agregarMuestra(nro: Integer);
var
  sMuestras, nNodo: IXMLNode;
  count: integer;
begin
  // Get the "muestra" node 
  sMuestras := self.getMuestraSection();
  // Insert the new node 
  count := sMuestras.ChildNodes.Count;
  nNodo := sMuestras.AddChild('muestra',count);
  nNodo.Attributes['numero'] := IntToStr(nro);
  xmLastModification := Now();
end;

アプリは実行時に失敗し、投稿のタイトルにメッセージが表示されます。デバッガーは次の行を強調表示します。

  nNodo.Attributes['numero'] := IntToStr(nro);

Xml を使用した最新の作業です。何が起こる?. 何か案は ?。

4

0 に答える 0