QuantumGrid abgeleitete Views

[Gremlin]

Diese werden doch im constructor gesetzt und mit meinen beiden Werten überschrieben (Farbe und Höhe des Headers). Der Grid hat die Möglichkeit, für den Level eine View zur Design-Time erstellen zu lassen (rechte Maustaste auf Level, "Create view" und in der Liste den eigenen View auswählen. Theoretisch müsste dieser View jetzt die beiden Optionen gesetzt haben, leider ist das nicht der Fall.

Vielleicht liegt es auch an der "alten" Delphi-Version? Der View wird nur über die eigenen Möglichkeiten des Grids erstellt.


Wie gesagt, wird alles (Grid, Level und View) zur Runtime erstellt, so sieht es richtig aus, nur werden meine Forms immer in der IDE erstellt.

[Runtime Erstellung]

Code:

procedure TForm1.Button1Click(Sender: TObject);
var
  MyGrid  : TMyGrid;
  MyLevel : TcxGridLevel;
  MyView  : TMyView;
begin
  MyGrid := TMyGrid.Create(self);
  MyGrid.Parent := self;
  MyGrid.SetBounds(24, 24, 500, 200);
  MyView  := MyGrid.CreateView(TMyView) as TMyView;
  MyView.DataController.DataSource := DataSource1;
  MyView.DataController.CreateAllItems;

  MyLevel := MyGrid.Levels.Add;
  MyLevel.GridView := MyView;

  Table1.Open;
end;