delphi 如何将memo中的网页源码,代码转成网页方式显示 5
网页的代码已经在memo中了,如何将memo里面的代码再转成网页的方式显示呢?显示在webbrowser里。求大牛指点,拜谢···...
网页的代码已经在memo中了,如何将memo里面的代码再转成网页的方式显示呢?显示在webbrowser里。
求大牛指点,拜谢··· 展开
求大牛指点,拜谢··· 展开
1个回答
展开全部
var
str:string;
icnt:Integer;
begin
mmo1.Lines.Clear;
mmo1.Lines.Add('<html>');
mmo1.Lines.Add('<head>');
mmo1.Lines.Add('<title>我的第一个 HTML 页面</title>');
mmo1.Lines.Add('</head>');
mmo1.Lines.Add('<body>');
mmo1.Lines.Add('<p>body 元素的内容会显示在浏览器中。</p>');
mmo1.Lines.Add('<p>title 元素的内容会显示在浏览器的标题栏中。</p>');
mmo1.Lines.Add('</body>');
mmo1.Lines.Add('</html>');
str:='';
for icnt:=0 to mmo1.Lines.Count-1 do
begin
str:=str+mmo1.Lines[icnt];
end;
wb1.Navigate('about:'+str);
end;
memo里面只限于html,不能有其他的,比如jsp或js。
str:string;
icnt:Integer;
begin
mmo1.Lines.Clear;
mmo1.Lines.Add('<html>');
mmo1.Lines.Add('<head>');
mmo1.Lines.Add('<title>我的第一个 HTML 页面</title>');
mmo1.Lines.Add('</head>');
mmo1.Lines.Add('<body>');
mmo1.Lines.Add('<p>body 元素的内容会显示在浏览器中。</p>');
mmo1.Lines.Add('<p>title 元素的内容会显示在浏览器的标题栏中。</p>');
mmo1.Lines.Add('</body>');
mmo1.Lines.Add('</html>');
str:='';
for icnt:=0 to mmo1.Lines.Count-1 do
begin
str:=str+mmo1.Lines[icnt];
end;
wb1.Navigate('about:'+str);
end;
memo里面只限于html,不能有其他的,比如jsp或js。
追问
但我写入的html中需要调用js 不可以的框架 函数都不能实现了,有什么办法解决吗?
追答
我比较好奇的是,你为什么要这么做,有什么特殊的业务要求么....
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询