|
1.install microsft Internet controls (activesX)
用 TWebBrowser控件(IE控件) |
|
#2 得分:0回复于: 2000-06-28 10:23:00
D5直接支持。
|
|
|
#3 得分:0回复于: 2000-06-28 15:08:00
用 TWebBrowser控件
var Html : TStringList; Html := TStringList.Create; Html.Add('');//html的第一行。 Html.Add(''); ............... Html.SaveToFile('Temp.htm'); WebBrowser1.OleObject.Navigate('Temp.htm'); Html.Free; //搞定 |
|
#4 得分:0回复于: 2000-06-28 16:00:00
不知道你是不是要在程序中来打开IE,我的一点理解:
调用浏览器访问INTERNET主页函数 function ShellExecute(hWnd: HWND; Operation, FileName, Parameters, Directory: PChar; ShowCmd: Integer): HINST; stdcall; 参数定义: hWnd: 父窗口句柄 Operation: 操作模式 open 或 print FileName: 文件名指针 Parameter: 传递给执行文件的参数 Directory: 缺省目录 ShowCmd: 程序启动后的状态:(1)SW_SHOWNORMAL 正常 (2)SW_MINIMIZE 最小 (3)SW_MAXIMIZE 最大 不考虑错误判断,打开一个WEB页面的例子: ShellExecute(handle, 'open', 'http://www.microsfto.com', nil, nil, SW_SHOWNORMAL); 函数ShellExecute包含在单元ShellAPI中。 |
|
|
#5 得分:0回复于: 2000-06-30 12:59:00
var Html : TStringList;
Html := TStringList.Create; Html.Add('');//html的第一行。 Html.Add(''); ............... Html.SaveToFile('Temp.htm'); WebBrowser1.OleObject.Navigate('Temp.htm'); Html.Free; ////可用于内容是不定的,很好用的:比如: //var strLine : string; //strLine := 'name';//strLine 当然可以是任意的 //Html.Add('你的名字是:'+strLine); //对于固定网页,可以这样用就可以了: WebBrowser1.OleObject.Navigate('http://www.etang.com'); //是不是很爽呀! |
|
#6 得分:0回复于: 2000-06-30 13:16:00
走题一下,对于hf的补充,那种方法的坏处是会冲掉别人browser里面的东西,好处是各种浏览器通杀,但如果一定要开个ie新窗口,可以试下面的方法
var hello:olevirant; begin hello:=createoleobject('internetexplorer.application'); hello.navigate('www.tommy.com'); hello.visible:=true; end; |
|
|
#7 得分:0回复于: 2000-09-10 18:51:00
Delphi5中已经有了一个WebBrowser的控件。它实际上是通过COM来控制IE。
我现在正在写一个用IE的软件,也在研究这方面的东西,希望能和你交流! |
|
#8 得分:0回复于: 2000-09-10 23:46:00
关注
|
|
|
#9 得分:0回复于: 2000-09-11 08:34:00
我有例程,有兴趣的话来信!————wxlzyb@263.net
|
delphi lazarus opengl
网页操作自动化, 图像分析破解,游戏开发
