ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/runtime/IBServices.pas
(Generate patch)

Comparing ibx/trunk/runtime/IBServices.pas (file contents):
Revision 36 by tony, Sat Jul 18 12:30:52 2015 UTC vs.
Revision 37 by tony, Mon Feb 15 14:44:25 2016 UTC

# Line 1522 | Line 1522 | begin
1522      if (Trim(FBackupFile[i]) = '') then continue;
1523      if (Pos('=', FBackupFile[i]) <> 0) then  {mbcs ok}
1524      begin
1525 <      ServiceStartAddParam(FBackupFile.Names[i], isc_spb_bkp_file);
1525 >      ServiceStartAddParam(AnsiUpperCase(FBackupFile.Names[i]), isc_spb_bkp_file);
1526        value := Copy(FBackupFile[i], Pos('=', FBackupFile[i]) + 1, Length(FBackupFile.Names[i])); {mbcs ok}
1527        param := StrToInt(value);
1528        ServiceStartAddParam(param, isc_spb_bkp_length);

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines