-
幸福是什么
Nov012008
-
干掉360主进程和360保险箱
Oct162008
-
原创诗句:闻桂香
Oct112008
-
80后的终级回忆录,我的回忆录
Oct102008
-
搞笑flash:小破孩的裤衩爱情
Oct102008
-
Spy-Net 0.4 奇风汉化版
Oct092008
-
让Real Player从你的电脑走开
Oct072008近自己用VB编写一个播放RM格式的影音文件播放器,打包后,兴冲冲的拿到朋友那去,结果老是报告“超出内存”。我倒!原来朋友的机器上没有装上Real Player,大跌脸面!急忙到网上查找关于Real Player的文章,结果一无所获! 看来只有俺亲自动手了!后来经过俺几天N2次的安装和卸载,外加方便面与白开水!终于让Real P ...
阅读全文作者:奇风 | 分类:设计代码 | 阅读:331 views | 标签:Real Player
-
delphi:QQ自动发消息源码
Oct072008这里面有的到窗口句柄,输入框句柄和按钮句柄的方法! 你可以结合使用的到你想的到的功能! 这是一个qq自动发送的功能,你看看,应该有点用吧!:) [code] procedure TForm1.Button1Click(Sender: TObject); var hParent,hButton,hMemo: HWND; begin Memo1.CopyToClipboard;//把Memo中选中的语句拷贝到剪贴板中 try //找发送消息的QQ窗口 hParent := FindWindow(nil, ‘发送消息’); //然后找回话时用的编辑窗口,Point函数用于返回一个TPoint类型变量 hMemo := ChildWindowFromPointEx(hParent, Point(50, 100), CWP_ALL); //找到“送讯息”按钮的句柄 hButton := FindWindowEx(hParent,0,nil,’送讯息(&S)’); if (hParent = 0) or (hMemo = 0) or (hButton = 0) then MessageBox(Handle,’没有找到发送窗口,请重试!’,’错误’,MB_ICONWARNING) else begin //向发送消息中的回话编辑框发送粘贴消息 SendMessage(hMemo,WM_PASTE,0,0); //向“送讯息”按钮送单击消息以模仿按键发送回话 SendMessage(hButton,BM_CLICK,0,0); end; except //如果发生以外错误给出提示
阅读全文
-
Shockwaveflash 资料收集1
Oct072008AlignMode(int型)和SAlign(WideString型) 控制动画的显示位置(把这两个属性列在一起说明它们是相互 关联的,改变一个另一个也会相应地改变,以下类似)。取值范围及含义如下: 0 空 当前位置 1 L 当前位置靠左 2 R 当前位置靠右 3 LR 当前位置居中 4 T 当前位置靠上 5 LT 左上 6 TR 右上 7 LTR 上方居中 8 B 当前位置靠下 9 LB 左下 10 RB 右下 11 LRB 下方居中 12 TB 当前位置垂直居中 13 LTB 靠左垂直居中 14 TRB 靠右垂直居中 15 LTRB 中央位置 【属性】BackgroundColor(int型)和BGColor(WideString型) 设置背景颜色,BackgroundColor为整 型值,BGColor为它的HEX字符串。 【属性】Loop(bool型) 是否循环显示 【属性】Menu(bool型) 是否显示右键菜单,建议设为true,因为它可以完成对Flash动画的大部分控 制工作,而不用我们写代码。 【属性】Movie(WideString型) Flash动画的文件名,可以在运行状态动态设置,要关闭一个动画只 要把它设为空即可。 【属性】Quality(int型)和Quality2(WideString型) 控制动画的显示质量,一般将Quality设为1以获 得高质量的显示效果。 【属性】ScaleMode(int型)和scale(WideString型) 控制动画的显示比例,取值范围及含义如下: 0 ShowAll 显示全部 1 NoBorder 无边框模式 2 ExactFit 拉伸到整个画面 3 空 原始大小 【方法】PercentLoaded 返回动画已经加载的百分比,你可以建立一个进程条(ProgressBar)来显示 动画加载的进程。
阅读全文
-
心理自我调节法
Sep242008放松自己,放松自己,放松自己。无法诠释自己这几天急噪什么,睡个觉也老是几次被吵醒。恨不得想杀人!放送,克制,于是起来就跑大街上大喊了几声,一口气跑了很远。决定,早睡早起,善待自己。以前我只知道珍惜别人就会有回报,现在珍惜自己就是给自己的最大回报!!!!!有道难坎我必须一个人去克服!我老哥在8月初就激励我学会减压就是寻找自信。我应当,也必须把自己放在第一位,这不是自私…… [code] 心理自我调节法: 再平坦的道路,也会有坎坷;再顺利的人生,也会有挫折。面对生活学习中遇到的种种挫折,我们应有良好的承受能力。了解一些自我调节的心理学方法,并适时应用,能提高自己的挫折承受能力。调节挫折的心理学方法主要有: 1、 合理宣泄法。人在受挫时,会产生很多负性情绪,这种情绪靠堵是堵不住的,比较好的方法是在合适的场合发泄出来。如出气室宣泄,找一个僻静的角落,对树木、石头发泄或者对着大海山谷大声吼叫。书写宣泄,是通过写信、日记、绘画等形式发泄自己的不满。向人倾诉宣泄,则是把自己的烦恼、愤怒、痛苦等向老师、朋友或亲人一一倾诉或大哭一场,以缓解心理压力。一般说来,受挫时由于负性情绪的干扰,个体容易变得思维狭窄、固执、偏激,缺乏对行为后果的预见性,而通过适度发泄,情绪放松,则认知恢复正常。 2、 注意转移法。即把注意力从消极情绪的事情上转移开来。遇到烦恼苦闷之事,可采取暂时回避的方式,去看电影、电视,听音乐,散步,进行体育运动或做其他有意义的事。这种方法很有效。 3、 反向思维法。当生活中遇到一些挫折或困难时,一味地埋怨和逃避往往只能使自己心情越来越坏,不妨换个角度看问题或通过自我调侃的方式,努力从不利因素中找到有利因素,从而调动自己的积极性。生活中自会有“否极泰来”、“因祸得福”之事。从而使心理达到一种更高层次的平衡。 4、 情志相胜法 中医认为情志具有五行和阴阳属性,七情之间相互制约,可以通过一种情志来克制另一种情志。如喜胜忧,当你情绪忧郁时,有意地制造欢乐气氛可减轻忧愁。 5、 聊天法
阅读全文