加一文档到开始菜单中的文件夹下

uses ShlObj;

写入ShAddtoRecentDes(SHARE_PATH,pchar('C:\1.txt'));