Delphi-Quellcode:
myStyle := DataGridTableStyle.Create;
myStyle.MappingName := ds.Tables[0].TableName;
myStyle.PreferredColumnWidth := 175;
myStyle.BackColor := Color.LightGray;
TextBoxColumn := DataGridTextBoxColumn.Create;
TextBoxColumn.Width := 175;
TextBoxColumn.MappingName := ds.Tables[0].Columns[0].ToString;
TextBoxColumn.HeaderText := 'TEST';
myStyle.GridColumnStyles.Add(TextBoxColumn);
TextBoxColumn := DataGridTextBoxColumn.Create;
TextBoxColumn.Format := 'g';
TextBoxColumn.Width := 175;
TextBoxColumn.MappingName := ds.Tables[0].Columns[1].ToString;
TextBoxColumn.HeaderText := 'TEST';
myStyle.GridColumnStyles.Add(TextBoxColumn);
TextBoxColumn := DataGridTextBoxColumn.Create;
TextBoxColumn.Format := 'g';
TextBoxColumn.Width := 175;
TextBoxColumn.MappingName := ds.Tables[0].Columns[2].ToString;
TextBoxColumn.HeaderText := 'TEST';
myStyle.GridColumnStyles.Add(TextBoxColumn);
TextBoxColumn := DataGridTextBoxColumn.Create;
TextBoxColumn.Format := 'g';
TextBoxColumn.Width := 175;
TextBoxColumn.MappingName := ds.Tables[0].Columns[3].ToString;
TextBoxColumn.HeaderText := 'TEST';
myStyle.GridColumnStyles.Add(TextBoxColumn);
ich habs jetzt so gelöst das ich jedem Column einzelt einen Style vergebe, ziemlich umständlich...
mfg
Moggy