System Delphi

uses kısmına ShlObj ünitini ekleyin;
SHAddToRecentDocs(SHARD_PATH,nil);