随笔分类 - Delphi-Controls开发
摘要：写给觉得自己编写Delphi很复杂的人，包括自己。 Delphi自己写控件其实并不难，难的在于开发复杂的控件。（其实，编程，很多东西都是会了就不难，因此，我怕自己日后觉得自己写控件很难，特意在这记录自己写控件的过程，顺便也写下接口的使用） 第一步：控件代码： 下面是控件的一个Unit内容： unit
阅读全文
摘要：转载过来的，文章出自： http://www.delphifans.com/infoview/Article_3640.html { 修改者：ghs 日期：20071218 功能：在原版本的基础上增加。 RegisterControl：注册需要提示的控件。 BeginHelp：设置光标状态为帮助cr
阅读全文
摘要：主要是觉得在单输入的情况下, 原来InputQuery输入框左边的文本太难看了...... http://www.cnblogs.com/hs-kill/p/4707744.html
阅读全文
摘要：ddddd
阅读全文
摘要：知识点1：堆和栈 每个应用程序可以获得的内存空间分为两种：堆（heap）和栈（stack）。 堆又称为“自由存储区”，其中的内存空间的分配与释放是必须由程序员来控制的。例如，用GetMem函数获取了一定大小的内存空间，则在使用完后，必须调用FreeMem函数将空间释放，否则就会发生所谓的“内存泄漏”
阅读全文
摘要：Friday, May 13, 2016 Some weeks ago, we released the TMS FNC UI Pack, a set of Framework Neutral Components (FNC), i.e. UI controls that can be used f
阅读全文
摘要：相信没有什么人对 MEMO 陌生了吧。尽管其组件的功能不错。但是，对它进行一些功能的改进，可以更好的使用。 有的时候，我们想要知道，当前的坐标是什么？甚至，想要在 滚动条滚动时触发一些事件。 但，TMemo 本身并没有这样的功能。那我们就要扩展它； 那我们现在就来作： file -> new ->
阅读全文
摘要：XPMenu是一个不错的程序界面效果控件，但它也存在不少不足之处。我最近又对它作了一点修改。 原因是我在程序里有一个ToolButton，其Style=tbsButton，当Down=True时，XPMenu绘制的效果效果跟Down=False时一样，也就是说根本看不出它是按下的。当把Style改为
阅读全文
摘要：ListBox显示即时提示（Tips） Listbox内容太长时超出Listbox宽度的部分将无法显示，一种解决方法是让Listbox产生横向滚动条，滚动显示内容（见前面的《发掘ListBox的潜力（一）：自动调整横向滚动条宽度 》），另一种方法是让Listbox以Tips的方法显示完整内容。本文要
阅读全文
摘要：效果见右图，OfficeXP里就是这样的风格，其实实现很简单，不必专门在网上找别人控件。 把StatusBar的SimplePanel设为False，点击Panels添加StatusPanel，把所有StatusPanel的Bevel设为pbNone、Style设为psOwnerDraw因为我们要自
阅读全文
摘要：这是以前写的代码，自绘XP风格的菜单，硬盘坏了后以为没了，最后写的一个软件要自定义风格，“翻箱倒柜”的终于在我可爱的古董机^_^上找到了一个应用的例子。还是把它放到Blog上来，即可共享又可作为备用 :) 把主菜单的OnMeasureItem指向MeasureMainItem、OnAdvancedD
阅读全文
摘要：鼠标拖放插入点提示 鼠标拖放是Windows常见的操作，比如拷贝文件就可用拖放方式进行。在我们编写的应用程序中，有时为了方便用户操作需要支持鼠标拖放。对于大部分的VCL控件只要鼠标将DragMode设为dmAutomatic，就可以在OnDragDrop、OnDragOver和OnEndDrag中处
阅读全文
摘要：《自绘ListBox的两种效果》一文帖出之后，从反馈信息来看，大家对这种小技巧还是很认同。接下来我将继续围绕ListBox写一系列的文章，进一步发掘ListBox的潜力，其中包括：自动调整横向滚动条宽度、即时提示（Tips）、拖放插入点提示等，并在最后制作一个在滚动区内的ListBox组。 自动调整
阅读全文
摘要：本文利用Listbox自绘实现了两种特殊效果（见图），左边的风格是自己突然灵感触发想到的，右边的风格来自＂C++ Builder 研究＂的一个帖子，老妖用BCB实现了，这里则用Delphi实现它。演示图片：// unit DrawListItem; interface uses Windows, M
阅读全文
摘要：http://blog.csdn.net/aroc_lo/article/details/3070530 http://www.fx114.net/qa-183-149306.aspx
阅读全文
摘要：其实很简单： 转自http://www.delphi3000.com/articles/article_1050.asp?SK= 稍微分析一下，inherited WndProc(Message)会导致执行： 即告诉父控件，有鼠标移入了。但是TWinControl没有CM_MOUSEENTER消息函
阅读全文
摘要：HWND hIpEdit; void __fastcall TForm2::FormCreate(TObject *Sender) { hIpEdit = CreateWindow(WC_IPADDRESS, NULL, WS_CHILD | WS_VISIBLE, 10, 10, 135, 47,
阅读全文
摘要：将下面的代码拷贝到一个单元中,创建一个包,加入这个单元后安装.使用的时候设置好背景颜色,边框颜色,图标(png格式)相对路径的文件名称.这个控件可以利用PNG图像的颜色透明特性,背景色默认透明度为50%,可以将按钮后面的内容显示出来.GDIPAPI, GDIPOBJ, GDIPUTIL三个单元可用万
阅读全文
摘要：最近需要用一个IP输入控件，网上找了几个，都不符合效果，有些还有一些奇怪的Bug。后来发现原来系统已经提供了IP地址编辑控件，只是系统提供的控件不能设置只读效果。网上找了下资料，封装了一下，自己迂回一下实现了只读效果。 源码下载 [delphi] view plain copy print? uni
阅读全文
摘要：由于TFlowPanel中没有设置滚动条的相关属性。所以我们只好另辟溪径。再加一个tscrollbox来实现。 具体操作如下： 1，先添加一个Tscrollbox,设置其align为alclient。autosize默认为false,不用改动。 2,在其中添加一个tflowpanel,设置align
阅读全文