【结贴】[请求]备忘录提醒声音问题**

tear123456 · 发表于 2008-7-22 11:24:57

求助：备忘录设置了工作提醒，发现提醒的闹钟声音特别小，几乎听不见。即使把系统任务栏的声音调到最大也没用。怎么解决呢？

tear123456 · 发表于 2008-7-22 15:42:23

怎么都没人回答啊？？

lixy · 发表于 2008-7-22 15:44:57

备忘录用的是pc喇叭，所以调节声音没用

tear123456 · 发表于 2008-7-22 15:55:06

晕那不如不用

tear123456 · 发表于 2008-7-22 15:59:22

那怎么改成声卡的声音呢？？？？

lixy · 发表于 2008-7-22 16:20:05

业务模型\协同系统\个人事务\备忘录\备忘提醒对话框
修改这个
procedure TREMINDDIALOG.BizFormShow(Sender: TObject);
const
cDefaultSound = 'sound\notice.wav';
begin
  {if MemoItem.SoundID > 0 then
Beeper.PlayPresetSound(TPresetSound(MemoItem.SoundID - 1))
  else
Borland.Delphi.Windows.MessageBeep($FFFFFFFF);}
  //new
  Borland.Delphi.MMSystem.PlaySound(jsCommon.ModulePath + cDefaultSound, 0,
Borland.Delphi.MMSystem.SND_FILENAME);

  lblContent.Caption := MemoItem.Subject;
  tmRepeat.Time := MemoItem.StartTime;
end;
ps：这样选择声音类型的设置就无效了，只能发出一种声音

tear123456 · 发表于 2008-7-22 17:26:48

这个程序是可以通过声卡发声的吗？

lixy · 发表于 2008-7-22 17:37:39

是的

lixy · 发表于 2008-8-4 17:59:26

楼主请回馈

lixy · 发表于 2008-9-16 11:17:28

长时间未回馈，结贴了

		自动登录	找回密码
密码			立即注册