1

Как можно получить скриншот только рабочего стола со значками, то есть чтобы в скриншот не попали окна панель задач, там где пуск, а только рабочий стол со значками?

2 ответа 2

4

Попробуйте:

var
  DesktopBitmap: TBitmap;    
begin    
  DesktopBitmap.GetDC(GetDesktopWindow);

Подробней посмотрите здесь: Screen Shuffling with Delphi.

7
  • Пишет неизвестный индификатор GetDC 4 мая 2012 в 10:47
  • С помощью GetDC окна всё равно наложатся на рисунок. 4 мая 2012 в 10:55
  • 1
    Смысл заключается в получении хендла рабочего стола.
    – michael
    4 мая 2012 в 10:58
  • И смысл?! Вот получу я хендл, вот скопирую картинку с хендла, но те окна, которые было поверх рабочего стола всё равно будут! 4 мая 2012 в 11:01
  • 2
    Компилятор знает, что такое GetDC, просто GetDC - это winapi функция. Она не относится к классу TBitMap. правильно будет просто "GetDC(GetDesktopWindow);", предварительно добавив "windows" в раздел uses. А куда функция будет возвращать значение - выбирайте сами.
    – teanЫЧ
    4 мая 2012 в 11:57
3

Можно сделать скриншот любого окна, используя bitblt. Эта функция, думаю, то, что вам необходимо. Скриншот рабочего стола можно сделать так:

...
var
  bmp:Tbitmap;
...
begin
  bmp := TbitMap.Create;
  bmp.Width := screen.Width;
  bmp.Height := screen.Height;
  bitblt(bmp.canvas.Handle, 0, 0, screen.Width, screen.Height, getdc(FindWindow('ProgMan', nil)), 0, 0, SRCCOPY);
4
  • Пробовал, всё равно в изображение попадают другие окна! 5 мая 2012 в 0:36
  • Не могут попадать! FindWindow('ProgMan', nil) - это окно рабочего стола. Какая у вас версия windows?
    – AseN
    5 мая 2012 в 10:04
  • Windows XP! 5 мая 2012 в 10:05
  • Попробуйте тогда использовать такой идентификатор: FindWindow('Progman', 'Program Manager');
    – AseN
    5 мая 2012 в 12:33

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.