var
Excel: OleVariant;
Libro: OleVariant;
Hoja: OleVariant;
begin
Excel := ComObj.CreateOleObject('Excel.Application');
Libro := Excel.WorkBooks.Add;
Hoja := Libro.ActiveSheet;
Hoja.Cells[1, 1] := 'Hola mundo';
Libro.SaveAs('ejemplo.xls');
Excel.Quit;
end;