Error 1026 bei ShFileOperation

[Andidreas]

hi @ all

hab grad ein kleines problem....

bastel mir im moment ein kleines programm für installationen und updates von programmen...
gerade versuch ich für ein programm eine update routine zu machen, bis jetzt sieht das ganze
so aus:

Delphi-Quellcode:

procedure TMain_Form.bitbtn_Upd_ProgClick(Sender: TObject);

var
strExeFrom, strExeTo       : TStream;
sFromDirError, sToDirError : String;
FileOpStruct               : TSHFileOpStruct;
iRC                        : Integer;

begin

  // Copy DELGSRV201.exe
  strExeFrom := TFileStream.Create('J:\Update\Prog\Prog1.exe', fmOpenRead);
  Try
    strExeTo   := TFileStream.Create('C:\LOG\Daten_Laden\bin\Prog1.exe', fmCreate);
    Try
      strExeTo.CopyFrom(strExeFrom, strExeFrom.Size);
    Finally
      strExeTo.Free;
    End;
  Finally
    strExeFrom.Free;
  End;
  
  //Copy Directory
  sFromDirError := 'J:\Updates\Daten_Laden\Error';
  sToDirError   := 'C:\LOG\Daten_Laden\';

  With FileOpStruct Do
  Begin
    wFunc := FO_Copy;
    pFrom := PChar(sFromDirError + #0);
    pTo   := PChar(sToDirError + #0);
  End;

  iRC := SHFileOperation(FileOpStruct);

end;

die .exe tu ich wie ihr seht via filestream kopieren... das klappt auch soweit ganz gut...
aber beim kopieren der ordner klappt irgendwas nicht, da bekomm ich immer denn fehler nr. 1026
kann mir vielleicht jemand sagen worand das liegt???