Einzelnen Beitrag anzeigen

Benutzerbild von Andi1985
Andi1985

Registriert seit: 11. Mai 2007
Ort: NRW
116 Beiträge
 
Delphi 2006 Enterprise
 
#10

Re: DataSet -> DataGrid: Datumsgenauigkeit geht verloren

  Alt 15. Okt 2007, 15:55
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
  Mit Zitat antworten Zitat