06 2013 档案

摘要://转换 TColor 到 HTML 颜色串 function ColorToHtml(color:TColor):string; var RgbColor : TColorRef; begin RgbColor := ColorToRGB(color); Result:=Format('#%.2x 阅读全文
posted @ 2013-06-29 12:28 XE2011 阅读(273) 评论(0) 推荐(0) 编辑
摘要:Delphi QQ表情的实现QQ表情描述蓝框提示信息鼠标在这个表情上面 这个表情才动可以增加表情表情打包单击这个表情插入表情 关闭本窗体 主要使用Webbrowsr来实现的--------------------------------------------------------------------------------//调用过程unit Unit1;interfaceusesWinapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,Vcl.Cont 阅读全文
posted @ 2013-06-22 12:39 XE2011 阅读(615) 评论(0) 推荐(0) 编辑
摘要:Delphi WebBrowser控件的使用 WebBrowser控件属性:1、Application 如果该对象有效,则返回掌管WebBrowser控件的应用程序实现的自动化对象(IDispatch)。如果在宿主对象中自动化对象无效,程序将返回WebBrowser控件的自动化对象2、Parent 阅读全文
posted @ 2013-06-19 20:15 XE2011 阅读(3939) 评论(4) 推荐(1) 编辑
摘要:在一个 LISTBOX 中显示所见所得字体 这个方法设置Combobox同样有效ComboboxFont具有不同字体的列表框unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ComCtrls, ExtCtrls;ty... 阅读全文
posted @ 2013-06-19 20:13 XE2011 阅读(237) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示