DHTMLEdit1到文本怎样自动换行(100分)

  • 主题发起人 wxy_xiaoyan
  • 开始时间
W

wxy_xiaoyan

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button1Click(Sender: TObject);
begin

DHTMLEdit1.LoadURL('D:/a.txt');
//没有自动换行,怎样自动换行
end;
 
在问下,WebBrowser1怎么进入编辑模式,可以输入的
 
第二次刷新
 
加char 13就自动换行了
 
怎样的加char 13
 
第三次刷新
欢迎大家来讨论
 
begin

edit1.text := '加入换行服的位置'+#13+#10+'其他内容'
end
 
有没有其他方法,这个方法感觉不够完善,
 
WebBrowser1怎么进入可以输入的编辑模式这个问题也可以讨论
 
第四次刷新
 
第五次刷新
 
第五次刷新
 
第六次刷新
注意来讨论者有分
 
好像不能自动换行必须通过代码实现
 
to:cnzhw007
谢谢你的留言


我决定在这个月底把分 分掉

欢迎大家发言!!!
 
如果你的文本本身有就换行,你转成DHTMLEDIT也同样换了行呀
DHTMLEDIT.DOM.BODY.InnerText := TextEdit.Lines.Text;
但是如果由DHTMLEDIT转换成TEXT就有可能会丢失些数据,转换如下:
TextEdit.Lines.Text := DHtmlEdit.DOM.body.innerText;
 
to:proLove
答案基本接受
 

Similar threads

回复
0
查看
701
不得闲
回复
0
查看
886
不得闲
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
S
回复
0
查看
962
SUNSTONE的Delphi笔记
S
顶部