Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.035 c
3-1157535205
Orxan
2006-09-06 13:33
2006.11.05
SQL Monitor


3-1157536802
Sanal23
2006-09-06 14:00
2006.11.05
Помогите разобраться?


15-1161242512
Серьезный Сэм
2006-10-19 11:21
2006.11.05
Общий доступ


15-1161010468
oldman
2006-10-16 18:54
2006.11.05
Вчера вычитал, откуда пошло слово "спам"...


2-1161230560
Kwoon
2006-10-19 08:02
2006.11.05
Помогите разобраться




   Наверх