Mercurial > hg > xemacs-beta
view netinstall/mklink2.c @ 981:0205cafe98ff
[xemacs-hg @ 2002-08-30 08:25:48 by youngs]
Don't look now, but 21.5.9 is on its way out the door!
Don't forget what good 'ol Ma used to say...
"Eat your brussels sprouts, little Johnny, so you
can grow up big and strong."
author | youngs |
---|---|
date | Fri, 30 Aug 2002 08:26:22 +0000 |
parents | 3078fd1074e8 |
children |
line wrap: on
line source
#include "win32.h" #include "shlobj.h" /* This part of the code must be in C because the C++ interface to COM doesn't work. */ void make_link_2 (char *exepath, char *args, char *icon, char *lname) { IShellLink *sl; IPersistFile *pf; WCHAR widepath [_MAX_PATH]; CoCreateInstance (&CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER, &IID_IShellLink, (LPVOID *) & sl); sl->lpVtbl->QueryInterface (sl, &IID_IPersistFile, (void **) &pf); sl->lpVtbl->SetPath (sl, exepath); sl->lpVtbl->SetArguments (sl, args); sl->lpVtbl->SetIconLocation (sl, icon, 0); MultiByteToWideChar (CP_ACP, 0, lname, -1, widepath, _MAX_PATH); pf->lpVtbl->Save (pf, widepath, TRUE); pf->lpVtbl->Release (pf); sl->lpVtbl->Release (sl); }