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

資料庫內容寫入XML時欄位重複

缺席
leaves827
一般會員


發表:3
回覆:2
積分:1
註冊:2008-04-30

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-08-22 15:39:41 IP:163.25.xxx.xxx 訂閱

[code cpp]
//write to XML
void __fastcall TForm1::Button2Click(TObject *Sender)
{
AnsiString flist[128][6];

//將 friend list data 放至 array
for(int row=1;row<=DBGrid1->DataSource->DataSet->RecordCount;row )
{
DBGrid1->DataSource->DataSet->RecNo=row;
for(int col=0;colDataSource->DataSet->FieldCount;col )
{
flist[row-1][col]= DBGrid1->DataSource->DataSet->Fields->Fields[col]->AsString;
}
}
//****************將 array 的內容寫入 XML**************//
if (FileExists("friend_list.xml"))
DeleteFile("friend_list.xml");

_di_IXMLDocument froot=NewXMLDocument(); //create XML
froot->SetVersion("1.0");
froot->SetEncoding("UTF-16");

froot->SetDocumentElement(froot->CreateElement("temp",""));

_di_IXMLNode sroot=froot->DocumentElement;
_di_IXMLNode slist;

for(int row=1;row<=DBGrid1->DataSource->DataSet->RecordCount;row )
{
DBGrid1->DataSource->DataSet->RecNo=row;
for(int col=0;colDataSource->DataSet->FieldCount;col )
{
slist = sroot->AddChild("aa");
slist->Text = flist[row-1][col];
}
}
froot->SaveToFile("friend_list.xml"); //save XML
delete froot;
Memo1->Lines->Add("寫入XML完成");

[/code]
寫入至XML時會有同一欄位寫入2次或順序亂掉
另外請問BOF或EOF為True如何解決
系統時間:2017-12-18 1:50:32
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!