Export nach EXCEL

[Pfl]

Hallo, liebe Community,

ich wundere mich gerade über folgenden Fehler im Source (s. Kommentar)

Delphi-Quellcode:

procedure TFormBruederFreieSuche.BTExportClick( Sender : TObject );
  var
    FileName : String;
  begin
    ExportGridQ2CSV(
      DBGrid1,
      FormBruederFreieSuche.qBrSuche.RecordCount,
      FormBruederFreieSuche.qBrSuche

      );
    FileName := 'C:\afam\test001.csv';

    ExcelWorkbook1.ConnectTo( ExcelApplication1.Workbooks.Open( FileName,
      emptyParam, emptyParam, emptyParam, emptyParam, emptyParam, emptyParam,
      emptyParam, emptyParam, emptyParam, emptyParam, emptyParam,
      emptyParam,  0 ) ); // nicht genügend wirkliche Parameter <=== HIER DER FEHLER
    ExcelWorksheet1.ConnectTo( ExcelWorkbook1.Sheets.Item[ 1 ] as
      ExcelWorkSheet );
    // ExcelWorkSheet1.Range['F1','F2'].EntireColumn.NumberFormat := '00000';
    ExcelWorksheet1.Range[ 'A1', 'Z1000' ].EntireColumn.AutoFit;

    ExcelApplication1.Visible[ 0 ] := True;
    ExcelApplication1.UserControl := True;

  end;

Ich habe die Parameter nachgezählt; sie stimmen. Weiß jemand, wo die Fehlerursache liegt?

LG,

Pfl

[baumina]

Ich zähl bei dir 14 Parameter ... sollten es nicht 15 sein?

[mkinzler]

Nein, da fehlen welche.

Hast Du den Warpper für O2K oder OXP aktiviert?

[Der schöne Günther]

Du kannst doch mittels Strg+Shift+Leertaste sehen, welcher gewünschte Parameter es ist auf dem du grade deinen Cursor hast?

[Pfl]

Danke !! Habe das Problem gelöst! :-D

[baumina]

Zitat:

Zitat von Pfl (Beitrag 1264903)

Danke !! Habe das Problem gelöst! :-D

Aber psssst, verrats lieber keinem wie...