Функция Скриншота.
|
|
Unodeya | Дата: Понедельник, 18 Мая 2009, 20:24 | Сообщение # 1 |
![Unodeya](http://igrostroenie.ru/avatar/29/147303.gif) Молодой но талантливый
Группа: Участники
Сообщений: 64
Награды: 0
Замечания: 0%
Статус: ![](/on.gif)
| Здравствуйте! Помогите пожалуйста начинающему програмисту) У меня есть функция Скриншота: Function Screenshot() aa=1 fold$=CurrentDir$()+"\screenshots" 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$="screenshots\"+"screen"+aa+".bmp" SaveBuffer (BackBuffer(),pp$) End Function Активирую я это If KeyHit(6 ScreenShot() Проблеммы: Скриншоты сохраняются максимум до 10.. Если в папке 10 скринов дальше не сохраняет.. Ещё я хотел бы чтобы при активации скриншота выводилась надпись и висела примерно 3 сек. Помогите пожалуйста. Заранее Спасибо большое за Ваш ответ.
|
|
| |
LDMT | Дата: Вторник, 19 Мая 2009, 03:21 | Сообщение # 2 |
![LDMT](http://470846456.uid.me/avatar.jpg) Врубающийся
Группа: Участники
Сообщений: 27
Награды: 0
Замечания: 0%
Статус: ![](/on.gif)
| Вот так будет работать... Function Screenshot() aa=1 fold$=CurrentDir$()+"\screenshots" dir=ReadDir(fold$) Repeat p$="screen"+aa+".bmp" File$=NextFile$(dir) If File$="" Then Exit If FileType(fold$+"\"+File$)=1 aa=aa+1 EndIf Forever CloseDir dir pp$="screenshots\"+"screen"+aa+".bmp" SaveBuffer (BackBuffer(),pp$) End Function
Редактор миров Modex - http://myblitz3d.narod.ru
|
|
| |
Unodeya | Дата: Вторник, 19 Мая 2009, 07:44 | Сообщение # 3 |
![Unodeya](http://igrostroenie.ru/avatar/29/147303.gif) Молодой но талантливый
Группа: Участники
Сообщений: 64
Награды: 0
Замечания: 0%
Статус: ![](/on.gif)
| Спасибо!, а как насчёт текста оповещения? Чтобы примерно висел 3 Sec на экране...
|
|
| |
maxturbo | Дата: Среда, 20 Мая 2009, 03:28 | Сообщение # 4 |
![maxturbo](http://s5.ucoz.net/a/05/0892.jpg) Профи
Группа: Участники
Сообщений: 379
Награды: 0
Замечания: 0%
Статус: ![](/on.gif)
Профессия: Программер
Проектов: 1 в разработке
| Jack, И куда его втыкать?
|
|
| |
AD77Root | Дата: Среда, 20 Мая 2009, 14:33 | Сообщение # 5 |
![AD77Root](/avatar/46/899938.jpg) Гиперсексуальная белка
Группа: Администрация
Сообщений: 1226
Награды: 0
Статус: ![](/on.gif)
Профессия: Администратор
| maxturbo4229, код "втыкнёшь" после кода нажатия клавишы создания скриншота
|
|
| |
df | Дата: Вторник, 14 Июля 2009, 15:54 | Сообщение # 6 |
![df](http://igrostroenie.my1.ru/avatar/85/706154.gif) Продвинутый
Группа: Участники
Сообщений: 144
Награды: 0
Замечания: 0%
Статус: ![](/on.gif)
Профессия: Программист
Команда: Легион Темной Лисы(LDF)
Проектов: 1
| Вопрос. Как сделать сохранения в другой формат, ну в *.PNG или *.JPG? Если просто поменять BMP на желаемый, то при просмотре пишет: "Ошибка кодировки" И как сделать что бы на скриншот, накладывалась печать или еше один рисунок,размешеный в определеном части скрина???
|
|
| |
Draw | Дата: Вторник, 14 Июля 2009, 16:11 | Сообщение # 7 |
![Draw](http://www.igrostroenie.ru/avatar/72/719085.jpg) Продвинутый
Группа: Участники
Сообщений: 194
Награды: 0
Замечания: 0%
Статус: ![](/on.gif)
Команда: DeforShys
Проектов: 8 (2 активных 6 инактив)
| Quote (df) И как сделать что бы на скриншот, накладывалась печать или еше один рисунок,размешеный в определеном части скрина??? в функции перед сохранением буффера рисуй на экране печать или что тебе там нужно. Quote (df) Как сделать сохранения в другой формат, ну в *.PNG или *.JPG? Если просто поменять BMP на желаемый, то при просмотре пишет: "Ошибка кодировки" у каждого формата своя кодировка изображения, например у png кажется(если ни с чем не перепутал) сохраняет уменьшая размер данных тем что он записывает большие области одним цветом(что то типо как заливкой), у jpg удаляется вся информация о цветах не видимых спектром чел. глаза, чел. глаз видит лишь не больше 100 оттенков каждого цвета. В bmp сохраняется все что только есть и поэтому он так много "весит". Bmp и jpg схожи по строению но jpg, повторяю, обрезает не нужную информацию. Блиц кодирует в Bmp
ICQ 557709132 пиши. Отвечу на любой вопрос по блицу
Сообщение отредактировал Draw - Вторник, 14 Июля 2009, 16:17 |
|
| |
LDMT | Дата: Вторник, 14 Июля 2009, 18:07 | Сообщение # 8 |
![LDMT](http://470846456.uid.me/avatar.jpg) Врубающийся
Группа: Участники
Сообщений: 27
Награды: 0
Замечания: 0%
Статус: ![](/on.gif)
| сохранка в жпг и пнг http://myblitz3d.narod.ru/imagedll.zip
Редактор миров Modex - http://myblitz3d.narod.ru
|
|
| |
df | Дата: Среда, 15 Июля 2009, 16:12 | Сообщение # 9 |
![df](http://igrostroenie.my1.ru/avatar/85/706154.gif) Продвинутый
Группа: Участники
Сообщений: 144
Награды: 0
Замечания: 0%
Статус: ![](/on.gif)
Профессия: Программист
Команда: Легион Темной Лисы(LDF)
Проектов: 1
| Все работает, но есть страный бзик. В програме просмотра все нормально, она видет рис и открывается . Но если я пытаюсь загрузить его в фотошоп то тут все по старой . С одной стороны, вот те и зашита от изменения скрина. ![roll](http://s5.ucoz.net/sm/24/roll.gif)
|
|
| |
Draw | Дата: Среда, 15 Июля 2009, 17:26 | Сообщение # 10 |
![Draw](http://www.igrostroenie.ru/avatar/72/719085.jpg) Продвинутый
Группа: Участники
Сообщений: 194
Награды: 0
Замечания: 0%
Статус: ![](/on.gif)
Команда: DeforShys
Проектов: 8 (2 активных 6 инактив)
| Quote (df) С одной стороны, вот те и зашита от изменения скрина. roll будем надеется что это она и есть :P
ICQ 557709132 пиши. Отвечу на любой вопрос по блицу
|
|
| |