diff options
author | Alexey Kulakov <panda75@bk.ru> | 2015-03-18 07:13:47 +0000 |
---|---|---|
committer | Alexey Kulakov <panda75@bk.ru> | 2015-03-18 07:13:47 +0000 |
commit | 534eefa7029aaf49b0b673b6f6fb630752bb3fd5 (patch) | |
tree | 4651ab6e04dce2c3ee50e86b84d527d4e2d8a697 /plugins/Utils.pas/syswin.pas | |
parent | 1218b9d9946a89818c17c065295601b36743cc5d (diff) |
Pascal: service executing fix)
git-svn-id: http://svn.miranda-ng.org/main/trunk@12427 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/Utils.pas/syswin.pas')
-rw-r--r-- | plugins/Utils.pas/syswin.pas | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/plugins/Utils.pas/syswin.pas b/plugins/Utils.pas/syswin.pas index 082e1444d5..361404cc11 100644 --- a/plugins/Utils.pas/syswin.pas +++ b/plugins/Utils.pas/syswin.pas @@ -62,7 +62,11 @@ function ExecuteWaitW(AppPath:PWideChar; CmdLine:PWideChar=nil; DfltDirectory:PW var
flags: dword;
{$IFDEF FPC}
+ {$IFDEF VER2}
Startup: StartupInfo;
+ {$ELSE}
+ Startup: StartupInfoW;
+ {$ENDIF}
{$ELSE}
Startup: StartupInfoW;
{$ENDIF}
@@ -125,7 +129,11 @@ function ExecuteWait(AppPath:PAnsiChar; CmdLine:PAnsiChar=nil; DfltDirectory:PAn var
flags: dword;
{$IFDEF FPC}
+ {$IFDEF VER2}
Startup: StartupInfo;
+ {$ELSE}
+ Startup: StartupInfoA;
+ {$ENDIF}
{$ELSE}
Startup: StartupInfoA;
{$ENDIF}
|