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 を使用した最新の作業です。何が起こる?. 何か案は ?。