Mega Code Archive

 
Categories / Delphi / System
 

Belgeler menüsüne bir dosya ekleme

uses kısmına ShlObj ünitini ilave edin; procedure TForm1.Button1Click(Sender: TObject); var isim : string; begin isim := 'C:\DownLoad\deneme.html'; SHAddToRecentDocs(SHARD_PATH, pChar(isim)); end;