Вниз
Скачать: CL | DM;

Как открыть *.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);


← →
Floppy ©   (2006-03-02 14:36) [6]

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


← →
Floppy ©   (2006-03-02 14:38) [7]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.03 c
15-1140863339
DVD
2006-02-25 13:28
2006.03.19
Есть ли такой переходничёк...


3-1138366105
diz22
2006-01-27 15:48
2006.03.19
Кол-во записей в DBF. Критично ли 600 000?


15-1140694186
Броня
2006-02-23 14:29
2006.03.19
Всем защитникам и защитницам Родины


2-1141218554
Yozj
2006-03-01 16:09
2006.03.19
как конструктору вернуть NUL?


10-1112691891
bon
2005-04-05 13:04
2006.03.19
AutoCad & Delphi




   Наверх