Update.exe nach TempDir unter Win7 kopieren?

[OrNEC]

Hallo,

ich verwende folgende Komponente um meine Anwendung zu aktualisieren. http://www.kidmoses.com/blog-article.php?bid=22

Da hab ich die Möglichkeit ein Verzeichnis auszuwählen wohin die Update.exe hinein kopiert werden soll. Ich verwende das Verzeichnis Temp. Es klappt auch soweit alles gut, nur unter Windows 7 geht das nicht. Die Update.exe wird irgendwo hin runtergeladen aber sie starten anschließend nicht, obwohl sie das automatisch tun soll.

Ich hab hier die Funktion die das erledigen soll:

Delphi-Quellcode:

function GetTempDir(): string;
var
  PC: Array[0..MAX_PATH + 1] of Char;
  s: string;
begin
  GetTempPath(MAX_PATH, PC);
  s := IncludeTrailingBackslash(StrPas(PC));
  if not DirectoryExists(s) then begin
    s := ExtractFilePath(Application.ExeName);
    s := IncludeTrailingBackslash(s);
    s := s + 'Temp\';
    CreatePath(s);
    end;
  Result := s;
end;

Kann man diese irgendwie an Win 7 anpassen? Wäre sehr dankbar wenn mir jemand helfen würde. Danke!