Как удалить все файлы из Recent Documents?

01.01.2007

Для этого можно воспользоваться API функцией SHAddToRecentDocs:

procedure TForm1.Button1Click(Sender: TObject);
begin
SHAddToRecentDocs(SHARD_PATH, 0);
end;

Не забудьте включить ShlObj в Unit