線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:679
推到 Plurk!
推到 Facebook!

關於Parse XML的問題?

尚未結案
nlj859
資深會員


發表:139
回覆:375
積分:322
註冊:2004-03-20

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-04-12 18:45:00 IP:163.28.xxx.xxx 未訂閱
當我第一次按下button去做包成xml文件和將他parse的動作時,是完全沒問題, 但是在第2次,我修改Edit內的內容後,再把它按下按鈕,在parseXML那個Memo中,確好像都停留在第一次的結果,請問我這個程式哪裡出錯了? 可否幫忙一下,謝謝. PS.我程式已放至"問題檔案上傳區" PS.使用XMLDocument元件    底下是我的程式碼..
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{    Memo1->Lines->Clear();
Memo1->Lines->Append("<?xml version=\"1.0\" encoding=\"Big5\"?>");
Memo1->Lines->Append("");
Memo1->Lines->Append("" Edit1->Text "");
Memo1->Lines->Append("" Edit2->Text "");
Memo1->Lines->Append("");      // Write to file
  ofstream outfile("DataXML.xml");
  outfile << Memo1->Text.c_str();
  outfile.close();     //ReadXML & Parse
 if (FileExists("DataXML.xml"))
 {
   AnsiString temStr;
  Memo2->Lines->Clear();
  XMLDocument1->FileName="DataXML.xml";      if(XMLDocument1->Active==false)
    XMLDocument1->Active=true;      _di_IXMLNode Data=XMLDocument1->DocumentElement;      if(Data->HasChildNodes)
  {
    _di_IXMLNodeList cn=Data->ChildNodes;
    for(int i=0;iCount;i  )
    {
        temStr="";
        temStr=temStr cn->Nodes[i]->NodeName ":"  cn->Nodes[i]->Text;
        Memo2->Lines->Add(temStr);
    }
  }
 }
   DeleteFile("DataXML.xml");
}    
發表人 - taishyang 於 2004/04/12 18:49:53
系統時間:2024-05-21 4:42:38
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!