ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
13.04.2010, 15:03
|
|
Участник форума
Регистрация: 04.06.2009
Сообщений: 176
Провел на форуме:
840493
Репутация:
0
|
|
Скриншот в игре
Здравствуйте. Как сделать скриншот во время игры? (COD4). Если применять данный код, то вместо скрина черный экран
Код:
var ScreenDC: HDC;
canvas:Tcanvas;
begin
ScreenDC:=GetDC(0);
Canvas:=TCanvas.Create();
canvas.Handle:=ScreenDC;
Width:=Screen.Width;
Height:=Screen.Height; Img1.Canvas.CopyRect(Rect(0,0,Img1.Width,Img1.Height), canvas,Rect(0,0,Screen.Width,Screen.Height)); Releasedc(0,ScreenDC);
Canvas.Free;
end;
|
|
|
13.04.2010, 15:05
|
|
Познающий
Регистрация: 07.08.2009
Сообщений: 85
Провел на форуме:
705829
Репутация:
53
|
|
Тебе нужна сама прога или сорс?
|
|
|
|
13.04.2010, 15:09
|
|
Участник форума
Регистрация: 04.06.2009
Сообщений: 176
Провел на форуме:
840493
Репутация:
0
|
|
код нужен  |
|
|
|
13.04.2010, 15:09
|
|
Участник форума
Регистрация: 20.02.2010
Сообщений: 121
Провел на форуме:
496930
Репутация:
60
|
|
procedure TForm1.Button1Click(Sender: TObject);
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(0), 0,0,SRCCOPY);
Image1.Width := Screen.Width;
Image1.Height := Screen.Height;
Image1.Picture.Assign(bmp);
bmp.Free;
end;
Побробуй этот код, должно помочь, ток там размерчики прописать надо кажется
|
|
|
|
13.04.2010, 15:09
|
|
Участник форума
Регистрация: 20.02.2010
Сообщений: 121
Провел на форуме:
496930
Репутация:
60
|
|
честно так и не понял, зачем тут канва =(
|
|
|
|
13.04.2010, 15:12
|
|
Участник форума
Регистрация: 04.06.2009
Сообщений: 176
Провел на форуме:
840493
Репутация:
0
|
|
тоже самое ведь, тот же черный экран. Тут нужно чтото походу с директХ мудрить, но вот что и как Я непонимаю
|
|
|
|
13.04.2010, 15:15
|
|
Участник форума
Регистрация: 20.02.2010
Сообщений: 121
Провел на форуме:
496930
Репутация:
60
|
|
может у игры защита от скринов?
|
|
|
|
13.04.2010, 15:20
|
|
Участник форума
Регистрация: 04.06.2009
Сообщений: 176
Провел на форуме:
840493
Репутация:
0
|
|
нет конечно, вот попробуй со своим кодом заскринь любую игру или видео..эффект тот же - черный экран.
|
|
|
|
13.04.2010, 20:38
|
|
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме:
188563
Репутация:
52
|
|
[urt=http://delphiexpert.ru/view_download.php?id=14]Ссылка на прогоисходники[/url]
Если самому писать или гуглить:
DirectShow (DSPack)
Ссылка
считывать на прямую Оверлей |
|
|
|
14.04.2010, 10:42
|
|
Участник форума
Регистрация: 04.06.2009
Сообщений: 176
Провел на форуме:
840493
Репутация:
0
|
|
по той ссылке на делфи эксперте исходничек такой же как Мой, а значит также черный экран. DSpack установил но совершенно непонимаю как делать скриншот. Кто Может обьяснить?
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
