for i:=1 to 35 do begin ClientDataSet1.IndexFields[i].DisplayLabel:=i; end; 會出現ClientDataSet1:Field index out of range的錯誤 而使用ClientDataSet1.FieldByName('200412').DisplayLabel:='1';就正常, 為甚麼?

IndexField 是定義Index的 FieldByName 是得到 Field Field & Index 是不一樣的，Field是欄位，Index是欄位排序的指標 ----------------------- God bless you! I am Dark_Angel.

------
-----------------------
God bless you!
I am Dark_Angel.

引言: for i:=1 to 35 do begin ClientDataSet1.IndexFields[i].DisplayLabel:=i; end; 會出現ClientDataSet1:Field index out of range的錯誤 而使用ClientDataSet1.FieldByName('200412').DisplayLabel:='1';就正常, 為甚麼?

chrislao您好： 从错误提示中看出，您ClientDataSet1的索引字段集中，不存在有35个索引，超出了范围，所以会报错，而ClientDataSet1.FieldByName('200412').DisplayLabel:='1'是表示显示字段名为200412的DisplayLabel属性值，存在字段名为200412的当然就不会报错； ——行径窄处，留一步与人行——

但是我改為ClientDataSet1.IndexFields[1].DisplayLabel:='1'; 也是出錯    

引言:

引言: for i:=1 to 35 do begin ClientDataSet1.IndexFields[i].DisplayLabel:=i; end; 會出現ClientDataSet1:Field index out of range的錯誤 而使用ClientDataSet1.FieldByName('200412').DisplayLabel:='1';就正常, 為甚麼?

chrislao您好： 从错误提示中看出，您ClientDataSet1的索引字段集中，不存在有35个索引，超出了范围，所以会报错，而ClientDataSet1.FieldByName('200412').DisplayLabel:='1'是表示显示字段名为200412的DisplayLabel属性值，存在字段名为200412的当然就不会报错； ——行径窄处，留一步与人行——

改成這樣看看    

if ClientDataSet1.IndexFieldCount<=0 then exit;
for i:=0 to ClientDataSet1.IndexFieldCount-1 do
  begin
    ClientDataSet1.IndexFields[i].DisplayLabel:=i;
  end;//for

----------------------- God bless you! I am Dark_Angel.

------
-----------------------
God bless you!
I am Dark_Angel.

chrislao 您好： IndexFields是必需存在有索引字段才能用，请先确定是否设定了索引字段，另ClientDataSet1.IndexFields[i].DisplayLabel:=i;好像很少对IndexFields设定displaylabel？ 您是不是要这样：

for i:=1 to 35 do
begin
  ClientDataSet1.Fields[i].DisplayLabel:=i;
end;

如果您想了解ClientdataSet之AddIndex 的话，可参考下面 Chance36 前辈的【Delphi】【發表】ClientdataSet之AddIndex 的使用範例(含D5 Source) http://delphi.ktop.com.tw/topic.php?topic_id=53002 【Delphi】【問題】动态建立ClientDataSet和动态建立字段 http://delphi.ktop.com.tw/topic.php?topic_id=54260 站内有相关多与ClientDataSet的资料，可自行查寻看看 Good Luck ——行径窄处，留一步与人行—— 發表人 -

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.