(495) 925-0049, ITShop интернет-магазин 229-0436, Учебный Центр 925-0049
  Главная страница Карта сайта Контакты
Поиск
Вход
Регистрация
Рассылки сайта
 
 
 
 

Конференция "Micro Focus/Borland"

Обсуждение вопросов, связанных с компанией Micro Focus/Borland, ее продуктами CaliberRM, CaliberRDM, SilkTest, StarTeam, TeamDefine, Together и других.

 
 
Добавить сообщение »

Тема: TExcelApplication e.t.c

Автор:  Fanatff Дата: 10.06.2009 14:47
Как загружать данные книги Excel в StringGrig?
Ответить на сообщение »
 
Автор:  Николай Дата: 04.11.2003 05:25
Lexius пишет 01.06:
>Начал недавно разбираться в Delphi с компонентами TExcel.... не могу вникнуть.
>Есть уже готовый файл *.xls. Нужен небольшой пример кода, который открывает
>этот файл посредством компонентов TExcelAllication, TExcelAllicationSheet, e.t.c.
>и передает какие - нибудь данные в ячейки открытой книги.
>
Вот простейший пример:
procedure TForm1.Button1Click(Sender: TObject);
var s: String; svrIntf: _Worksheet;
begin
ExcelApplication.Workbooks.Open('c:\mybook.xls', // открываем книгу
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,0);

svrIntf:=ExcelApplication.Workbooks['mybook.xls'].Sheets[1] as _Worksheet; //номер или имя листа (с книгой - также)
ExcelWorksheet.ConnectTo(svrIntf); // привязка к интерфейсу IDispatch для листа
s:=ExcelWorksheet.Cells.Item[1,1]; // собственно ячейка
end;

Тут две компоненты:
TExcelWorksheet и TExcelApplication, у TExcelWorksheet в свойствах надо поставить
AutoConnect=False
ConnectKind=ckAttachToInterface
Ответить на сообщение »
 
Автор:  Николай Дата: 04.11.2003 05:23
Lexius пишет 01.06:
>Начал недавно разбираться в Delphi с компонентами TExcel.... не могу вникнуть.
>Есть уже готовый файл *.xls. Нужен небольшой пример кода, который открывает
>этот файл посредством компонентов TExcelAllication, TExcelAllicationSheet, e.t.c.
>и передает какие - нибудь данные в ячейки открытой книги.
>
Вот простейший пример:
procedure TForm1.Button1Click(Sender: TObject);
var s: String; svrIntf: _Worksheet;
begin
ExcelApplication.Workbooks.Open('c:\mybook.xls', // открываем книгу
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,0);

svrIntf:=ExcelApplication.Workbooks['mybook.xls'].Sheets[1] as _Worksheet; //номер или имя листа (с книгой - также)
ExcelWorksheet.ConnectTo(svrIntf); // привязка к интерфейсу IDispatch для листа
s:=ExcelWorksheet.Cells.Item[1,1]; // собственно ячейка
end;

Тут две компоненты:
TExcelWorksheet и TExcelApplication, у TExcelWorksheet в свойствах надо поставить
AutoConnect=False
ConnectKind=ckAttachToInterface
Ответить на сообщение »
 
Автор:  Lexius Дата: 01.06.2003 23:00
Начал недавно разбираться в Delphi с компонентами TExcel.... не могу вникнуть.
Есть уже готовый файл *.xls. Нужен небольшой пример кода, который открывает
этот файл посредством компонентов TExcelAllication, TExcelAllicationSheet, e.t.c.
и передает какие - нибудь данные в ячейки открытой книги.
Ответить на сообщение »
 

Добавить сообщение »

 Распечатать »
 Правила публикации »
   
 Рекомендовать »  
 

Магазин программного обеспечения   WWW.ITSHOP.RU
КОМПАС-3D — система трехмерного проектирования, ставшая стандартом для тысяч предприятий, благодаря сочетанию простоты освоения и легкости работы с мощными функциональными возможностями твердотельного и поверхностного моделирования. КОМПАС-3D V16, система трехмерного моделирования, лицензия
CA ERwin Data Modeler Navigator Edition r9.6 предоставляет открытый только для чтения доступ к моделям данных ERwin и моделированию метаданных. Эта программа дает возможность выявить, визуализировать и проанализировать информацию тем лицам в организации.. CA ERwin Data Modeler Navigator Edition r9.6 - Product plus 1 Year Enterprise Maintenance OLP-C4
Kaspersky Endpoint Security для бизнеса СТАНДАРТНЫЙ включает в себя средства для управления мобильными устройствами и защиты их от вредоносных программ... Kaspersky Endpoint Security для бизнеса – Стандартный Russian Edition. 10-14 Node 1 year Base License
<P><STRONG>Электронный ключ: Новая лицензия ESET NOD32 Smart Security для 3 ПК на 1 год или продление на 20 месяцев </P></STRONG> Выгодное решение: Универсальная лицензия на 1 год на 3ПК или продление на 20 месяцев + расширенный функционал. ESET NOD32 Smart Security - лицензия на 1 год на 3ПК или продление на 20 месяцев, Ключ
<strong>Microsoft Office для дома и бизнеса 2013</strong> включает •• Word 2013 •• Excel 2013 •• PowerPoint 2013 •• OneNote 2013 •• Outlook 2013. Программное обеспечение Microsoft Office для дома и бизнеса 2013 предназначено для пользователей,... Microsoft Office для Дома и Бизнеса 2013, Русский, Электронный ключ
 
Другие предложения...
 
Курсы обучения   WWW.ITSHOP.RU
 
Другие предложения...
 
Магазин сертификационных экзаменов   WWW.ITSHOP.RU
 
Другие предложения...
 
3D Принтеры | 3D Печать   WWW.ITSHOP.RU
3D ручка Myriwell создана для того, чтобы создавать 3D объекты путем расплавления ABS пластика, 3D ручка проста в использовании и дешева в эксплуатации. Этот продукт должен быть интересен художникам, дизайнерам, энтузиастам, школьникам и студентам. 3D ручка Myriwell, голубая
Sense имеет гибкую область сканирования и может захватить все, от кекса до  человека в полный рост, обрабатывая данные за секунды и мгновенно формируя файл для 3D печати. 3D сканер SENSE
Новые стандарты в персональной 3D печати! Профессиональный персональный 3D-принтер MakerBot Replicator устанавливает новые стандарты в мире 3D-печати. Область печати на 11% больше, чем у MakerBot Replicator 2. MakerBot Replicator 5th GEN
CubeX - следующее обновление предшественника Cube. Теперь в принтере увеличена камера построения (275 × 265 × 240 мм). CubeX
PrintBox3D One - новый российский 3D принтер, спроектированный с участием лучших инженеров по ЧПУ оборудованию. Благодаря этому точность печати достигает 50 мкм! Это в два раза меньше, чем размер пикселя экрана Apple iPhone 4! PrintBox3D One
 
Другие предложения...
 
Новости по теме
 
Рассылки Subscribe.ru
Информационные технологии: CASE, RAD, ERP, OLAP
Новости ITShop.ru - ПО, книги, документация, курсы обучения
Delphi - проблемы и решения
СУБД Oracle "с нуля"
Программирование в AutoCAD
Безопасность компьютерных сетей и защита информации
 
Рассылки Maillist.ru
Информационные технологии: CASE, RAD, ERP, OLAP
Новости ITShop.ru - ПО, книги, документация, курсы обучения
Delphi - проблемы и решения
 
Статьи по теме
 
Новинки каталога Download
 
Исходники
 
Документация
 
Обсуждения в форумах
Создание базы данных в Delphi, без сторонних БД (1)
Уважаемый автор, гуглю уже который день и у Вас как у всех "кидаем.." "даже не создаем проект"...
 
C++ Builder6 & Excel (11)
Доброе время суток! Пишу приложение в C++ Builder6 для формирования файлов Excel. Требуется...
 
Принцип создания плагинов в Delphi (3)
Достали, Эта статья не о плагинах а о подключении dll и возможности использования ресурсов в...
 
QuickREport (40)
Есть приложение скомпилированное в Delphi6. Для построения отчетов я использовал компонеты из...
 
Печать на принтер вертикальных строк (12)
Как напечатать на принтер вертикальные и горизонтальные строки, например, нарисовать заголовки...
 
 
 



    
rambler's top100 Rambler's Top100