Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / SET BELL и включенные в проект *.wav = ? / 4 сообщений из 4, страница 1 из 1
01.02.2008, 14:34
    #35103848
CTAC-KO
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SET BELL и включенные в проект *.wav = ?
Привет!

Такой вопрос возник. На этом форуме (а до того на фоксклубе) я прочитал что можно проигрывать звуки с помощью SET BELL/CHR(7). Пока я в режиме разработки - все играет (из подпапки WAV).

Ехешнег компилю, вавки включены в проекте в Other Files. Смотрю НЕХ-едитором в него - есть сигнатура RIFF WAVE, т.е. вавку включило в ехешнег. Проверяю через file("wav.wav") - грит есть такой файл (я тут читал что все что включено в проект какбы ложиццо в корне, где прога пущаеццо). Но вот после SET BELL последующий ??CHR(7) не работает - звук не проигрываеццо! хотя в том же месте в режиме разработки - играет...

А кто это сделал? (с) Людвиг Аристархович, Наша Russia :)

вфп9

сенксь!
...
Рейтинг: 0 / 0
01.02.2008, 14:39
    #35103882
Sergey Sizov.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SET BELL и включенные в проект *.wav = ?
Из ехе-файла играть не будет. Или сам из него вынимай и клади рядом, или сразу не запихивай в exe.
...
Рейтинг: 0 / 0
01.02.2008, 14:45
    #35103919
CTAC-KO
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SET BELL и включенные в проект *.wav = ?
спасибо за ответ. думал мож есть какая хитрость...

vfp, сцуко, хитрый! иконки достает и показуед, а вавки ему влом достать и проиграть
...
Рейтинг: 0 / 0
01.02.2008, 15:39
    #35104221
CTAC-KO
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SET BELL и включенные в проект *.wav = ?
короче закончил вот чем (вавки включил в проект, они по пару декакил всего)
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
FUNCTION PlayWav
   LPARAMETERS tcWavFile
   LOCAL lcTempFile
   lcTempFile = SYS( 2023 )+'\'+SYS( 3 )+'.wav'
   IF _VFP.StartMode =  0 
      tcWavFile = "wav\" + m.tcWavFile
   ENDIF
   IF !".wav"$tcWavFile
      tcWavFile = m.tcWavFile + ".wav"
   ENDIF
   STRTOFILE(FILETOSTR(m.tcWavFile), m.lcTempFile)
   SET BELL TO (lcTempFile)
   ?? CHR( 7 )
   SET BELL TO 
   ERASE (lcTempFile)
ENDFUNC
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / SET BELL и включенные в проект *.wav = ? / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]