проблема с cmd.exe

← →
Dmitriy507 (2007-08-21 16:30) [0]

помогите! нужно выполнить примерно такую операцию:
cmd.exe
f:
cls
rк примеру но я не знаю как это сделать из делфы7...
shellexecute не получается...

заранее большое спасибо!!!

← →
clickmaker © (2007-08-21 16:32) [1]

> shellexecute не получается

а как пытаешься?

← →
Dmitriy507 (2007-08-21 16:35) [2]

shellexecute(Handle, "open", "cmd /k dir", nil, nil, sw_show);
когда набрал в консоли cmd /?
сказанно выполнение одной строки надо делать с параметром /k

← →
clickmaker © (2007-08-21 17:01) [3]

shellexecute(Handle, nil, nil, "cmd /c dir", nil, sw_show);

← →
Dmitriy507 (2007-08-21 17:09) [4]

да, но не то..
мне в общем надо сделать это...:
@echo off
f:
cls
tree /f Downloads
pause
только из делфа

← →
clickmaker © (2007-08-21 17:24) [5]

@echo off && f: && cls && tree /f Downloads && pause

← →
Dmitriy507 (2007-08-22 06:51) [6]

shellexecute(Handle, nil, nil, "cmd /c f: && cls && tree /f Downloads && pause", nil, sw_show);

открывается не cmd а дериктория где сохранен проект делфи.

← →
{RASkov} © (2007-08-22 07:17) [7]

> [6] Dmitriy507 (22.08.07 06:51)
> /c f: && cls && tree /f Downloads && pause"

Вот так попробуй:
ShellExecute(Handle, nil, PChar(GetEnvironmentVariable("ComSpec")), "/c f: && cls && tree /f Downloads && pause", nil, SW_SHOWNORMAL);

← →
Dmitriy507 (2007-08-22 14:16) [8]

все получилось! супер! РАСПЕКТ! спасибо
ээ, вопрос:
ShellExecute(Handle, nil, PChar(GetEnvironmentVariable("ComSpec")), "/c f: && cls && tree /f Downloads && pause", nil, SW_SHOWNORMAL);
как сделать так чтоб параметр f: брался из Edit1.text?

← →
Игорь Шевченко © (2007-08-22 14:51) [9]

> как сделать так чтоб параметр f: брался из Edit1.text?

GetEnvironmentVariable("ComSpec")), "/c "+Edit1.Text+" && cls && tree /f Downloads && pause"

?

← →
Dmitriy507 (2007-08-22 15:05) [10]

да, именно это.
только ваша функция не работает :(

> только ваша функция не работает :(

Мне очень жаль

> [10] Dmitriy507 (22.08.07 15:05)

чем string от Pchar отличается, в курсе?

← →
Вася Правильный (2007-08-22 15:25) [13]

где ты там функцию увидел?

← →
Dmitriy507 (2007-08-25 11:44) [14]

не функция а строка
GetEnvironmentVariable("ComSpec")), "/c "+Edit1.Text+" && cls && tree /f Downloads && pause"

ошибка говорит, помогите как сделать строку сверху рабочей? :(

Ошибка говоришь, ну продолжай говорить.

проблема с cmd.exe Найти похожие ветки