Путь к папке

Модераторы: Duncon, Naeel Maqsudov, Игорь Акопян, Хыиуду

C_O_D_E
Сообщения: 296
Зарегистрирован: 13 фев 2008, 20:10
Откуда: Беларусь. Орша
Контактная информация:

Спасибо. И соответственно процедура принимает такой вид:
[syntax=Delphi]
ShellExecute(ShellExecute(Handle, nil,PChar(ExtractFilePath(Application.ExeName)), nil, nil, SW_SHOWMAXIMIZED); end ;)
[/syntax]
Если назначен специальный человек для контроля за чистотой исходной информации, то найдется изобратательный идиот, который придумает способ, чтобы неправильная информация прошла этот контроль.
MOTOCoder
Сообщения: 548
Зарегистрирован: 14 янв 2008, 20:27
Откуда: Россия, Псков

Таким образом вы просто откроете папку с программой проводником.
Ни что так не ограничивает фантазию программиста, как компилятор...
C_O_D_E
Сообщения: 296
Зарегистрирован: 13 фев 2008, 20:10
Откуда: Беларусь. Орша
Контактная информация:

ну я вообще как пример. я делаю так:
[syntax=Delphi]
var s:string
............................................
S:=ExtractFilePath(Application.ExeName)+'\blablabla.exe';
ShellExecute(Handle, nil,PChar(S), nil, nil, SW_SHOWMAXIMIZED);

[/syntax]
Если назначен специальный человек для контроля за чистотой исходной информации, то найдется изобратательный идиот, который придумает способ, чтобы неправильная информация прошла этот контроль.
Ответить