一行解决----wzs(0分)

---------------------
/ 一 行 解 决 /
---------------------

声明:
以下所提供的方法有些并非解决所有问题,只是希望对大家有所启示!
-----wzs
. 1999/09/25/整理如下:
1.扩展控件新功能(一行搞定!!!!!) 存货
--------------------------------------------------
在编程中 ,我们经常要控制控件的动作,但该控件又没有提供该方法
这时 ,可通过发消息给该控件 ,以达到我们的目的!
如:
button1.perform(wm_keydown,13,0);
listbox1.perform(wm_vscroll,sb_linedown,0);
等等 可少去 重载之苦!!!!!


2.闪烁标题如打印机超时(一行) 存货
--------------------------------------------------
form 放一timer 控件
time 事件 中 写入 ;

flashwindow(application.handle,true);


3.关于FORM背景新解(包含MDI) ( 一行解决问题!!!!) (推荐)
--------------------------------------------------
在Form中添加Image控件
设BMP图象
name为 IMG_BK
在Foem的Create事件中写入
Self.brush.bitmap:=img_bk.picture.bitmap;

4.类似MDI方式新解(一行就行!!!!)
--------------------------------------------------
在要设置child的oncreate方式下写入:
self.parent:='要设置为mainform的Form';

5. 屏幕的Refresh(只需一行!)
--------------------------------------------------
RedrawWindow(0,nil,0,RDW_ERASE or RDW_INVALIDATE or RDW_ALLCHILDREN);
| |
--- ----
handle RGN(可刷新局部屏幕)

6.在标题栏处画VCL控件(一行解决问题!!!)刚发现
--------------------------------------------------
在 form 的onpaint 事件中
控件.pointto(getdc(0),left,top);

thank you

ok!继续努力!
我开始送分了.

hhe,go on go on
到那份杂志发表发表，赚点网费吧

4错误(一行无法解决, 不实用)
其他正确

我现在成了十足的爆发户!!! 一夜上榜!

继续继续，

如何送分wzs?

这几天连不上,想赚点都没法子!

今日,再供献三大条与各位同享!!


7.类似DOS下的CLS指令的WINDOWS指令!
-----------------------------------------
paintdesktop(getdc(0));


8.在桌面上加个VCL控件!(不是画的,不可refresh)
-----------------------------------------
windows.setparent(控件.handle,0);
注: 想放哪都行 (如'开始处状态栏')

9.关于 '类似MDI方式新解(一行就行!!!!)'的修正
------------------------------------------
windows.setparent(self.handle,'要设置为mainform的Form');
注: 用此法, 我们要mdi那么麻烦干吗!!?
to : Another_eYes 不在挑剔了吧! 送分吧!!!!!!!!!!!!

不错不错. 多加努力(精神支持).

很好！很好！
大家有钱的出钱，有力的出力呀！

全力支持，共同献策

恩！好！！好！！！好啊！！！

hehe, 继续努力

好! 分没白给,wzs继续努力.

建议:
大伙有什么藏箱底的,都拿出来吗!
再说好东东也要时擦擦! ,不蓝会忘的!!!

Another_eYes老兄分这么多，怎样只精神支持----替wzs抱不平

if 对我有帮助 then

我加分
else
精神鼓励;

嘿嘿！今天，大家都这么富裕。
谁论文还有什么好东西，都交出来。
国庆了，可不能藏私啊！

我在BCB下试了以下PaintDesktop(GetDC(0));
结果拨我的桌面给搞得支离破碎...