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

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

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 10.04.2009, 17:15   #1
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию Определение текущей директории

Подскажите, пожалуйста, как узнать директорию, из которой запущен exe файл проекта? А то создавать bat файл, который будет создавать txt с текущей директорией не очень удобно. Заранее благодарю.
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ
Alex Cones вне форума Ответить с цитированием
Старый 10.04.2009, 17:18   #2
DomiNick
Студент, не
Старожил
 
Аватар для DomiNick
 
Регистрация: 29.01.2009
Сообщений: 2,067
По умолчанию

Код:
ExtractFilePath(Application.ExeName)
I am the First of Cyber Evolution...
I am the First to Program your Future...
DomiNick вне форума Ответить с цитированием
Старый 10.04.2009, 17:19   #3
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию

В ExeName прописывать имя проекта или имя exe файла?
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ
Alex Cones вне форума Ответить с цитированием
Старый 10.04.2009, 17:31   #4
DomiNick
Студент, не
Старожил
 
Аватар для DomiNick
 
Регистрация: 29.01.2009
Сообщений: 2,067
По умолчанию

Э..... Что прописывать?

Код:
// Application.ExeName // Свойство программы - полное имя запущенного exe-файла...
// ExtractFilePath(...); // Эта процедура выделяет из полного имени путь к файлу...

// Просто пишешь эту строчку в коде... Например:

Procedure TForm1.Button1Click(Sender: TObject);
Begin
Form1.Caption:=ExtractFilePath(Application.ExeName);
End;
I am the First of Cyber Evolution...
I am the First to Program your Future...

Последний раз редактировалось DomiNick; 10.04.2009 в 17:37. Причина: Апечатка был... :(
DomiNick вне форума Ответить с цитированием
Старый 11.04.2009, 12:32   #5
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию

Спасибо за объяснение.
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ
Alex Cones вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Открытие Excel файла на текущей дате Million Microsoft Office Excel 2 04.09.2008 20:37
Создать папку с текущей датой Dorvir Microsoft Office Excel 1 16.07.2008 10:10
Перезапись файла в текущей позиции Андрей= Общие вопросы Delphi 2 08.05.2008 17:19
Вставка текущей даты в БД! Oleg Romanchuk БД в Delphi 5 21.08.2007 19:59
Изменение фона текущей строки puky Microsoft Office Access 1 09.02.2007 12:05