forum.boolean.name - Скриншот в блитзе

forum.boolean.name (http://forum.boolean.name/index.php)

- 3D-программирование (http://forum.boolean.name/forumdisplay.php?f=12)

- - Скриншот в блитзе (http://forum.boolean.name/showthread.php?t=2904)

DRAG	08.03.2007 23:22

Скриншот в блитзе

У меня вопрос , как реализовать снятие скриншота с экрана в Блитзе ?

impersonalis

09.03.2007 00:03

Re: Скриншот в блитзе

GrabImage image,x,y,[frame]
SaveImage (image,bmpfile$[,frame] )

SBJoker

09.03.2007 00:13

Re: Скриншот в блитзе

Зачем так жестоко можно проще:
SaveBuffer(FrontBuffer(), "screenshot.bmp")

DRAG	09.03.2007 00:19

Re: Скриншот в блитзе

Огромный СПАСИБ !!!!!!!

tormoz

09.03.2007 00:55

Re: Скриншот в блитзе

Цитата:

Function skreenshot()

aa=1
fold$=CurrentDir$()+"\screens"
dir=ReadDir(fold$)
Repeat
p$="screen"+aa+".bmp"
File$=NextFile$(dir)
If File$="" Then Exit
If FileType(fold$+"\"+File$)=1
If p$=File$ aa=aa+1
EndIf
Forever
CloseDir dir
pp$="screens\"+"screen"+aa+".bmp"

SaveBuffer (BackBuffer(),pp$)
End Function

В папке проги создать папку screens
при каждом вызове функции будет создаваться новый скриншот не затирая другие

Например:
If KeyHit(88) skreenshot()

SBJoker

09.03.2007 23:04

Re: Скриншот в блитзе

tormoz

09.03.2007 23:13

Re: Скриншот в блитзе

Это мой код. еще в 2003 писал...

jimon

09.03.2007 23:54

Re: Скриншот в блитзе

tormoz

10.03.2007 02:00

Re: Скриншот в блитзе

Ты прав :)
Специально не исправляю. Еще название функции глянь :)))

Часовой пояс GMT +4, время: 05:50.