System Delphi

Uses ShlOBJ;

procedure TMainForm.ButTemizleClick(Sender: TObject);
begin
SHAddToRecentDocs(SHARD_PATH, nil);
ShowMessage('Temizlendi');
end;