CWAPI - Charlie Wang API

 分类:Delphi Tips

随意记录的一些代码片段,方便自己存取

Delphi MessageBox

Delphi MessageBox
MessageBox对话框是比较常用的一个信息对话框,其不仅能够定义显示的信息内容、信息提示图标,而且可以定义按钮组合及对话框的标题,是一个功能齐全的信息对话框信息提示图标,而且可以定义按钮组合及对话框的标题,是一个功能齐全的信息对框。  1、函数原...

Charlie Wang 4年前 (2015-03-05)

Delphi 遍历控件 遍历组件

Delphi 遍历控件 遍历组件
特别在动态创建控件时,有时经常需要遍历控件。 如果知道控件名称,则可以通过FindComponent – 查找(定位)组件,如果不知道的话,只能遍历控件了。 遍历一个Panel上的所有控件: Var i: integer; begin ...

Charlie Wang 4年前 (2015-02-11)

Delphi 截屏控件

Delphi 截屏控件
unit ALScreenSnap; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ShellAPI; ...

Charlie Wang 4年前 (2015-01-31)

Delphi 发送邮件 通过Office Outlook

Delphi 发送邮件 通过Office Outlook
网上搜到的Delphi邮件发送系统,绝大多数是使用SMTP协议来发送。 但是事实上它们已经过时了,大多数邮件服务器已经屏蔽了Delphi Indy的邮件发送,从而导致Delphi发送不成功。 事实上,让Delphi通过Outlook.Application来发送邮...

Charlie Wang 4年前 (2015-01-30)

Delphi TreeView – 自动给标题上加图片

Delphi TreeView – 自动给标题上加图片
当处理完TreeView控件树形结构的数据后,根据不同的树形节点Level,加上不同的图片。 图片的ImageList已经放置好,并且TreeView的Images已经连上带有图片的ImageList。 除了手动添加图片外,还可以通过代码,根据判断不同Le...

Charlie Wang 4年前 (2015-01-29)

Delphi TreeView – 自动展开树形结构

Delphi TreeView – 自动展开树形结构
当处理完TreeView控件树形结构的数据后,需要默认自动全部展开,可以用到TreeView的Expanded属性。 var icount : integer; begin RzTreeView1.Items.EndUpdate; //示例中用的是R...

Charlie Wang 4年前 (2015-01-29)