[DJDrugsounD]

Сообщение от NumLock

можно с рабочего стола получить все элементы и уже потом отрисовать их на Bitmap.

А не подскажите как это сделать?

Нагуглил как добраться до элементов рабочего стола

Код:

function GetDesktopListViewHandle: THandle;
var
  S: String;
begin
  Result := FindWindow('ProgMan', nil);
  Result := GetWindow(Result, GW_CHILD);
  Result := GetWindow(Result, GW_CHILD);
  SetLength(S, 40);
  GetClassName(Result, PChar(S), 39);
  if PChar(S) <> 'SysListView32' then 
    Result := 0;
end;

но потом можно получить только координаты элементов путём отправки сообщения LVM_GETITEMPOSITION.

А как получить иконку или же сам элемент целиком чтоб отрисовать его на битмапе неизвестно.