delphiÖÐWEBBrowserÍøÒ³JSº¯Êýµ÷ÓÃdelphiº¯Êý
1.1¡¢¼¤»î
var doc,url:Olevariant ;
begin
url:='about:blank' ;//»òÕßÒ»¸öÓÐʵ¼ÊÒâÒåµÄurl
WebBrowser1.Navigate2(url);//ÕâÑù¾Í¼¤»îÁË£¡
end;
1.2¡¢Ð´HTML´úÂë
var doc:Olevariant ;
s:string;
begin
doc:=WebBrowser1.Document;
doc.clear;//Çå³þÔµÓÉÄÚÈÝ£¬ÒÔ±ãдÐÂÄÚÈÝ
doc.write('<html>');
//ÆäËü´úÂë
doc.write('</html>');
doc.close;//ÕâÑù¾ÍÉúЧÁË£¡
end;
1.3¡¢»ñµÃHTMLÎı¾
var doc:Olevariant ;
s:string;
begin
doc:=WebBrowser1.Document;
s:=doc.documentElement.outerHTML;//sÀï¾ÍÊÇHTMLÎı¾ÁË
//´¦Àís¾ÍÐÐÁË
end;
2¡¢Öм¶²Ù×÷
2.1¡¢»ñµÃÆäÖÐHTMLÔªËØµÄÖµ
var doc:olevariant;
s:string;
begin
doc:=WebBrowser1.Document;
s:=doc.all.btn.value;
end;
2.2¡¢¸ÄдÆäÖÐHTMLÔªËØµÄÖµ
var doc:olevariant;
begin
doc:=WebBrowser1.Document;
doc.all.btn.value:='123123';
end;
3¡¢¸ß¼¶²Ù×÷
3.1¡¢´¥·¢ÆäÖÐHTMLÔªËØµÄʼþ
var doc:olevariant;
begin
doc:=WebBrowser1.Document;
doc.all.btn.onclick;
end;
3.2¡¢ÈÃÆäÖеÄÔªËØÖ´ÐÐwebbrowserÖ®ÍâµÄdelphi´úÂë
±¾À´£¬ÕâÓкܸ´ÔӵĽâ¾ö°ì·¨£¬µ«ÄDz¿·ÖÊôÓÚATLµÄ֪ʶ±È½ÏÄÑÕÆÎÕ£¬Òò´ËÈÆÁËһϣº
ÈÃÄÇЩÐèÒªÖ´ÐÐdelphiµÄHTMLÔªËØ£¬µ÷ÓÃÒ»¸öº¯Êý½Ð×ötriggerExEvent£¬²ÎÊýÊÇHTMLÔªËØµÄÃû³Æ£¬È»ºóÊÇÈô¸É²ÎÊý¡£
triggerExEventÊÇjavascriptº¯Êý£¬Óв»È·¶¨¸ö²ÎÊý£¬µ«µÚÒ»¸ö¿Ï¶¨ÊDZíÊ¾ÔªËØµÄÃû³Æ¡£ triggerExEvent½«²ÎÊý×é³É×Ö·û´®£¬È»ºóÇ°Ãæ¹ÚÒÔ"#OnTriggerExEvent:"£¬×÷Ϊurl£¬È»ºóµ¼º½¡£
ÔÚwebbrowserµÄonNavigator2ʼþÀÅжÏurlÖÐÊÇ·ñ°üº¬"#OnTriggerExEvent:"£¬Èç¹û°üº¬Ôõ×÷ÈçÏ´¦Àí£º
a¡¢cancelÕâ´Îµ¼º½£»b¡¢½«"#OnTriggerExEvent:"Ö®ºóµÄÐÅÏ¢½ØÈ¡£¬×÷Ϊ²ÎÊý´«µÝ¸øwebbrowserµÄÐÂÔöÒ»¸öʼþOnTriggerExEventʼþ£¬Æä²ÎÊýÓÐÁ½¸ö£º1¡¢¿Ø¼þÃû³Æ£»2¡¢Ò»¸ö×Ö·û´®²ÎÊý¡£
ÕâÑù£¬Óû§¿ÉÒÔÔÚOnTriggerExEventʼþÀï´¦ÀíHTMLµÄµã»÷µÈʼþÁË
ÀýÈ磬ÎÒΪwebbrowserÅÉÉúÐÂÀ࣬½Ð×öwebbrowserEx£¬ËüÓÐÒ»¸öʼþ½Ð×öOnTriggerExEvent
ÓиöjsÎļþ°üº¬ÕâÑùµÄº¯Êý£º
function triggerExEvent(cmpnt_id,event_nm,optionstr)
{url='#triggerExEvent:id=';
url=url+cmpnt_id+';eventnm='+event_nm;
if(optionstr) url=url+';params=optionstr';
location=url;}
ÔÚHTMLÎı¾Àï¿ÉÒÔÕâÑùд£º
<input type="button" name="Submit" value=
Ïà¹ØÎĵµ£º
Delphi ActiveX FormµÄʹÓÃʵÀý
By knityster
1. ActiveX¿Ø¼þ¼ò½é
ActiveX¿Ø¼þÒ²¾ÍÊÇÒ»°ãËù˵µÄOCX¿Ø¼þ£¬ËüÊÇActiveX¼¼ÊõµÄÒ»²¿·Ö¡£
ActiveX¿Ø¼þ¿ÉÒÔ±»¼¯³Éµ½ºÜ¶àÖ§³ÖActiveXµÄÓ¦Óõ±ÖÐÈ¥£¬»òÕßÖ±½ÓÓÃÀ´À©Õ¹Ó¦ÓõŦÄÜ£¬ÕâЩ֧³ÖActiveXµÄÓ¦ÓðüÀ¨C++ Builder¡¢Delphi¡¢Visual dBASE¡¢ Visual Basic¡¢Visual C++¡ ......
ǰÑÔ
¾¡ÈýÄêÀ´£¬±¾ÈËÂ½ÐøÐ´ÁËÁùÊ®¶àƪBOLOÎÄÕ£¬ÆäÖоø´ó²¿·ÖÊÇÓйØÍ¼Ïñ´¦ÀíµÄ£¬Òò´Ë£¬ÓÐÈËÏ·³ÆÎÒΪͼÏñ´¦Àíר¼Ò£¨»òGDI+ר¼Ò£©£¬´ËÏ·³Æµ±È»ÊǶÔÎÒµÄÔÞÑµ«ÎÒ×Ô¼ºÈ´¾õµÃÂÔº¬Ò»Ë¿Ë¿±áÒ壬¼´³ýÁËͼÏñ´¦Àí£¬±ðµÄ·½Ã棨ÈçÍøÂç¡¢Êý¾Ý¿âµÈ£©¶¼²»Õ¦µÄ£¬ÊÂʵҲȷʵÈç´Ë¡£
ÎÒÊÇÒ»Ãû»ú¹Ø¹¤ ......
±¾ÎÄÀ´×ÔCSDN²©¿Í£¬×ªÔØÇë±êÃ÷³ö´¦£ºhttp://blog.csdn.net/maozefa/archive/2009/10/28/4737584.aspx
ͼÏñËõ·ÅÊÇ×î³£ÓõÄͼÏñ´¦Àí£¬ÔÚͼÏñÀÉìºÍÈ¡µÃͼÏñÂÔͼÖж¼ÒªÓõ½¡£Í¼ÏñËõ·ÅÖÊÁ¿µÄºÃ»µÓëͼÏñÏñËØ²åÖµ·½Ê½Óйأ¬±¾Î͍ÒåÁ˳£ÓõÄ3ÖÖ²åÖµ·½Ê½£¬¼´ÁÙ½ü²åÖµ¡¢ÏßÐÔ²åÖµºÍË«Á¢·½²åÖµ·½Ê½£º
view plaincopy to clipboardpr ......
ͼÏñËõ·ÅÊÇ×î³£ÓõÄͼÏñ´¦Àí£¬ÔÚͼÏñÀÉìºÍÈ¡µÃͼÏñÂÔͼÖж¼ÒªÓõ½¡£Í¼ÏñËõ·ÅÖÊÁ¿µÄºÃ»µÓëͼÏñÏñËØ²åÖµ·½Ê½Óйأ¬±¾Î͍ÒåÁ˳£ÓõÄ3ÖÖ²åÖµ·½Ê½£¬¼´ÁÙ½ü²åÖµ¡¢ÏßÐÔ²åÖµºÍË«Á¢·½²åÖµ·½Ê½£º
type
// ²åÖµ·½Ê½: ȱʡ(ÏßÐÔ²åÖµ)£¬ÁÙ½ü£¬ÏßÐÔ£¬Ë«Á¢·½
TInterpolateMode = (imDefault, imNear, imBiline ......
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, OleCtrls, SHDocVw;
t ......