PureBasic - форум

Информация о пользователе

Привет, Гость! Войдите или зарегистрируйтесь.

Вы здесь » PureBasic - форум » Вопросы по PureBasic » Режим Openscreen И Таймеры

Режим Openscreen И Таймеры

Страница: 1

Сообщений 1 страница 2 из 2

1

  • Автор: MACTEPok
  • Новичок
  • Зарегистрирован: 05.02.2014
  • Приглашений: 0
  • Сообщений: 1
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    2 минуты
  • Последний визит:
    05.02.2014 09:24:44

Есть такой пример 


Код:
path$="d:\Video\AVI\"           ; change to your own path + file 
file$="001.avi" 
#Screenwidth = 1600 
#Screenheight = 900 

If InitSprite() And InitKeyboard() And OpenScreen(#Screenwidth,#Screenheight,32,"Movie Screen") 
Else 
   End 
EndIf 

FlipBuffers()  
ClearScreen(RGB(0,0,0))  
FlipBuffers()  

If InitMovie()  
   If LoadMovie(0, path$ + file$)  
     ResizeMovie(0,0,0,#Screenwidth,#Screenheight) 
     ClearScreen(RGB(0,0,0))  
     Delay(1000)  
     PlayMovie(0, ScreenID())  
     Repeat  
       ExamineKeyboard() 
       Delay(1)  
     Until (MovieStatus(0)=MovieLength(0) - 2) Or KeyboardPushed(#PB_Key_Escape)  
     FreeMovie(0)  
     ClearScreen(RGB(0,0,0))  
   EndIf 
EndIf

Как в режиме полного экрана организовать таймер, чтобы, например, раз в секунду вызывалась процедура? В справке и примерах есть таймеры только для окна : SetTimer() и AddWindowTimer()

0

2

  • Автор: Пётр
  • Активный участник
  • Зарегистрирован: 14.06.2009
  • Приглашений: 0
  • Сообщений: 3025
  • Уважение: [+98/-5]
  • Позитив: [+1/-0]
  • Пол: Мужской
  • Провел на форуме:
    2 месяца 10 дней
  • Последний визит:
    Сегодня 17:14:16

Можно обойтись без окна.

Код:
Procedure Timer1()
  Static x
  Debug x
  x+1
EndProcedure

SetTimer_(0, 0, 1000, @Timer1())

MessageRequester("", "Нажмите ОК для завершения работы проги")

Только для воспроизведения полноэкранного видео, обычно поступают по другому. Создают окно на весь экран и на нем размещают видео плеер.

0

Страница: 1

Вы здесь » PureBasic - форум » Вопросы по PureBasic » Режим Openscreen И Таймеры