Hmm...
bei
Unicode-Delphi ist PChar ein PWideChar..
Zitat:
Code:
if SUCCEEDED(CoCreateInstance(CLSID_ShellLink,nil,
CLS CTX_INPROC_SERVER, IID_IShellLinkA, psl)) then
Hier holst Du aber per IID_IShellLinkA eine
Ansi Version...
Sollte dass dann nicht IID_IShellLinkW sein und explizit PWideChar statt PChar verwenden?
Besser mit strickten Typen (WideString / IShellLinkW / PWideChar / IID_IShellLinkW) arbeiten, dann gibt es auch keine Verwechslung...
