Um das ganze Delphi 2009 tauglich zu machen, müssen folgende Typecasts von PChar nach PAnsiChar korrigiert werden:
Delphi-Quellcode:
ShExecInfoA.lpFile := PAnsiChar(AnsiString(Filename));
ShExecInfoA.lpParameters := PAnsiChar(AnsiString(Parameters));
ShExecInfoA.lpDirectory := PAnsiChar(AnsiString(ExtractFileDir(Filename)));
Desweiteren kann man getrost WideExtractFileDir und WideFileExists durch die "regulären", seit D2009
unicode-tauglichen, Varianten ExtractFileDir und FileExists ersetzt werden.
Gruß,
Stefan