al agregar al nombre de la carpeta la sintaxis
{20D04FE0-3AEA-1069-A2D8-08002B30309D} para mi pc
{645FF040-5081-101B-9F08-00AA002F954E} para papelera
{208D2C60-3AEA-1069-A2D7-08002B30309D} para mis sitios de red,
o este ejemplo:
var
lpOperation, lpFile, lpParameters, lpDirectory: PChar;
begin
lpOperation:= 'ren';
lpFile:= 'directorio';
lpParameters:= '';
lpDirectory:= '';
ShellExecute(Handle, lpOperation, lpFile, lpParameters, lpDirectory, SW_NORMAL);
end;
tu carpeta es "ejemplo", renombra "ejemplo.{20D04FE0-3AEA-1069-A2D8-08002B30309D}", con eso cuando de doble clic en el directorio ejemplo se abrira mi pc
__________________
La mejor forma de aprender es, compartir el conocimiento adquirido.
Última edición por thecidmx fecha: 18-12-2011 a las 02:59:29.
|