Форум: "Основная";
Текущий архив: 2002.12.23;
Скачать: [xml.tar.bz2];
Внизоткрытие файла Найти похожие ветки
← →
$ZoD$ (2002-12-12 03:23) [0]Люди как открыть exe только с полным примером
мне давали но не пашет
uses shellapi
shellexecute(handle,nil,nil,"q3.exe",nil,nil,sw_normal);
← →
У (2002-12-12 04:06) [1]ShellExecute вроде бы 6 параметров, а у тебя откуда то семь?
← →
KSergey (2002-12-12 09:01) [2]Что значит открыть?
То что вы пытаетесь сделать приведет к запуску программы из exe, но ни как не к открытию файла. Этого и добиваетесь? Тогда приготовьте ручку с бумажкой. Приготовили? Теперь пишите волшебный адрес, только никому чур не рассказывать, ладно? А то сильно много народу туда припрется и сервер может просесть. Ну так вот. Пишите:
http://ya.ru
Записали? Теперь выучите наизусть, добавьте в избранное (фавориты, закладки - по вкусу). И вместо вопроса сюда (на который, заметьте, еще ответ ждать надо, который, возможно, придет такой же занудный как и этот) - набирите в строке поиска shellexecute delphi. Примеров, поверьте, вывалится туева хуча. Тем более, что нужную ф-цию вы уже знаете, а это очень много для успешного поиска. Ну а уж когда поиск не помогает - тогда, конечно, сюда, на огонек.
И да прибудет с вами сила!
← →
Jonik (2002-12-12 14:57) [3]Uses ShellAPI;
…
var
h: hwnd;
begin
// Используем ShellExecute
if ShellExecute(h, "open", "readme.txt", nil, nil, SW_SHOW) < 32 then
begin
ShowMessage("Немогу выполнить ShellExecute !")
end;
// Используем WinExec
if WinExec("Notepad c:\config.sys", SW_SHOW) < 32 then
begin
ShowMessage("Немогу выполнить WinExec !")
end;
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.12.23;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.013 c