摘要: 1.引用 MSHtml单元2.procedure TForm1.btn2Click(Sender: TObject);var str:string;begin str:='<body>bbbbbbbbbb</body>'; //从数据库中查到的网页代码,HTML格式 ihtmldocument2(wb1.Document).body.innerHTML:=str; //直接赋值end; 阅读全文
posted @ 2011-03-04 18:08 iclotus 阅读(492) 评论(0) 推荐(1) 编辑