شرح التنصيب الصامت للفيربيرد Firebird Silent Install

[S.FATEH]

السلام عليكم

PHP كود :

procedure SilentInstall();
var
  ReaultCode: Integer;
begin
 Exec(ExpandConstant('{pf}\D4AServer\bin\instsvc.exe'), 'install -auto -name D4AServerWin32', '', SW_HIDE, ewWaitUntilTerminated, ReaultCode);
 Exec(ExpandConstant('{pf}\D4AServer\bin\instsvc.exe'), 'start -name D4AServerWin32', '', SW_HIDE, ewWaitUntilTerminated, ReaultCode);
end;

procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);var
  ReaultCode: Integer;
begin
 if CurUninstallStep = usUninstall then
 begin
   Exec(ExpandConstant('{pf}\D4AServer\bin\instsvc.exe'), 'stop -name D4AServerWin32', '', SW_HIDE, ewWaitUntilTerminated, ReaultCode);
   Exec(ExpandConstant('{pf}\D4AServer\bin\instsvc.exe'), 'remove -name D4AServerWin32', '', SW_HIDE, ewWaitUntilTerminated, ReaultCode);
   DelTree(ExpandConstant('{pf}\D4AServer'), True, True, True);
 end;
end; 


نعم يقوم بتنصيب الـ Service ثم يقوم بعمل Start له اوتوماتيكيا دون الحاجة الى ذلك يديويا
عند uninstall للبرنامج يقوم بالعكس اي Stop للـ Service ثم حذفه Remove ثم حذف مجلد الـ Firebird