export data to excel file (Delphi)

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;