| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как открыть *.cpl фаил? [D7, XP]

Alex_C ©   (2006-03-02 11:10:00) 

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

---

Floppy   (2006-03-02 14:38:00) [1]

Не заметил umbra ©   (02.03.06 14:34) [5]  :((

---

Floppy   (2006-03-02 14:36:00) [2]

Ну, а лучше все-таки так (если на "чужом" компе и не знаем расположение 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

---

umbra   (2006-03-02 14:34:00) [3]

имя файла и параметры его командной строки должны указываться отдельно

ShellExecute(0, nil, 'control.exe', 'timedate.cpl', nil, SW_SHOWNORMAL);

---

Alex_C   (2006-03-02 14:32:00) [4]

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

---

Floppy   (2006-03-02 14:23:00) [5]

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

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

---

Alex_C   (2006-03-02 14:02:00) [6]

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

---

_RusLAN   (2006-03-02 12:08:00) [7]

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

---

Наверх