(*
一般的清空combobox方法 combobox1.clear;
...
combobox9.clear;
*) procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
begin for i:=0 to self.Com...
分类：
其他好文 时间：
2014-07-29 21:43:32
阅读次数：
690
撤销 重做 -
复制 剪切 粘贴 删除 -
全选 不选 ///编辑
///撤销 WebBrowser1.ExecWB(OLECMDID_REDO ,1);
///重做 WebBrowser1.ExecWB(OLECMDID_UNDO ,1);
///-
///复制 WebBrowser1.ExecW...
分类：
其他好文 时间：
2014-07-29 21:43:22
阅读次数：
206
打印
页面设置
打印预览
文档属性 //------------------------------------------------------------------------------procedure WB_Print();beginForm1.WebBrowser1.ExecWB(O...
分类：
其他好文 时间：
2014-07-29 21:42:32
阅读次数：
288
//屏蔽右键菜单procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;var Handled: Boolean);beginwith Msg dobeginif not IsChild(WebBrowser1.Handle, hWnd)...
分类：
其他好文 时间：
2014-07-29 21:42:22
阅读次数：
468
自动滚动到最底端scrollUses MSHTML;{$R *.dfm}varScrollPos: integer=0;procedure TForm1.Button1Click(Sender: TObject);begininc(ScrollPos, 10);if WebBrowser1.Docu...
分类：
其他好文 时间：
2014-07-29 21:42:02
阅读次数：
506
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
