1.在Delphi中,设置窗体的AlphaBlend := true;AlphaBlendValue := 0-255; AlphaBlendValue越小窗体的透明度就越高。这种方法将会使窗体和窗体中控件都变成透明。2.在Delphi中,设置TransparentColor := True与Tra Read More
posted @ 2016-02-29 06:08 findumars Views(419) Comments(0) Diggs(0)
如何让DbGrid支持鼠标滚轮滚动 在主窗体上加一个ApplicationEvents控件(控件在Additional面板中), 在它的OnMessage事件中加入下述代码,一切搞定~! procedure TFrm_main_usermanager.ApplicationEvents1Messag Read More
posted @ 2016-02-29 06:00 findumars Views(787) Comments(0) Diggs(0)
http://files.cnblogs.com/files/findumars/huawei_time.rar Read More
posted @ 2016-02-29 05:52 findumars Views(595) Comments(0) Diggs(0)
就在StdCtrls.pas, ExtCtrls.pas和Buttons.pas三个类里研究就够了,这是初步的搜索结果:   Read More
posted @ 2016-02-28 14:35 findumars Views(1851) Comments(0) Diggs(0)
超类化源码: procedure TWinControl.CreateSubClass(var Params: TCreateParams; ControlClassName: PChar); const {CS_OWNDC标志,属于此窗口类的窗口实例都有自己的DC(称为私有DC) } {CS_CL Read More
posted @ 2016-02-28 00:47 findumars Views(2423) Comments(0) Diggs(0)