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`?
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;