IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

- Delphi (https://www.ircforumlari.net/delphi/)

- - windows masa üstünü yenileme (https://www.ircforumlari.net/delphi/689482-windows-masa-ustunu-yenileme.html)

Kaf_Dağı

18 Mart 2015 14:00

windows masa üstünü yenileme

Kod:

uses

 ShlObj;

 

procedure *******Desktop1;

begin

 SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, nil, nil);

end;

 

{2.yol}

 

procedure *******Desktop2;

var

 hDesktop: HWND;

begin

 hDesktop := FindWindowEx(FindWindowEx(FindWindow('Progman', 'Program

Manager'), 0,

  'SHELLDLL_DefView', ''), 0, 'SysListView32', '');

 PostMessage(hDesktop, WM_KEYDOWN, VK_F5, 0);

 PostMessage(hDesktop, WM_KEYUP, VK_F5, 1 shl 31);

end;

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 05:00.