VPF::сохранение области экрана - Форум программистов

SultanOFF

Дата 10.12.2009, 18:40 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 108
Регистрация: 23.3.2008

Репутация: нет
Всего: нет

Здравствуйте. Использую процедуру mapple`a

Код


procedure SaveScreenFile(X,Y,Vysota,Hirina:integer;NameFile:String);
var
  bmp: TBitmap;
  DeskHw,DeskHdC : Longint;
begin
  bmp:=TBitmap.Create; // Создаем новый битмап в памяти
  DeskHw:=getdesktopwindow;
  DeskHdc:=getdc(deskHw);
  bmp.Height:=Vysota;
  bmp.Width:=Hirina;
  BitBlt(bmp.Canvas.Handle,0,0,Vysota,
Hirina,DeskHdc,X,Y,SRCCOPY); // Сохраняем в память указанную область экрана
  bmp.SaveToFile(NameFile); // Записываем файл
 end;
end.

но хотелось бы нечто большее, а конкретно чтобы например когда юзер нажимает волшебные горячие кнопки, появляется некое подобие виндовского выделения рабочего стола, и чтобы выделенную область можно было сохранить. Конечно понимаю что это довольно трудно, но подскажите пожалуйста хотя бы в каком направлении копать? :(

~FoX~

Дата 10.12.2009, 18:46 (ссылка)

(нет голосов)

Загрузка ...

НЕ рыжий!!!

Профиль
Группа: Участник Клуба
Сообщений: 2819
Регистрация: 8.10.2003
Где: Зеленоград

Репутация: 2
Всего: 68

Делай полный скрин, потом покрывай стол чем нить прозрачным, на нем тяни что нить "резиновое", и обризай исходный скрин по координатам

--------------------

…множественность никогда не следует полагать без необходимости…

SultanOFF

Дата 10.12.2009, 19:00 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 108
Регистрация: 23.3.2008

Репутация: нет
Всего: нет

можно поподробнее про покрытие прозрачным и натягиванием резинового? smile

AntonN

Дата 10.12.2009, 19:08 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 491
Регистрация: 8.8.2006

Репутация: 7
Всего: 18

типа этого http://forum.mirgames.ru/index.php?showtopic=6245 + это http://desksoft.ru/index.php?forum=13&th=113

--------------------

SultanOFF

Дата 10.12.2009, 22:00 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 108
Регистрация: 23.3.2008

Репутация: нет
Всего: нет

спасибо, вторая ссылка довольно интересна smile

SultanOFF

Дата 9.2.2010, 19:26 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 108
Регистрация: 23.3.2008

Репутация: нет
Всего: нет

в общем с модулем АнтонНа совладать не получилось, поэтому пытаюсь сделать по своему. В принципе все работает да только сохраняет не всю область которую Я выделяю. Кого не затруднит, может посмотреть проект и помочь?(проект закрепил)

Присоединённый файл ( Кол-во скачиваний: 5 )

_____________4_.rar 210,48 Kb

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Звук, графика и видео \| Следующая тема »