Вниз
Скачать: 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.029 c
2-1161183115
Mb
2006-10-18 18:51
2006.11.05
Редактирование БД


6-1150401551
ponomar
2006-06-15 23:59
2006.11.05
pop3 attachment


15-1161167667
Juice
2006-10-18 14:34
2006.11.05
Quantum Grid, обычная таблица


8-1143471233
Melf
2006-03-27 18:53
2006.11.05
Динамическая генерация *.gif по заданым цветам


2-1161329602
stalcker666
2006-10-20 11:33
2006.11.05
Telnet




   Наверх