- 博客(2)
- 资源 (3)
- 收藏
- 关注
原创 如何调节系统声音音量
一、调节全部音量 1.先在窗体中添加一个trackbar控件,可通过改变它的位置来调节音量,在trackbar1的属性中,我们把Max属性修改成255(系统的最大音量就是2^8=255),改成这个值是为了便于进行二进制的音量调节操作。 2.为了调用一个Windows函数,在uses子句里加上Mmsystem。 3.为trackbar1的Onchange事件编写如下代码: procedur
2007-08-05 21:25:00 2398 1
原创 获得空闲端口
uses winsock2;//获取一个空闲的端口 function GetFreePort(ABeginPort: Integer; const ATCP: Boolean = false): Integer;var Wsd: TWSAData; S: Integer; SockAddr: TSockAddrIn;begin Result := ABeginPort; if WSAStartup
2007-08-05 03:16:00 1198
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人