16 Ocak 2015 #1 B ByOnur58 MFC Üyesi Üyelik Tarihi 7 Ocak 2015 Mesajlar 2,114 MFC Puanı 10 uses kısmına ShlOBJ unitini ekleyin; Kod: Kod: procedure TForm1.Button1Click(Sender: TObject); var s : string; begin s := 'C:DownLoaddeneme.html'; SHAddToRecentDocs(SHARD_PATH, pChar(s)); end;
uses kısmına ShlOBJ unitini ekleyin; Kod: Kod: procedure TForm1.Button1Click(Sender: TObject); var s : string; begin s := 'C:DownLoaddeneme.html'; SHAddToRecentDocs(SHARD_PATH, pChar(s)); end;