Ver la Versión Completa : Crear un acceso directo a una aplicion desde MS-DOS
aram2r
19-05-2004, 13:24:09
Hola me gustaria saber si es posible crear un acceso directo desde MS-DOS...y como claro...Si es posible, como logro ponerlo en el escritorio??? Como obtengo la ruta del escritorio del actual usuario..??? Gracias.
delphi.com.ar
19-05-2004, 16:07:20
¿Que significa desde DOS?... ¿En qué compilarás tu aplicación o que creará este acceso directo?
roman
19-05-2004, 17:14:59
Como obtengo la ruta del escritorio del actual usuario..???
Para Windows 2000
uses
ShFolder, ShlObj;
const
SHGFP_TYPE_CURRENT = 0;
function GetDesktopFolder: String;
var
Buffer: array[0..MAX_PATH] of Char;
begin
ShGetFolderPath(0, CSIDL_DESKTOPDIRECTORY, 0, SHGFP_TYPE_CURRENT, Buffer);
Result := Buffer;
end;
Para otros Windows:
uses
ShlObj;
function GetDesktopFolder: String;
var
Buffer: array[0..MAX_PATH] of Char;
begin
ShGetSpecialFolderPath(0, Buffer, CSIDL_DESKTOPDIRECTORY, false);
Result := Buffer;
end;
// Saludos
vBulletin v3.6.8, Derechos ©2000-2024, Jelsoft Enterprises Ltd.