利用OnDrawItem属性制作菜单或列表的Delphi源码，鼠标放上去的时候，会看到ITEM项多了修饰，像菜单，或者是像按钮，希望对Delphi基础知识不太熟悉的朋友们学习参考。-Making menu or list OnDrawItem attributes Delphi source code, when the mouse is put up, will see ITEM items modified learning reference, like the menu, or friends like button, I hope not too familiar with the basics of Delphi.