Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

GetWindowRect; Скриншот максимизированного окна   Найти похожие ветки 

 
Lexi   (2009-03-31 13:27) [0]

Требуется сохранить скриншот максимизированного окна.

Faq-и, в частности http://delphisite.ru/faq/poluchenie-izobrazheniya-ekrana я читал, но там не учитывается, что у максимизированного окна нет бордюров, а GetWindowRect выдает размер вместе с ними (top, left = -4), в результате чего на скриншот попадает лишнее.
Существует ли какое-то стандартное решение этого вопроса?


 
Lexi   (2009-03-31 14:46) [1]

Пока сделал так, но неужели нет лучшего решения...
     Width := Rect.Right - Rect.Left;
     Height := Rect.Bottom - Rect.Top;
     if IsZoomed(AHandle) then
       begin
       CXS := GetSystemMetrics(SM_CXSIZEFRAME);
       CYS := GetSystemMetrics(SM_CYSIZEFRAME);
       Width := Width - (CXS * 2);
       Height := Height - (CYS * 2);
       end
     else
       begin
       CXS := 0;
       CYS := 0;
       end;

     fBitmap := NewDIBBitmap(Width, Height, pf32bit);
     Result := BitBlt(fBitmap.Canvas.Handle, 0, 0, Width, Height, DC, CXS, CYS, SRCCOPY);


 
DVM ©   (2009-04-01 00:11) [2]


> что у максимизированного окна нет бордюров,

У него есть бордюры и они находятся за краем экрана.


 
Игорь Шевченко ©   (2009-04-01 00:28) [3]


> Требуется сохранить скриншот максимизированного окна.


С заголовком ?



Страницы: 1 вся ветка

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.305 c
15-1268688602
Юрий
2010-03-16 00:30
2010.08.27
С днем рождения ! 16 марта 2010 вторник


2-1267110427
dkhristich
2010-02-25 18:07
2010.08.27
Как корректно прекратить поток?


2-1269514776
ComeGetSome
2010-03-25 13:59
2010.08.27
Интерфейс Delphi


2-1266278397
romingood
2010-02-16 02:59
2010.08.27
Вопрос по строковым типам


2-1272953338
Беликов А.А
2010-05-04 10:08
2010.08.27
Конвертация TBitmap в TGPBitmap