Selasa, April 28, 2009

Membuat Field dxMemdata Secara Runtime

Lagi bermain sama TdxMemdata dari DevExpress. Untuk mensimulasikan pivot, perlu membuat (create) persistent field dari dxmemdata secara runtime/dynamic.

Metodenya dengan menggunakan dxMemdata.FieldDefs.Add(namafield,tipefield, ukuran,required) diikuti dengan dxMemDataTest.FieldDefs[index].CreateField(dataset).

Didapat sebagai berikut:

dxMemDataTest.Close;

dxMemDataTest.FieldDefs.Add('Nama', ftstring, 40, False);
dxMemDataTest.FieldDefs.Add('Posisi', ftstring, 40, False);
dxMemDataTest.FieldDefs.Add('Kode_Karyawan', ftinteger, 5, False);

dxMemDataTest.FieldDefs[0].CreateField(dxMemDataTest);
dxMemDataTest.FieldDefs[1].CreateField(dxMemDataTest);
dxMemDataTest.FieldDefs[2].CreateField(dxMemDataTest);

dxMemDataTest.Open;


FieldDef untuk membuat definisi objek field, baru kemudian dibuat Field berdasarkan FieldDef tersebut.

Selanjutnya bisa di tes operasi insert misalnya:

dxMemDataTest.Insert;
dxMemDataTest.FieldByName('Nama').AsString := 'Prabowo';
dxMemDataTest.FieldByName('Posisi').AsString := 'Manager';
dxMemDataTest.FieldByName('Kode_Karyawan').AsString := 'Gerindra';
dxMemDataTest.Post;


dxMemdata memori table ini perlu eksplorasi lebih lanjut neh.

(D5 dengan DevExpress QuantumGrid versi terakhir untuk D5)