Re: По просьбе жены
От: Francio Россия  
Дата: 12.04.04 04:20
Оценка:
Здравствуйте, Аноним, Вы писали:

А>Я в Делфи вообще ни буб-буб. Но вот жене понадобилось. ПРиведите пожалуйста код, делающий следующее (предположим обработчик нажатия на кнопку):

А>-сначала открывает Excel
А>-записывает в ячейку число
А>-сохраняет файл под каким-то именем
А>-закрывает Excel.
А>Предложения КАК это сделать не надо. Просто код
А>Заранее спасибо



procedure TForm1.Button4Click(Sender: TObject);
var
v: variant;
begin
   v := CreateOleObject('Excel.Application'); // Запуск Excel
   v.WorkBooks.Add(); //Создаем новую рабочую книгу
   v.Cells[3,3]:='Тест'; //Записываем в ечейку
   v.ActiveWorkBook.SaveAs('c:\temp\1.xls'); сохраняем рабочую книку в файл
   v.Quit; //закрываем excel


А вообще-то все это описано в VisualBasic (Запуск Excel и нажать Alt-F11 и там в справке есть все ^-))
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.