全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1670
推到 Plurk!
推到 Facebook!

關於使用ExcelApplication載入Excel寫入String

答題得分者是:taishyang
sssp116
一般會員


發表:23
回覆:27
積分:10
註冊:2008-12-05

發送簡訊給我
#1 引用回覆 回覆 發表時間:2010-04-16 16:13:02 IP:60.248.xxx.xxx 訂閱
各位大大好,小弟使用ExcelApplication元件載入Excel之後,要寫入StringGrid裡面
但是現在遇到一個問題就是開啟成功之後要寫入卻變成無線迴圈

[code cpp]
void __fastcall TForm1::FLB1DblClick(TObject *Sender)
{
int i,j;
WideString file;
OpenDialog1->FileName = FLB1->FileName;
if (OpenDialog1->Execute())
{
file = OpenDialog1->FileName;
ExcelApplication1->Connect();
ExcelApplication1->Workbooks->Open(file);
ExcelWorkbook1->ConnectTo(ExcelApplication1->get_ActiveWorkbook());
ExcelWorksheet1->ConnectTo(ExcelWorkbook1->get_ActiveSheet());
for (i=0;i<=ExcelWorksheet1->Rows;i )
{
for (j=0;i<=ExcelWorksheet1->Columns;i )
{
StringGrid1->Cells[i][j]=ExcelWorksheet1->Rows;
}
}
}
}
[/code]
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#2 引用回覆 回覆 發表時間:2010-04-16 16:26:31 IP:122.116.xxx.xxx 訂閱
  (j=0; i<=ExcelWorksheet1->Columns; i )

看出問題在哪了嗎,這類問題下斷點應該都查得出來^^


編輯記錄
taishyang 重新編輯於 2010-04-16 16:28:17, 註解 無‧
sssp116
一般會員


發表:23
回覆:27
積分:10
註冊:2008-12-05

發送簡訊給我
#3 引用回覆 回覆 發表時間:2010-04-17 15:45:46 IP:124.6.xxx.xxx 訂閱
挖哩勒~很抱歉我問了個蠢問題~我自己參數打錯了難怪會這樣!~
謝謝大大唷^^"
===================引 用 taishyang 文 章===================
(j=0; i<=ExcelWorksheet1->Columns; i )

看出問題在哪了嗎,這類問題下斷點應該都查得出來^^


系統時間:2024-04-25 19:30:42
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!