Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

Каким образом через Delphi можно запустить *.exe с .... 


Romualds Stashans   (2001-12-18 11:07) [0]

Каким образом через Delphi можно запустить *.exe (конкретно просмотровщик презентаций PowerPoint), причем чтобы в просмотровщик был подгружен необходимый файл формата PowerPoint?



gek   (2001-12-18 11:17) [1]

ну вроде бы так
winexec(pchar("c:\word file_name"),sw_shownormal)



Digitman   (2001-12-18 11:23) [2]

PP можно грузить как OLE-сервер (со всеми вытекающими возможностями)



Dmitriy(new)   (2001-12-18 11:39) [3]

function CreateProcessSimple(sExecFilePath:string;AWait:Boolean;AMax:Boolean):string;
var si: TStartupInfo; pi: TProcessInformation;
begin
FillMemory( @si, sizeof( si ), 0 ); si.cb := sizeof( si );
IF Amax Then Begin si.dwFlags := STARTF_USESHOWWINDOW; si.wShowWindow:=SW_SHOWMAXIMIZED; End;
if not CreateProcess(Nil,PChar(sExecFilePath ),Nil, Nil, False,
NORMAL_PRIORITY_CLASS , Nil, Nil, si, pi ) then
Application.MessageBox(Pchar("Failed to execute program : "+sExecFilePath),"Error",IDOK);
result:=inttostr(PI.hProcess); CloseHandle( pi.hThread );
Application.ProcessMessages;
if AWait then WaitForSingleObject(pi.hProcess, INFINITE);
CloseHandle( pi.hProcess );
end;



Anatoly Podgoretsky   (2001-12-18 12:33) [4]

ShellExecute(Handle,"open","PPT_FILE.ppt",nil,nil,sw_shownormal)




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.033 c
1-22020           Leo^Sun               2001-12-18 07:08  2002.01.08  
TMemo


1-22173           Petyun                2001-12-20 19:33  2002.01.08  
Установка компонент


1-22220           Кандыль               2001-12-16 15:10  2002.01.08  
Как запретить удалять какую-либо папку, не вися в трее?


1-22102           Andrey196             2001-12-19 18:43  2002.01.08  
Народ почему Image нехочет показывать TIF изображения


4-22473           amamed_3071           2001-11-02 13:46  2002.01.08  
Epson Printer commands