Hem / Tips & tricks
uses Shlobj;procedure TForm1.Button1Click(Sender: TObject);begin SHAddToRecentDocs(SHARD_PATH, nil);end;