Delphi Can

Free Pascal ile xliff dosyası okumaya çalışıyoram ancak belirsiz bir hata alıylorum. Kod şu şekilde:

Kod:

FActionLblCaption:=Doc.GetElementById('actionLblCaption').GetElementsByTagName('source').Item[0].TextContent;

FFileLblCaption:=Doc.GetElementById('fileLblCaption').GetElementsByTagName('source').Item[0].TextContent;

Bunu nasıl düzeltebilirim?

Düzenleme: Örnek xliff içeriği

Kod:

<?xml version="1.0" encoding="utf-8"?>

<xliff version="1.2" xmlns="urn:oasis:names:tc:xliff:document:1.2">

  <file source-language="en">

    <body>

      <trans-unit id="actionLblCaption">

        <source>action</source>

        <target>eylem</target>

        <note from="description">Label</note>

      </trans-unit>

      <trans-unit id="fileLblCaption">

        <source>file</source>

        <target>dosya</target>

        <note from="description">Label</note>

      </trans-unit>

...

"Belirsiz bir hata" ???
Hata belirsiz olunca soru da belirsiz oluyor Sad

Xliff dosya okumaya örnek burada var.

Çabuk yanıt için teşekkürler. Belirsizden kastım genel ve açıklayıcı olmayan bir hata veriyor. Ekran görüntüsü ekte.

Verdiğiniz bağlantıya baktım. Sonuçta şöyle bir kod hazırladım:

Kod:

 XMLNodeList:=Doc.FirstChild.ChildNodes[0].ChildNodes[0].ChildNodes;

  for I := 0 to XMLNodeList.Count - 1 do

  begin

    ShowMessage(XMLNodeList[I].ChildNodes[0].TextContent);

  end;

Bunu "for in" döngüsüyle string olarak nasıl yaparım? Delphi ile aynı olmadığından Attributes['actionLblCaption'] gibi bir ifadeyi kabul etmiyor.

Şu sayfaya bakılırsa Free Pascal'da da Attributes var.
Dilerseniz OmniXML'i kullanabilirsiniz. Hem Delphi hem de FPC desteği mevcut.

@SimaWB in OmniXML tavsiyesine katılıyorum rahat edersin

onurcan1977

SimaWB

onurcan1977

onurcan1977

SimaWB

ahmet_sinav