Daha Gelişmiş bir DbGrid

[freeman35]

@sychorax Birdaha uğraşmadım, ekrana 2 tane grid koyup master detail i datasource lar üzerinde yapıyorum.

@67neo fielları ekleyim birde buna summary eklediğim bir kod

Kod: Tümünü seç

var I : Integer;
    Clmn : TcxGridDBColumn;
    Sum  : TcxDataSummaryItem;
    Buf  : string;
begin
      DM.QUE_TahakkukTipi.First;
      while not DM.QUE_TahakkukTipi.Eof do begin
        Buf := 'Field_'+IntToStr(DM.QUE_TahakkukTipi.FieldByName('SELF').AsInteger);
        Table1.FieldDefs.Add(Buf, ftFloat, 0, True);
        Clmn := VIW_AllTahakkuk.CreateColumn;
        Clmn.Caption := DM.QUE_TahakkukTipi.FieldByName('ADI').AsString;
        Clmn.DataBinding.FieldName := Buf;
        Clmn.Width := 150;

        Sum := VIW_AllTahakkuk.DataController.Summary.FooterSummaryItems.Add;
        Sum.Format := ',0.##';
        Sum.Kind   := skSum;
        TcxGridDBTableSummaryItem(Sum).Column    := Clmn;
        TcxGridDBTableSummaryItem(Sum).FieldName := Buf;
        Clmn.OnCustomDrawFooterCell := CustomDrawFooterCell;

       DM.QUE_TahakkukTipi.Next;
      end;

Kolay Gele

[67neo]

Öncelikle ilginize teşekkür ediyorum. Benim anlatmak istediğim olay farklı. Bir adet formumuz var. Bu formu program içerisinde farklı formlardan çağırıyoruz. Ancak bu formdaki sql sorguları sürekli değişiyor. Yani yapmak istediğim bu form açılırken gelen sql sorgusu çalıştıktan sonra cxGride kolonlar gelmiyor. Ama bağlantısı var. Yani her seferinde eskisini silip yeni alanları yüklemesi gerekmez mi? bu bileşenin özelliklerinde, yani customize bölümünde "Retrieve Fields" diye bir buton var ona tıkladığımız zaman bu işlemi yapıyor. Ama benim bunu kodla yapmam gerekiyor.

[67neo]

Arkadaşlar bu kodu yabancı bir forum sitesinden buldum. İşte kodla bağlantı;

Kod: Tümünü seç

 cxGridDBTableView1.ClearItems;
 cxGridDBTableView1.DataController.DataSource := NewDataSource;
 cxGridDBTableView1.DataController.CreateAllItems;

Teşekkür ederim.