var
Excel, Libro, Hoja: OleVariant;
begin
Excel := ComObj.CreateOleObject('Excel.Application');
Excel.DisplayAlerts := false;
Libro := Excel.WorkBooks.Add();
Hoja := Libro.ActiveSheet;
Hoja.Cells[1, 1] := 'Caso No 1: Este es un comentario';
Excel.ActiveCell.Characters(1, 9).Font.FontStyle := 'Negrita';
Excel.Visible := true;
end;