Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
 
Delphi 10.4 Sydney
 
#3

Re: Excel Export, frühe oder späte Bindung

  Alt 23. Jul 2009, 15:11
Hallo,

sicher ?

Ich mache z.B. sowas .

Delphi-Quellcode:
var
  Sheet: OleVariant;

Sheet := XLApp.Workbooks[1].WorkSheets[1];
Sheet.Name := ASheetName;

      for iCol := 0 to iMaxCols - 1 do
      begin
        theStatusForm.ProgressBar.Position:=
          theStatusForm.ProgressBar.Position+1;
        Application.ProcessMessages;
        
        for iRow := 0 to AGrid.RowCount - 1 do
        begin
          if TryStrToFloat(AGrid.Cells[iCol, iRow], dFloat) then
          begin
            try
              sRef:= RefToCell(iCol+1, iRow+1);

                  Sheet.Range[sRef,sRef].NumberFormat:= sFormat;
Kann ich das was beschleunigen mit frühr Bindung ?
Heiko
  Mit Zitat antworten Zitat