VPF::ShellExecute и параметры... - Форум программистов

Nic442

Дата 6.5.2006, 00:22 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 92
Регистрация: 5.4.2006
Где: Советский Союз

Репутация: нет
Всего: нет

Вот есть код

Код


Dir:= ExtractFilePath(Application.ExeName);
ShellExecute(Handle, 'open', 'Bo_C\BIN\bcc.exe"',
               PChar('-I"'+Dir+'Bo_C\INCLUDE" -L"'+Dir+'Bo_C\LIB" "'
               +Dir+'code.cpp" > "'+Dir+'Compiling\errout.txt"'),
               PChar(Dir), SW_NORMAL);

Без параметров запускает нормально. А с параметрами не работает. У меня несколько вопросов правильно ли записал?
и если параметр -Ixxx (где ххх путь к INCLUDE в котором могут быть пробелы и русские символы) он будет нормально работать, нужны ли ковычки?

Допустим адрес такой:

Код


-I"D:\Documents and Settings\kuku\Рабочий стол\Программа на Delphi\EXE\Bo_C\INCLUDE"

SPrograMMer

Дата 6.5.2006, 01:18 (ссылка)

(нет голосов)

Загрузка ...

Спамер :)

Профиль
Группа: Участник
Сообщений: 442
Регистрация: 5.11.2004
Где: Краснодар

Репутация: нет
Всего: 6

попробуй:

Код


Dir:= ExtractFilePath(Application.ExeName);
ShellExecute(Handle, 'open', 'Bo_C\BIN\bcc.exe '+
               PChar('-I "'+Dir+'Bo_C\INCLUDE" -L "'+Dir+'Bo_C\LIB" "'
               +Dir+'code.cpp" > "'+Dir+'Compiling\errout.txt"'), Nil,
               PChar(Dir), SW_NORMAL);

т е параметры - в командную строку....

Добавлено @ 01:20

Цитата(Nic442 @ 6.5.2006, 00:22

)

нужны ли ковычки

ковычки нужны, если в пути есть пробелы, например:
C:\Documents and Settings\......

Это сообщение отредактировал(а) SPrograMMer - 6.5.2006, 01:28

--------------------

животное = зверь
законченный гентушник

Nic442

Дата 6.5.2006, 12:06 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 92
Регистрация: 5.4.2006
Где: Советский Союз

Репутация: нет
Всего: нет

Не пашет. Уже так и так перепробоал...

Nic442

Дата 6.5.2006, 14:48 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 92
Регистрация: 5.4.2006
Где: Советский Союз

Репутация: нет
Всего: нет

Вот так тоже не хочет...

Код


Dir:= ExtractFilePath(Application.ExeName);
DIR:=ExtractShortPathName(Dir);
ShellExecute(Handle, 'open', PChar(Dir+'Bo_C\BIN\bcc.exe'),
               PChar('-I'+Dir+'Bo_C\INCLUDE -L'+Dir+'Bo_C\LIB '+'-n'+DIR+' '
               +Dir+'code.cpp > '+Dir+'Compiling\errout.txt'),
               nil, SW_NORMAL);

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: WinAPI и системное программирование \| Следующая тема »