Nachdem ich nun einen Datagrid einen eigenen Style verpasst habe (was eigendlich nur heißen soll, ich habe alle felder bis auf eines Name entfernt habe), funktioniert die Navigation darüber nicht mehr.

Ein zweites, mehr oder weniger unmodifiziertes funktioniert hingegen. Mein wunsch ist es, das erste Grid Liste lediglich als Navigationshilfe zu verwenden. D.H. wer hier klickt, bekommt die entsprechenden Daten im Formular angezeigt. Das funktioniert so aber nicht.
Beim anderen Grid, was alle Spalten anzeigt, geht es jedoch.
Was mache ich falsche, oder hab ich vergessen`?

zusammenfalten · markieren

Delphi-Quellcode:

procedure DatenBox.GridStyle;
var Style : System.Windows.Forms.DataGridTableStyle;
    CStyle : System.Windows.Forms.DataGridTextBoxColumn;
begin
  GridRasse.TableStyles.Clear;
  Style := System.Windows.Forms.DataGridTableStyle.Create;
  Style.MappingName := 'Rasse';
  CStyle := System.Windows.Forms.DataGridTextBoxColumn.Create;
  CStyle.Format := '';
  CStyle.FormatInfo := nil;
  CStyle.HeaderText := 'Name';
  CStyle.MappingName := 'Name';
  CStyle.NullText := '0';
  CStyle.Width := 50;
  CStyle.ReadOnly := True;
  Style.GridColumnStyles.Clear;
  Style.GridColumnStyles.Add(CStyle);
  Style.ReadOnly := false;
  Style.RowHeadersVisible := true;
  GridRasse.TableStyles.Add(style);
end;

Fehler lag in der Zuordnung. Ich hab keine Ahnung warum (und bin auch nur per Zufall drauf gestoßen, aber so gehts )

markieren

Delphi-Quellcode:

  //falsch
  GridRasse.DataSource := DataSet1;
  GridRasse.DataMember := 'Rasse';
  
  //richtig
  GridRasse.DataSource := DataSet1.Tables['Rasse'];