|
Модераторы: MetalFan |
|
ilias |
|
|||
Новичок Профиль Группа: Участник Сообщений: 2 Регистрация: 22.3.2006 Репутация: нет Всего: нет |
Здраствуйте! помогите пожалуйста! мне нужно сделать програму в Дельфи так что она загружала большую базу Эксель и в ней можно было Выбирать какой Эксель открыть, поиск по определеным строкам, фильтрация, как мне это сделать незнаю я только начинающий и никогда с этим не сталкивался, помогите пожалуйста!!!!
|
|||
|
||||
Foley |
|
|||
Фсемба Яцца Профиль Группа: Участник Сообщений: 235 Регистрация: 31.1.2006 Где: Россия, Арх.обл Репутация: нет Всего: 7 |
Тебе проще из Эксель это все dBase переконвертить (в экселе при сохранении можно выбрать), есть специальные драйвера Эксель (по моему в ОДБЦ, и вроде в БДЕ есть). Если просто считать данные то можно так:
(delphiworld.narod.ru) |
|||
|
||||
Msl |
|
||||
Новичок Профиль Группа: Участник Сообщений: 19 Регистрация: 18.8.2005 Репутация: нет Всего: нет |
Обмен данными с Excel.
1. Для затравки и утоления жажды -фрагменты кода с комментариями (Ishodniki.RU) Автор: {Fernando Silva-mailto:[email protected]} В Delphi 5, для обмена данными между Вашим приложением и Excel можно использовать компонент TExcelApplication, доступный на Servers Page в Component Palette. Совместимость: Delphi (5.x или выше) На форме находится TStringGrid, заполненный некоторыми данными и две кнопки, с названиями To Excel и From Excel. Так же на форме находится компонент TExcelApplication со свойством Name, содержащим XLApp и свойством ConnectKind, содержащим ckNewInstance. Когда нам необходимо работать с Excel, то обычно мы открываем ExcelApplication, затем открываем WorkBook и в конце используем WorkSheet. Итак, несомненный интерес представляет для нас листы (WorkSheets) в книге (WorkBook). Давайте посмотрим как всё это работает. Посылка данных в Excel
Получение данных из Excel
2. есть служба XL Report Support на http://www.delphikingdom.com/ 3. VCL - XL Report - {http://www.afalinasoft.com/rus/} 4. Если задача серьезнее и есть желание- используй библиотеки экспорта/импорта: XLSReadWriteII 2.0 works with Delphi 5,6,7 and C++ Builder 5 and 6. home: http://www.axolot.com/components/xlsrwii20.htm Удачи! |
||||
|
|||||
Albinos_x |
|
|||
Evil Skynet Профиль Группа: Комодератор Сообщений: 3288 Регистрация: 28.5.2004 Где: X-6120400 Y-1 4624650 Репутация: 15 Всего: 108 |
http://forum.vingrad.ru/index.php?showtopic=84634 -------------------- "Кто владеет информацией, тот владеет миром" Уинстон Черчилль |
|||
|
||||
ilias |
|
|||
Новичок Профиль Группа: Участник Сообщений: 2 Регистрация: 22.3.2006 Репутация: нет Всего: нет |
Да спасибо я по пробовал таким способом, но он так долго грузится если база большая, а комп у меня Р3 667 Мгц. Ждал минут 10-15
|
|||
|
||||
Albinos_x |
|
|||
Evil Skynet Профиль Группа: Комодератор Сообщений: 3288 Регистрация: 28.5.2004 Где: X-6120400 Y-1 4624650 Репутация: 15 Всего: 108 |
можно попробовать писать напрямую в файл, например в формате csv, а потом открывать экселем...
кроме того, по указанной мной ссылке показано как работать с группой ячеек, через вариантный массив, при его использовании загрузка в несколько раз ускорится... -------------------- "Кто владеет информацией, тот владеет миром" Уинстон Черчилль |
|||
|
||||
wind1 |
|
|||
Шустрый Профиль Группа: Участник Сообщений: 133 Регистрация: 29.6.2007 Репутация: нет Всего: нет |
Тоже понадобилось считать из экселя данные и возник один вопрос.
Когда выполняются следующие функции
то создается новый процесс excel.exe. Как корректно завершить этот процесс после того как я закончу считывание? |
|||
|
||||
Данкинг |
|
||||
Yersinia pestis Профиль Группа: Завсегдатай Сообщений: 8302 Регистрация: 7.11.2006 Где: მოსკოვი Репутация: 5 Всего: 130 |
-------------------- There's nothing left but silent epitaphs. |
||||
|
|||||
mr_tg |
|
||||
Шустрый Профиль Группа: Участник Сообщений: 79 Регистрация: 29.3.2008 Репутация: нет Всего: нет |
Здраствуйте я на этом форуме новечок и делетант в програмировании. Мня тоже мучает вопрос как получать данные из excel. у меня получается заганять в Excel но из Excel в базу Парадокс7 не получается.
Как пишет MSL на верху я пробовалб но
красном пишет UNDECLARED IDENTIFIER: '_WorkBook;' Заране благадарю за помощь. MR_TG |
||||
|
|||||
Akella |
|
|||
Творец Профиль Группа: Модератор Сообщений: 18485 Регистрация: 14.5.2003 Где: Корусант Репутация: 2 Всего: 329 |
Выясни, в каком модуле _WorkBook и подключи в USES.
Скорее всего это в модуле ExcelXP |
|||
|
||||
Данкинг |
|
|||
Yersinia pestis Профиль Группа: Завсегдатай Сообщений: 8302 Регистрация: 7.11.2006 Где: მოსკოვი Репутация: 5 Всего: 130 |
mr_tg, используй CreateOleObject, там таких проблем нет.
-------------------- There's nothing left but silent epitaphs. |
|||
|
||||
Albinos_x |
|
|||
Evil Skynet Профиль Группа: Комодератор Сообщений: 3288 Регистрация: 28.5.2004 Где: X-6120400 Y-1 4624650 Репутация: 15 Всего: 108 |
-------------------- "Кто владеет информацией, тот владеет миром" Уинстон Черчилль |
|||
|
||||
mr_tg |
|
||||
Шустрый Профиль Группа: Участник Сообщений: 79 Регистрация: 29.3.2008 Репутация: нет Всего: нет |
спасибо друзя. я не волшебник я только учусь, и этот код скрипт я позаимствовал с этого сайта как вы понили,
как сказал AKELLA Uses добавил ExcelXP и отуда прошол но типер говорит
Not enough actual parametres а сам код вот в таком виде
я еще не успел там напартачить (изменение внести). но прога не запускается. хотелось бы запустит и потом посмотрет как работает. и подганять под себя Заране благадарю за помощь. MR_TG |
||||
|
|||||
Albinos_x |
|
||||
Evil Skynet Профиль Группа: Комодератор Сообщений: 3288 Регистрация: 28.5.2004 Где: X-6120400 Y-1 4624650 Репутация: 15 Всего: 108 |
ммм... могу сказать, что это не мой код... поэтому и спросил, читал ли ты статью по ссылке: в твоей команде не хватает двух параметров:
-------------------- "Кто владеет информацией, тот владеет миром" Уинстон Черчилль |
||||
|
|||||
Norfonzor |
|
||||||
Шустрый Профиль Группа: Участник Сообщений: 121 Регистрация: 17.10.2008 Репутация: нет Всего: нет |
Подскажите как указать кол-во листов при создании, добавить/удалить новый лист после последнего в эксел?
добавление через
не работает у меня в программе работа с эксел по другому совершенно. открываю эксел (у меня):
в примерах:
это разные способы, если да то как в моем работать с листами? |
||||||
|
|||||||
Regulum |
|
||||
Новичок Профиль Группа: Участник Сообщений: 29 Регистрация: 16.6.2009 Репутация: 1 Всего: 1 |
Это разные способы.
В Вашем варианте будет так. Добавить новый лист после последнего:
XL.Sheets.Count - количество листов XL.Sheets.Item[i] - i-ый лист, соответственно XL.Sheets.Item[XL.Sheets.Count] - последний лист Удалить последний лист:
Это сообщение отредактировал(а) Regulum - 19.5.2010, 17:41 |
||||
|
|||||
Akella |
|
|||
Творец Профиль Группа: Модератор Сообщений: 18485 Регистрация: 14.5.2003 Где: Корусант Репутация: 2 Всего: 329 |
||||
|
||||
iglstivens |
|
||||||
Новичок Профиль Группа: Участник Сообщений: 1 Регистрация: 25.3.2015 Репутация: нет Всего: нет |
Большое спасибо, за данный код, но так как я в программировании новичок, просьба помочь данный код оптимизировать под конкретную задачу. Есть файл Excel с данными, имеется 24 столбца и порядка 10 тысяч строк, в каждой ячейки есть числовое значение. И так же имеются Online значения которые содержаться в другой таблице (принцип размещения значений аналогичный). Необходимо чтобы online таблицу со значениями сравнивали со значениями другой (большой) таблицы и находились схожие строчки по значениям, так как в online-таблице значения постоянно добавляются во время дня, то нужно на перед знать как себя будет вести оборудование в дальнейшем т.е прогнозировать. Так же хотелось что бы в окне отображался график как online-значений так и значений схожих с этими данными чтобы было все наглядно на графики. Присоединённый файл ( Кол-во скачиваний: 2 ) 1.rar 10,76 Kb |
||||||
|
|||||||
Правила форума "Delphi: ActiveX/СОМ/CORBA" | |
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам помогли, и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Rrader, Girder. |
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Delphi: ActiveX/СОМ/CORBA | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |