delphi如何实现网页内容另存为文本文件
就像IE里的文件--另存为文本文件，不是查看 里 的 源文件
idhttp -----get
然后保存为文件即可
LS的方法得到的是包含HTML代码的文件,
给你的方法就是先用1楼的方法获得文件后,在把HTML标志替换或去掉就可以了
IE里的查看源文件是含有代码的文件，IE的另存为文本文件，得到的是不含代码的纯文本文件，而且二者的结果是不同的，另存的文件里含有的内容，在源文件里是没有的
自己再写段代码将标识清除即可嘛，都懒到这程度了
var vHandle: THandle;
begin
vHandle :=webbrowser1.Handle;
vHandle := FindWindowEx(vHandle, 0, 'Shell DocObject View', nil);
vHandle := FindWindowEx(vHandle, 0, 'Internet Explorer_Server', nil);
SendMessage(vHandle, WM_COMMAND, 71, Handle);
然后在页面中选择txt类型保存即可。
人人有份，结贴结贴结贴结贴结贴结贴
相关问答：
返回的内容是如下代码,怎么能渠道2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......
一般都是怎么接活的？
收入怎么样
sohu？soho？
sohu 可能是small office house unit
小办公室，把家变成单位。
去威客网啊,很多个呢,还有外包的网站
学习学习。
现在Delphi做东西不行了,处于淘汰状 ......
大家好：
我目前要开发一个ERP中的BOM工时汇总程序，在ORACLE中，BOM表的结构是传统的 父件 子件 式的，工时在另一个表中，可以用left outer join来关联，可以认为，关联后的表结构为 [父件] [ ......
select * from shuju.DB where 开盘价-收盘价<=0.02
开盘价 与收盘价 是数据库里的字段
select * from aTableName where ((开盘价-收盘价) <=0.02 )
开盘价比收盘价低两分以下的情况
Mark!!!!!!
se ......
