Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.11.2013, 20:49   #1
rob7777
Пользователь
 
Регистрация: 07.11.2011
Сообщений: 52
По умолчанию Открыть excel программно

Добрый вечер! Я пишу программу и использую несколько файлов excel. По ходу программы мне нужно вытаскивать данные из excel. Вопрос в том как заменить
Код:
Ap:=CreateOleObject('Excel.Application');
Ap.Workbooks.Open('C:\Rob');
так чтобы я бы вводил только название файла в edit, а он бы его загружал из корневой папки.
Я пробовал так, но это не то
FileOpen(PChar(Edit1.text), fmShareExclusive)<0)
rob7777 вне форума Ответить с цитированием
Старый 23.11.2013, 09:58   #2
FaTaL
Участник клуба
 
Аватар для FaTaL
 
Регистрация: 09.11.2007
Сообщений: 1,761
По умолчанию

.Workbooks.Open(ExtractFilePath (ParamStr(0)) + Edit1.Text);
FaTaL вне форума Ответить с цитированием
Старый 23.11.2013, 16:46   #3
rob7777
Пользователь
 
Регистрация: 07.11.2011
Сообщений: 52
По умолчанию

Спасибо,отлично работает, но еще 1 вопрос. скажем файлы лежат на локальном диске и адрес я знаю. Можно сделать так, чтобы путь был закреплен в программе, а пользователь вводил бы только название?
rob7777 вне форума Ответить с цитированием
Старый 23.11.2013, 17:12   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Код:
Ap.Workbooks.Open('C:\Rob\'+ Edit1.Text);
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 23.11.2013, 20:21   #5
rob7777
Пользователь
 
Регистрация: 07.11.2011
Сообщений: 52
По умолчанию

Спасибо, тему можно закрывать)только непонятно, где кнопка "спасибо"))

И у защиты от накрутки есть минусы... помогают все время одни и теже...

Последний раз редактировалось rob7777; 24.11.2013 в 18:03.
rob7777 вне форума Ответить с цитированием
Старый 23.11.2013, 21:28   #6
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

В виде значка весов.
Пожалуйста.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как программно открыть БД Acces через делфи pirat2k Помощь студентам 7 03.05.2017 15:02
программно открыть дисковод TotKtoNado Win Api 2 20.02.2013 16:39
[Delphi] как открыть *.png программно? Ax_32 Помощь студентам 2 26.11.2010 21:35
как программно открыть порт? sum42 Общие вопросы по Java, Java SE, Kotlin 7 23.01.2010 16:09
Как открыть свойства обозревателя программно? Denisko Общие вопросы Delphi 9 28.04.2009 18:52