export data to excel file (Delphi)
Anybody have example Delphi script for Export data to excel file.
I could find example at support.smartbear.com.
Solved! Go to Solution.
More specific question would always give better answers, but if you are looking for tools to write general data to xls file
here is one example.
procedure exceldemo; var app, book,sheet; fn,row,col; begin fn := 'c:\temp\foo.xlsx'; app := Sys.OleObject('Excel.Application'); if aqFile.Exists(fn) then book := app.workbooks.open(fn) else book := app.Workbooks.Add(); sheet := book.sheets(1); app.DisplayAlerts := false; for row := 1 to 10 do begin for col :=1 to 10 do begin sheet.cells(row, col) := row * col; end; end; book.SaveAs(fn); app.Quit(); end;