Показать сообщение отдельно
  #12  
Старый 13.05.2008, 19:54
Аватар для SedmoiDemon
SedmoiDemon SedmoiDemon вне форума
Прохожий
 
Регистрация: 11.05.2008
Сообщения: 14
Репутация: 10
По умолчанию

может помогут.. немного методов (как чайник чайнику покажу немного ):
var
MyExcel: Variant;
begin
MyExcel:=CreateOleObject('Excel.Application');//создание объекта в программе
MyExcel.workbooks.open('полный путь к файлу и название его.xls');//открытие файла
myexcel.worksheets.count - кол-во листов в книге(integer)
myexcel.worksheets[номер листа].name - название листа(string)
myexcel.worksheets[l].range[имя яйчейки(прм.'A1')] - значение яйчейки(variant)
MyExcel.workbooks.close;//закрытие книги в экселе
varclear(myexcel);//очистка памяти от объекта
end;//конец
тип Variant в String - функция VarToStr
__________________
Как тьма ищет без солнца свет,
Так свет ищет без мрака тьму...
Как жаль, что весь этот бред
Понятен лишь мне одному...
Ответить с цитированием