Рабочий стол

[masterdela]

Подскажите, плиз, возможно ли работать с рабочим столом как с холстом. И как, если возможно.

[alexBlack]

  ScreenDC := GetDC(0);
  Canvas := TCanvas.Create();
  Сanvas.Handle := ScreenDC;
  // Дальше работаем с Canvas

[masterdela]

Спасибо, конечно, но я спрашивал с рабочим столом, а не со всем экраном! А вот как работать с графикой конкретно на рабочем столе? Да, и, работая с экраном, как его обновлять? Например, для создания анимации...

[B_N]

1. Находим окно Program Manager'а, исходя из текущего десктопа (это не совсем то, где иконки нарисованы )

HWND hProgramManager = FindWindowEx(NULL, NULL, "Progman", "Program Manager");

2. Отталкиваясь от него находим главное окно explorer'a (который Shell)

HWND hShellView = FindWindowEx(hProgramManager, NULL, "SHELLDLL_DefView", NULL);

3. Находим принадлежащее ему окно с иконками:

HWND hListView = FindWindowEx(hShellView, NULL, "SysListView32", "FolderView");

4. Берем контекст и рисуем:

HDC hDC = GetDC(hListView);
Rectangle(hDC, 0,0,100,100);

Попутно можем еще выяснить размер рабочей зоны:

RECT rcWorkArea;
SystemParametersInfo(SPI_GETWORKAREA, 0, &rcWorkArea, 0);