Как открыть *.cpl фаил?

← →
Alex_C © (2006-03-02 11:10) [0]

Делаю так
ShellExecute(0, "open", "timedate.cpl", "", "", SW_SHOWNORMAL);
Не проходит.

← →
_RusLAN © (2006-03-02 12:08) [1]

Насколько я знаю это обычная ДЛЛ ее так просто не откроеш.
попробуй так "control timedate.cpl"

← →
Alex_C © (2006-03-02 14:02) [2]

Нет так тоже не прокатывает (((

← →
Floppy © (2006-03-02 14:23) [3]

Действительно не проходит:(

А так проходит:)
WinExec("C:\WINDOWS\SYSTEM32\CONTROL.EXE TIMEDATE.CPL", sw_ShowNormal);
то есть с полным path

← →
Alex_C © (2006-03-02 14:32) [4]

Действительно проходит )))
Большое спасибо!

← →
umbra © (2006-03-02 14:34) [5]

имя файла и параметры его командной строки должны указываться отдельно
ShellExecute(0, nil, "control.exe", "timedate.cpl", nil, SW_SHOWNORMAL);

Ну, а лучше все-таки так (если на "чужом" компе и не знаем расположение SystemDir):

function GetSystemDir: TFileName; var SysDir: array[0..MAX_PATH - 1] of char; begin SetString(Result, SysDir, GetSystemDirectory(SysDir, MAX_PATH)); if Result = "" then raise Exception.Create(SysErrorMessage(GetLastError)); end; procedure TForm1.Button1Click(Sender: TObject); var x: Tfilename; begin x := getsystemdir; ShellExecute(Form11.Handle, "open", Pchar("rundll32.exe"), "shell32.dll,Control_RunDLL Desk.cpl,@0,3", Pchar(X), SW_normal); end;

Взято с DRKB

Как открыть *.cpl фаил? Найти похожие ветки