Dúvida com MEMO e XML
26/07/2019
0
Tenho um memo onde seleciono DOIS arquivos XML por exemplo, e utilizo o seguinte para carregar no XML:
for i := 0 to memo1.lines.count -1 do
begin
XML.LoadFromFile(memo1.lines.text[i]);
end;
Porém ele só pega o 2º arquivo do memo. Alguém tem ideia do pq isso ocorre?
Abs!
for i := 0 to memo1.lines.count -1 do
begin
XML.LoadFromFile(memo1.lines.text[i]);
end;
Porém ele só pega o 2º arquivo do memo. Alguém tem ideia do pq isso ocorre?
Abs!
Gxf
Curtir tópico
+ 0
Responder
Posts
22/08/2019
Kamila Gomes
No lugar de
XML.LoadFromFile(memo1.lines.text[i]);
tente usar XML.LoadFromFile(memo1.lines[i]);
fiz o seguinte código pra testar e deu certo:
XML.LoadFromFile(memo1.lines.text[i]);
tente usar XML.LoadFromFile(memo1.lines[i]);
fiz o seguinte código pra testar e deu certo:
procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
xml:String;
nomexml:String;
begin
for i := 0 to memo1.lines.count -1 do
begin
xml:= memo1.lines[i];
XMLDocument1.LoadFromFile(memo1.lines[i]);
nomexml:= XMLDocument1.FileName;
end;
end;
Responder
23/08/2019
Emerson Nascimento
você quer adicionar o conteúdo dos dois arquivo num mesmo XML?
se for isso, faça algo assim:
se for isso, faça algo assim:
strings := TStringList.Create;
for i := 0 to memo1.lines.count -1 do
begin
strings.LoadFromFile(memo1.lines[i]); // aqui carrego o arquivo no objeto strings
XML.Lines.AddStrings(strings); // e adiciono o conteúdo no XML
end;
FreeAndNil(strings);
Responder
23/08/2019
Gxf
No caso o que desejo exatamente é pegar os XML que estão dentro do MEMO e salvar no banco de dados. Fazendo da forma que citei ele pega somente 1 arquivo. Qndo possível irei testar os exemplos passados aqui;
Responder
Clique aqui para fazer login e interagir na Comunidade :)