DataSet nach Excel exportieren

[alzaimar]

Also ich kann mir gut vorstellen, ein TcxGrid zu instantiieren, die Daten dort einzupflegen (am besten mit einer vordefinierten View) und dann nach XLS zu exportieren. So kompliziert ist das doch nicht.

Schnapp Dir ein Datamodule, pack eine GridRepository rauf, definiere dein Layout mit einer 'MyPredefinedView' und dann noch dieser "Dreizeiler", der den Job erledigt. Dann hast Du auch noch ein nettes Layout, das Du ggf. im Programm anpassen kannst.

Delphi-Quellcode:

procedure TMyExportDataModule.ExportToXLS (aDataSource : TDataSource);
Var
  myGrid : TcxGrid;

begin
  myGrid := TcxGrid.Create(nil);
  Try
    MyPredefinedGridView.DataController.DataSource := aDataSource;
    myGrid.Levels.Add.GridView := MyPredefinedGridView;
    ExportGridToExcel('C:\MyFile.XLS',myGrid,true,true,true);
  Finally
    MyPredefinedGridView.DataController.DataSource := Nil;
    myGrid.Free;
  End;
end;

[edit]Sourcecode verbessert (a.k.a 'getestet')[/edit]