各位先進! 使用adoDataSet方式聯接Access資料表(欄位名稱皆取英文) 在套用DataSource給IWDBGrid後 , IWDBGrid中Columns的Title.Text都是取得各Field的Field Name 而不是Field的DisplayLable 請問有什麼方法 , 可以讓它顯示我要的DisplayLable呢 PS. 我不想在SQL語法中Select時使用AS的方式,因為對中文欄位名沒有太大的信心 也參考過 http://delphi.ktop.com.tw/topic.php?topic_id=38138 一文中 有關動態改變Title的方式 , 並設定在form OnCreate 中無效

Hi cleanwater ,    1.直接在 IWDBGrid 中，訂定各個 Column 的 Title.Text    2.也可以由程式中定義

procedure TIWForm1.Query1AfterOpen(DataSet: TDataSet);
var
  i : integer;
begin
  IWDBGrid1.Columns.Clear;
  for i := 0 to DataSet.FieldCount - 1 do
    begin
      with TIWDBGridColumn(IWDBGrid1.Columns.Add) do
        begin
          DataField := DataSet.FieldList.Fields[i].FieldName;
          Title.Text := DataSet.FieldList.Fields[i].DisplayLabel;
        end;
    end;
end;

---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

果然 , 可以達到我的需求 , 謝謝費心了 看語法是將IWDBGrid中Column全數清除,重新指定 不知是否適用在在動態指定DataSource的情況下 有待一試 謝謝

提問者您好:


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


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


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

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