請問如何將txt直接作為資料來源 |
答題得分者是:Fishman
|
kan0515
中階會員 發表:56 回覆:120 積分:50 註冊:2002-06-24 發送簡訊給我 |
|
Fishman
尊榮會員 發表:120 回覆:1949 積分:2163 註冊:2006-10-28 發送簡訊給我 |
Hi kan0515, 請參考 http://delphi.ktop.com.tw/topic.php?topic_id=60002 ----------------------------------
小弟才疏學淺,若有謬誤尚請不吝指教
----------------------------------
------
Fishman |
kan0515
中階會員 發表:56 回覆:120 積分:50 註冊:2002-06-24 發送簡訊給我 |
|
Fishman
尊榮會員 發表:120 回覆:1949 積分:2163 註冊:2006-10-28 發送簡訊給我 |
Hi kan0515, 既然你有辦法將資料填入 StringGrid 中,那填入 ClientDataSet 中應該就不是什麼困難的事了,下面有一個小範例:
procedure TForm1.Button1Click(Sender: TObject); var i : integer; begin ClientDataSet1.Close; ClientDataSet1.CreateDataSet; for i := 1 to 100 do begin with ClientDataSet1 do begin Append; FieldByName('seq').AsInteger := i; fieldByName('Name').AsString := 'Name' IntTostr(i); ..... Post; end; end; end;你先試試,有問題再提出! Good Luck !! ---------------------------------- 小弟才疏學淺,若有謬誤尚請不吝指教 ----------------------------------
------
Fishman |
kan0515
中階會員 發表:56 回覆:120 積分:50 註冊:2002-06-24 發送簡訊給我 |
再請教一下fishman大大
我是使用delphi5
找不到此元件
所以我直接利用宣告的方式來使用它
var St : TStrings; I : Integer; ClientDataSet1:TClientDataSet; begin ST := Tstringlist.Create; ClientDataSet1:=TClientDataSet.Create(ClientDataSet1); TRY ClientDataSet1.Close; ClientDataSet1.FieldDefs.Add('Text',ftString); ClientDataSet1.CreateDataSet; : : :程式在ClientDataSet1.CreateDataSet; 會出現 "Invaild Parameter"的錯誤訊息 請問是有那裡寫錯或是要注意的嗎? 麻煩指導一下,謝謝… 發表人 - kan0515 於 2004/12/30 12:02:04 |
Fishman
尊榮會員 發表:120 回覆:1949 積分:2163 註冊:2006-10-28 發送簡訊給我 |
Hi kan0515, D5 的 ClientDataSet 在 Midas 的 TAB 中(問人的,我沒有 D5) CleintDataSet 的 FieldDefs.AddFieldDef 範例如下(D7 的 Help)
procedure TForm1.FormCreate(Sender: TObject); begin with ClientDataSet1 do begin with FieldDefs.AddFieldDef do begin DataType := ftInteger; Name := 'Field1'; end; with FieldDefs.AddFieldDef do begin DataType := ftString; Size := 10; Name := 'Field2'; end; with IndexDefs.AddIndexDef do begin Fields := 'Field1'; Name := 'IntIndex'; end; CreateDataSet; end; end;---------------------------------- 小弟才疏學淺,若有謬誤尚請不吝指教 ----------------------------------
------
Fishman |
kan0515
中階會員 發表:56 回覆:120 積分:50 註冊:2002-06-24 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |