delphi 保存网页MHTuses ADODB_TLB, CDO_TLB, ComObj,MSHTML;{$R *.dfm}{能把网页如 WWW.QQ.COM保存为一个单文件 .MHT但不能把一个 A.HTM保存为一个单文件 .MHT}procedure WB_SaveAs_MHT(WB: TWe...
分类：
Web程序 时间：
2014-07-29 21:41:13
阅读次数：
432
procedure TForm1.TreeView1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);var Node: TTreeNode;begin with TreeView1 do begin Node := GetN...
分类：
移动开发 时间：
2014-07-29 21:40:42
阅读次数：
393
设置/获取 字体属性 名称 大小 粗体 斜体 下划线 删除线 颜色1 颜色2 uses MSHTML; //设置 //------------------------------------------------------------------------------procedure WB_...
分类：
其他好文 时间：
2014-07-29 21:39:52
阅读次数：
339
///HTML组件///后面的字符串为这个控件的ID号///直线Line(WebBrowser1.Document as IHTMLDocument2).execCommand('InsertHorizontalRule', True, '');///按钮Button(WebBrowser1.Doc...
分类：
Web程序 时间：
2014-07-29 21:39:42
阅读次数：
303
超链接 /取消超链接
插入/取消 书签
插入图片
粘贴图上CTRL+v
截图
插入表情GIF WEB背景色
WEB背景图片 WebBrowser1.OleObject.document.getElementById('bgDiv').currentStyle.BackGroundImage WebB...
分类：
其他好文 时间：
2014-07-29 21:38:42
阅读次数：
247
保存网页. htmluses ActiveX;procedure TForm1.Button1Click(Sender: TObject);varpersist :IPersistfile;beginpersist := (webbrowser1.document as ipersistfile);...
分类：
Web程序 时间：
2014-07-29 21:37:42
阅读次数：
319
一，首先引入“mmsystem”单元。二，启动定时器： var MMTimerID: Integer; // 定时器ID MMTimerID := timeSetEvent(1000, 0, @TimerProc, 0, TIME_PERIODIC);三，定时器过程代码：procedure Tim....
分类：
其他好文 时间：
2014-07-29 21:33:32
阅读次数：
283
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ShellAPI;type TForm1 = class(TF...
分类：
其他好文 时间：
2014-07-29 21:30:52
阅读次数：
224
VCL BitMap Style Proceject Options->Application->Appearance
选择几个样式
使用代码设置 uses Vcl.Themes;procedure TForm1.Button1Click(Sender: TObject);beginTStyleMa...
分类：
其他好文 时间：
2014-07-29 21:29:42
阅读次数：
1013
效果不正确unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) ...
分类：
编程语言 时间：
2014-07-29 21:25:12
阅读次数：
271
