procedure Tfrmmain.TrackBar1Change(Sender: TObject); // 调节音量
var
t,v:Longint;
begin
t:=TrackBar1.Position;
v:=(t shl 8)or(t shl 24);
waveOutSetVolume(0,v);
end;
var
t,v:Longint;
begin
t:=TrackBar1.Position;
v:=(t shl 8)or(t shl 24);
waveOutSetVolume(0,v);
end;
解决方案 »
- 连接串使用udl文件是不是不安全,程序发布打包时udl一般放在什么地方比较安全?
- 再次发贴,我就不信没有人遇到过ado下视图的更新问题。
- …………请教各位:Delphi编写的应用程序服务器(MIDAS)和VC编的Client连接方面吗?……
- 关于局域网ip的问题
- 考勤管理指什么?
- 急:表中有自动增加的字段,用ClientDataSet怎样能一次性增加多条记录到数据库中啊??谢谢!
- 报这个错是什么意思?
- 一个小秘密,你一定不会后悔。
- 我都要崩溃了!
- up有分,请各位mis系统的高手谈一谈自己设计库存表结构的经验,又优点也就有缺点,希望大家共同探讨,共同进步
- 请问文本的不可逆加解密的现成算法下载或是控件dll下载?
- 有关数据库安全的问题
第一个问题有人知道吗??
第一个问题有人知道吗??
有人知道第一个问题吗?