摘要：
在Delphi中，早期的时候我们没办法建立 像这样的 array of TButton 的组件数组。我们的使用的方法或许是： 利用 Form 的Components属性，这个属性就是Form中所有的组件的数组，通过它来索引组件，显然这是不方 便的： var Index : Integer;begin For Index:=0 to ControlCount-1 do begin if ... 阅读全文
摘要：
var BlendFunc: TBlendFunction;begin BlendFunc.BlendOp := AC_SRC_OVER; BlendFunc.BlendFlags := 0; BlendFunc.SourceConstantAlpha := TrackBar1.Position; if bit.PixelFormat = pf32bit then BlendFun... 阅读全文
摘要：
1. 整条 MainMenu 的背景 Windows 本身有提供API，让我们定制 MainMenu 的背景，那就是通过 SetMenuInfo BOOL SetMenuInfo( HMENU hmenu, LPCMENUINFO lpcmi ); 参数： hmenu , 要自绘的 MainMenu 的 句柄 lpcmi， 指向 MENUINFO 结构体的指针 具体的设置全在 MENUIN... 阅读全文