【结贴】预览时邮件内容不能自动换行**

hero419 · 发表于 2008-1-17 16:49:01

http://bbs.justep.com/forum.php?mod=viewthread&tid=20249
现在升级到2918了，这个代码应该如何修改呢，谢谢。
. .
. .

lixy · 发表于 2008-1-17 17:32:22

http://www.80diy.com/home/20041225/10/3675176.html

hero419 · 发表于 2008-1-18 09:02:49

好像是要这样做：
如果你用Navigate来浏览txt文件，是能自动换行的。
你可以用.write('<pre>' + 'TXT文件内容' + '</pre>');
这样的显示换行的文本。
还可以将 txt 中的 #13#10 换成 '<br>'Top

但具体怎么搞我就不会了，没搞过这个～～
. .
. .

lixy · 发表于 2008-1-18 09:10:46

这个不太好弄的。

最好让客户自己打上回车。
在编辑框因为是自动换行的，其实是没有回车符的。

hero419 · 发表于 2008-1-18 09:16:26

或者是让客户再使用HTML格式发邮件，对么？
. .
. .

lixy · 发表于 2008-1-18 09:18:14

只要有真回车，webbrowser显示是能回车的。只是他本身好像没自动换行的功能。
html更好了：）

hero419 · 发表于 2008-1-18 09:28:48

我知道了，谢谢，不知道平台能不能考虑换个控件来表现邮件详细，为什么没有和邮件编辑窗体的一致呢？
. .
. .

lixy · 发表于 2008-1-18 09:40:06

目前计划里没这个内容。

hero419 · 发表于 2008-1-18 09:53:20

那这样吧，能不能告诉我如何修改，让编辑邮件时默认是HTML状态，现在默认的是文本。
. .
. .

lixy · 发表于 2008-1-18 11:07:25

最初由 hero419 发布
[B]那这样吧，能不能告诉我如何修改，让编辑邮件时默认是HTML状态，现在默认的是文本。
. ..

以下省略...... [/B]

业务模型\协同系统\个人事务\邮件库\邮件编辑窗体
修改成这样
procedure TMAILEDITFORM.FormShow(Sender: TObject);
begin
  if msgMail.ContentType = '' then
//设置默认为html格式
   msgMail.ContentFormatType:=  TContentFormatType.ftHTML ;
  //  msgMail.DefaultContentType;

  RefreshEdit;
  RefreshMessage;
  if not ReadOnly then
  begin
DoRefreshAccountNames;
DoRefreshMenuByAccountNames;
  end;
end;

		自动登录	找回密码
密码			立即注册