Explorar o código

* TProcess.setparameter assigned a TStrings instead of .assign()ing it.
Patch from Cyrax, Mantis #19906

git-svn-id: trunk@18105 -

marco %!s(int64=14) %!d(string=hai) anos
pai
achega
83af0c8a1b
Modificáronse 1 ficheiros con 1 adicións e 2 borrados
  1. 1 2
      packages/fcl-process/src/process.pp

+ 1 - 2
packages/fcl-process/src/process.pp

@@ -395,8 +395,7 @@ end;
 
 procedure TProcess.SetParameters(const AValue: TStrings);
 begin
-  if FParameters=AValue then exit;
-  FParameters:=AValue;
+  FParameters.Assign(AValue);
 end;
 
 Procedure TProcess.SetWindowRect (Value : Trect);