Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.11.05;
Скачать: CL | DM;

Вниз

Как получить путь к программе?   Найти похожие ветки 

 
nporaMep ©   (2006-10-23 01:48) [0]

Здравствуйте, необходимо составить путь из путя до программы плюс поддиректория для передачи explorer.exe, чтобы открыть папку в проводнике. Подскажите как можно получить путь до программы или как это можно сделать другим способом.


 
RASkov   (2006-10-23 01:51) [1]

ExtractPath, ExtractDir
(ParamStr(0));
(Application.ExeName);


 
Eraser ©   (2006-10-23 01:51) [2]

> [0] nporaMep ©   (23.10.06 01:48)


> Подскажите как можно получить путь до программы

до какой программы? переформулируй вопрос.


 
nporaMep ©   (2006-10-23 01:54) [3]

Пишу программу autorun.exe для диска. На диске есть папки "папка1", "папка2". В программе на 2-х кнопках соответственно должно выполняться открытие "папка1" в проводнике и "папка2" в проводнике.
На одном компьютере диск может быть d:\, на другом e:\ например. Собственно нужно получать путь до этого autorun.exe.


 
Gero ©   (2006-10-23 02:10) [4]

Уже ответили.


 
RASkov   (2006-10-23 02:15) [5]

Если узнать диск
ExtractFileDrive(ParamStr(0));


 
nporaMep ©   (2006-10-23 02:26) [6]

С путём разобрался, сделал строку класса String, но в ShellExecutable дельфи требует параметр FileName класса PAnsiChar.

ShellExecute (Form1.Handle, nil, a, nil, nil, SW_RESTORE);
a это String
a="explorer.exe f:\папка1"

Выдает:
[Error] Unit1.pas(51): Incompatible types: "String" and "PAnsiChar"


 
Eraser ©   (2006-10-23 02:32) [7]

> [6] nporaMep ©   (23.10.06 02:26)


> сделал строку класса String

в Делфи string это не класс.
ShellExecute(Form1.Handle, nil, PChar(a), nil, nil, SW_RESTORE);



Страницы: 1 вся ветка

Текущий архив: 2006.11.05;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.033 c
2-1161184107
Tbegin
2006-10-18 19:08
2006.11.05
моя первая прога


1-1159275874
flaxe
2006-09-26 17:04
2006.11.05
"Перетаскивание" изображений


15-1161172512
Gero
2006-10-18 15:55
2006.11.05
Добавить запись об отменяемом действии в Memo


3-1157968378
Neo Trinitron
2006-09-11 13:52
2006.11.05
MS Jet 4 и вложенные транзакции


2-1161340156
Gloomer
2006-10-20 14:29
2006.11.05
Как узнать текущий часовой пояс, установленный на компьютере