Jan
10
修改了原版QQ上下线的句柄,支持最新的QQ2008II Beta1 SP1,骚扰好有炫铃最棒了
友情提示:由于本软件过于霸道,请小心使用,被拉黑删除等后果自负.
下载文件 (已下载 101 次)
友情提示:由于本软件过于霸道,请小心使用,被拉黑删除等后果自负.
下载文件 (已下载 101 次)
Jan
10
早上起来，感觉身体什么地方不对劲，头也晕晕乎乎，肚子也咕咕噜噜，连每天必做的清晨搏击操(简称晨博)也没做。应该没啥事情，索性不管他，继续该干啥干啥。
中午睡了一觉，感觉不舒服的感觉越来越厉害，头晕、心慌、流虚汗、肚子疼，一向胆小怕死的我实在忍受不住了，决定去医院一趟。
打车，去了三公里外的中医院(我还是个比较传统的男人，比较相信中医)。到了医院，导医小姐特热情，可劲的让我挂专家号，一问：多钱？回答：20！我用鼻孔发出哼的一声表示我的蔑视：专家？弄一老头穿一白大褂就专家了？我扔出一张五元大钞：来个普通号！
进了门诊，别说，大夫还真热情，甭看是一个二十来岁白白净净的小伙子，看起病来还真是那么一回事，望闻切问，一丝不苟，可等都鼓捣完了，小伙子眉头皱起来了，盯着我看了半天，把我看得都发毛了，心里直哆嗦，自己嘀咕“大夫，有话说话，您别老盯着我看啊，我脸上又没写着
字……”年轻大夫盯了片刻，终于下定决心，拿起电话拨了个号“赵老师，麻烦您来一趟，有个病人……”放下电话，回头对我特客气的笑了笑“您稍等一下，我让我们医院的客座专家赵老师来给您看看”我心里咯噔一下“这是要干吗？难道要黑我钱？”
没等我瞎琢磨完，一个特慈祥的老头推门进来了，年轻大夫赶紧起来让座，老头坐下对我一笑，继续望闻切问，照样一丝不苟。等鼓捣完了，干脆不理我，身子往后一靠，眼睛一闭，眉头一皱，从那里琢磨，年轻大夫赶紧靠上去，刚想说话，老头摆摆手，说“你打电话把钱教授请来。”我心里一惊“黑我钱不用这么大血本吧？难道我真有什么问题？”这么一想，头上的虚汗更厉害了，手心也开始出汗，心跳更加不正常了。
中午睡了一觉，感觉不舒服的感觉越来越厉害，头晕、心慌、流虚汗、肚子疼，一向胆小怕死的我实在忍受不住了，决定去医院一趟。
打车，去了三公里外的中医院(我还是个比较传统的男人，比较相信中医)。到了医院，导医小姐特热情，可劲的让我挂专家号，一问：多钱？回答：20！我用鼻孔发出哼的一声表示我的蔑视：专家？弄一老头穿一白大褂就专家了？我扔出一张五元大钞：来个普通号！
进了门诊，别说，大夫还真热情，甭看是一个二十来岁白白净净的小伙子，看起病来还真是那么一回事，望闻切问，一丝不苟，可等都鼓捣完了，小伙子眉头皱起来了，盯着我看了半天，把我看得都发毛了，心里直哆嗦，自己嘀咕“大夫，有话说话，您别老盯着我看啊，我脸上又没写着
字……”年轻大夫盯了片刻，终于下定决心，拿起电话拨了个号“赵老师，麻烦您来一趟，有个病人……”放下电话，回头对我特客气的笑了笑“您稍等一下，我让我们医院的客座专家赵老师来给您看看”我心里咯噔一下“这是要干吗？难道要黑我钱？”
没等我瞎琢磨完，一个特慈祥的老头推门进来了，年轻大夫赶紧起来让座，老头坐下对我一笑，继续望闻切问，照样一丝不苟。等鼓捣完了，干脆不理我，身子往后一靠，眼睛一闭，眉头一皱，从那里琢磨，年轻大夫赶紧靠上去，刚想说话，老头摆摆手，说“你打电话把钱教授请来。”我心里一惊“黑我钱不用这么大血本吧？难道我真有什么问题？”这么一想，头上的虚汗更厉害了，手心也开始出汗，心跳更加不正常了。
Jan
10
用vb调节系统音量,启动的时候获取音量大小,可调节主音量和波形音量。
下载地址：http://www.brsbox.com/filebox/down/fc/6a71ebe1bf76b2889c75a02a60186130
下载地址：http://www.brsbox.com/filebox/down/fc/6a71ebe1bf76b2889c75a02a60186130
Jan
10
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ActiveX, StdCtrls;
type
TForm1 = class(TForm)
btn1: TButton;
mmo1: TMemo;
lbl1: TLabel;
procedure btn1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
