.Net Grid auf VO-Form
Posted: Wed Sep 11, 2024 9:18 am
Hallo,
ich kann ja .Net Controls auf VO-Form verwenden. Das klappt so weit auch in dem ich SetParent(.NetControl:Handle, SELF:Handle()) verwende.
Jetzt versuche ich gerade das Devexpress.XtraGrid.GridControl in der gleichen weise zu verwenden. Mit dem Code:
Wird das Grid angezeigt, aber keine Spalten und Werte.
Der identische Code aus einem generierten WindowsFormsApplikation zeigt das GRid mit Spalten und Daten.
Woran kann das liegen?
Frank
ich kann ja .Net Controls auf VO-Form verwenden. Das klappt so weit auch in dem ich SetParent(.NetControl:Handle, SELF:Handle()) verwende.
Jetzt versuche ich gerade das Devexpress.XtraGrid.GridControl in der gleichen weise zu verwenden. Mit dem Code:
Code: Select all
METHOD PostInit(oWindow,iCtlID,oServer,uExtra)
//Put your PostInit additions here
SELF:gridControl1 := Devexpress.XtraGrid.GridControl{}
SELF:gridView1 := Devexpress.XtraGrid.Views.Grid.GridView{}
SELF:gridControl1:Location := System.Drawing.Point{167, 49}
SELF:gridControl1:MainView := SELF:gridView1
SELF:gridControl1:Name := "gridControl1"
SELF:gridControl1:Size := System.Drawing.Size{595, 271}
SELF:gridControl1:TabIndex := 0
SELF:gridControl1:ViewCollection:AddRange(<Devexpress.XtraGrid.Views.Base.BaseView>{ SELF:gridView1 })
SELF:gridView1:GridControl := SELF:gridControl1
SELF:gridView1:Name := "gridView1"
LOCAL table1 AS System.Data.DataTable
table1:=System.Data.DataTable{}
table1:Columns:Add("test1")
table1:Rows:Add("Wert")
SELF:gridControl1:DataSource:=table1
SetParent(SELF:gridControl1:Handle, SELF:Handle())
RETURN NIL
Der identische Code aus einem generierten WindowsFormsApplikation zeigt das GRid mit Spalten und Daten.
Woran kann das liegen?
Frank