如題~
我想請問各位高手~
DELPHI有沒有方法可以用關鍵字去判斷需要的欄位~
因為我的資料表裡有很多欄位
例如~

總和	9602	9608	9701	9702	9703	9801	9805

我希望DBGRID只顯示出開頭"98"的欄位和"總合"欄位~
可是其他的欄位在資料庫裡我仍然還要保留不要刪掉~
只是在DBGRID不要顯現出來~
然後在總合欄位裡計算出所有開頭有"98"欄位的總和~
好像有點複雜~~麻煩高手指點我~
不需要寫出程式碼~
只需要跟我說方法和需要用到的指令~
其他的我自己可以慢慢摸

DBGrid有個Column屬性,在這屬性裡是要顯示的欄位,可以在運行時去增加或移除欄位
總合的欄位是一個計算欄位,在DBGrid裡對的DataSet裡建立虛欄位

===================引 用 l730626 文 章===================
我希望DBGRID只顯示出開頭"98"的欄位和"總合"欄位~
可是其他的欄位在資料庫裡我仍然還要保留不要刪掉~
只是在DBGRID不要顯現出來~
然後在總合欄位裡計算出所有開頭有"98"欄位的總和~
只需要跟我說方法和需要用到的指令~
其他的我自己可以慢慢摸

Column屬性我知道!~只是我想知道欄位名稱可不可以用關鍵字的方式加進去
通常關鍵字是找尋欄位底下的資料錄~可是我想用關鍵字的方式把符合條件的欄位加進去DBGRID裡@@
請問DELPHI可以做到這樣嗎??~如果可以~可不可以教我!!!!!謝謝你們

您好,

在程式中用字串操作的語法去組成
連到 dbgrid 的 dataset (假設為query) 的
query1.sql.text

或

design time : 雙擊 dbgrid, 加入所要的欄位

或

afield := dbgrid1.columns.add 動態加入欄位
然後用
afield.fieldname := ...
去設定您所需的欄位, 可依需要用關鍵字去組成欄位名
參考
http://delphi.ktop.com.tw/board.php?cid=30&fid=71&tid=93475

------
IS IT WHAT IT IS
我是 李慕白 請倒著唸.
又想把老話拿出來說, 請用台語發音 : 專家專家全是ROBOT CAR (滷肉腳啦);
都已接手這麼久了, 績效還是那麼爛, 講話還那麼大聲.

編輯記錄

st33chen兄已經講出做法

我就寫一段讓您參考,您可根據實際需要再微調
DataSet.OnCalcFields事件是去計算加總欄位

[code delphi]
uses StrUtils;
procedure TForm1.FormCreate(Sender: TObject);
var
i:Integer;
col:Tcolumn;
begin
DBGrid1.Columns.Clear;
for i :=0 to ADOTable1.FieldCount-1 do
begin
if LeftStr(ADOTable1.Fields[i].FieldName,2)='98' then
begin
col:=DBGrid1.Columns.Add;
col.Field:=ADOTable1.Fields[i];
end;
end;
end;

procedure TForm1.ADOTable1CalcFields(DataSet: TDataSet);
var
i,sum:Integer;
begin
sum:=0;
for i :=0 to ADOTable1.FieldCount-1 do
begin
if LeftStr(ADOTable1.Fields[i].FieldName,2)='98' then
begin
Inc(sum,ADOTable1.Fields[i].AsInteger);
end;
end;
//ADOTable1SubTotal.Value:=Sum;
end;
[/code]

===================引 用 l730626 文 章===================
Column屬性我知道!~只是我想知道欄位名稱可不可以用關鍵字的方式加進去
通常關鍵字是找尋欄位底下的資料錄~可是我想用關鍵字的方式把符合條件的欄位加進去DBGRID裡@@
請問DELPHI可以做到這樣嗎??~如果可以~可不可以教我!!!!!謝謝你們

編輯記錄

謝謝你們~你們都說得很清楚~
我也已經學會了~~非常感謝你們的熱心指導