 |
Звук
Это исключительно Visual FoxPro-шная функция.
Своим рождением она обязана, во-первых, тому, что Visual FoxPro работает со
звуковыми файлами и, во-вторых, моей лени писать каждый раз самостоятельный
вызов звукового файла. А так достаточно указать do sound with имя.wav .
Procedure SOUND
Parameter soundF
if file(SoundF)
SET BELL TO &SoundF, 0
?? CHR(7)
SET BELL TO
endif
|
|