各位大大: 有一個問題跟大家請教,我在程式裡用 InfoPower 4000 的 TWWGrid, 一般 Twwgrid 是設定其 Datasource 的屬性直接取得 DatSET 的欄位資料,在雙擊 TWWGrid 從屬性編輯器裡去修改欄位顯示時的值,請問是否可在程序裡自己透過程式做這些事,因為我想從後端根據資料庫自動產生使用者的界面,我查了一下 Infopower 的 demo ,好像沒看到有任何說明,也許才疏學淺,希望各位幫忙 如果愛情也有味覺 那麼 有沒有ㄧ種愛 微微泛酸 不太苦澀 有點甜密 嚐起來的滋味讓人想起幸福 Thomas Chiou

------
Thomas Chiou

邱老大, 在 help 裏有個 example, 如下:

The following will clear the grid's selected property and add two fields, each with a display width of 10.      with wwDBGrid1 do
begin
        Selected.Clear;
        Selected.Add('Buyer'   #9   '10'   #9   'Buyer');
        Selected.Add('First Name'   #9   '10'   #9   'First Name');
        ApplySelected;
end;    If useTFields is set to True, modifying the Selected property does not update the grid until the dataset is re-opened. As a result, one should normally use the Visible, Index, DisplayLabel, and DisplayWidth properties of the TField to change the field attributes during program execution.  Below is an example.    with wwDBGrid1, wwDBGrid1.DataSource.DataSet do
begin
        DisableControls;
        FieldByName('Field1').DisplayLabel := 'NewDisplayLabel';
        FieldByName('Field1').DisplayWidth := 6;
        FieldByName('Field2').Visible := False;
        FieldByName('Field3').Index := 0; 
        EnableControls;
end;

-- 悟嗎？

你好: 你可以在Delphi的Design time模式下,先連上資料庫,讓TwwDBGrid的資料顯示出來,然後設幾個你想要的效果(如加上checkbox等),接著在form上面按右鍵,選"View as Text",你會看到DFM的設定值.找到TwwDBGird,看一下Selected的屬性設定值,你應該就知道怎麼設了.原則上,TwwDBGrid每個設定是用#9來切割的 給您參考一下

hagar 大大,我們見過面嗎? 現在會直呼我名諱的已不多了開玩笶的,謝謝你和

------
Thomas Chiou

這樣成不成？

procedure TForm1.AddField;
var
   F: TIntegerField;
begin
  with Table1 do begin
    Close;
    F := TIntegerField.Create(Table1);
    F.FieldName := 'Field1';
    F.DataSet := Table1;
    F.OnValidate := Field1Valiedate;
    FieldDefs.Update;
  end;
end;    procedure TForm1.Table1NAMEValidate(Sender: TField);
begin
  //
end;    

-- 悟嗎？