Excel-файл в Delphi 5?

Если я правильно понял задачу то возможен такой вариант

Uses ComObj;

procedure ExcelFileOpen(FileNameString);
Var
Excel, WorkBook, Sheet Variant;
begin
Excel = CreateOleObject('Excel.Application');
try
Excel.WorkBooks.Open(FileName);
WorkBook = Excel.WorkBooks.Item[1];
Sheet = Excel.Application.Worksheets.Item[1];

//Далее идет пример работы с Excel-евской таблицей
Sheet.Cells[2, 1]='Дата отгр';
Sheet.Cells[2, 2]='№ налог. Накл.';
Sheet.Cells[2, 3]='Дата опл';
Sheet.Cells[2, 4]='№ с/ф';
Sheet.Cells[2, 5]='Покупатель';
Sheet.Cells[2, 6]='Товар';
Sheet.Cells[2, 7]='Кол-во';
Sheet.Cells[2, 8]='Закупочная цена без НДС';
Sheet.Cells[2, 9]='Цена продажи без НДС';
Sheet.Cells[2, 10]='Всего с НДС';
Sheet.Cells[2, 11]='Оплачено покупателем';
Sheet.Cells[2, 12]='Примечания';

Sheet.Columns[1].ColumnWidth= 7;
Sheet.Columns[2].ColumnWidth= 9;
Sheet.Columns[3].ColumnWidth= 9;
Sheet.Columns[4].ColumnWidth= 9;
Sheet.Columns[5].ColumnWidth= 35;
Sheet.Columns[6].ColumnWidth= 32;
Sheet.Columns[7].ColumnWidth= 10;
Sheet.Columns[8].ColumnWidth= 12;
Sheet.Columns[9].ColumnWidth= 13;
Sheet.Columns[10].ColumnWidth= 13;
Sheet.Columns[11].ColumnWidth= 13;
Sheet.Columns[12].ColumnWidth= 27;
Sheet.Rows[2].WrapText= True;
Sheet.Rows[2].Font.Size= 12;
finally
Excel.Visible = True;
end;

end;

Все эти функции можно посмотреть в Visual Basic-e в Excel-e.

Многоуважаемый Vicktor, у меня вот ещё какой вопрос. Когда я много раз запускаю эту программу, то комп начинает слегка тормозить, а в Ctrl+Alt+Del`е появляется много-много 'Excel'. Я их выкуриваю и всё в поряде. А, как убрать их за собой программно? Пробовал писать : Excel:=Unassigned, но это не помогло...

А, я понял. Надо, всего лишь, при закрытии формы написать:

Excel.WorkBooks.Close;