CnPack Forum - Powered by Discuz! Board

Subject: CnAAText组件问题，希望高手进来帮我解决下。谢谢！ [Print This Page]

Author: Nashine Time: 2009-3-30 00:11 Subject: CnAAText组件问题，希望高手进来帮我解决下。谢谢！

大家请看下图
上面背景我使用了Image组件，上层为cnAAtext组件
下面我使用的是JvRichEdit组件

我的意思就是 JvRichEdit的文字可以在cnAAtext中显示，这个我是写传奇脚本用的。因为脚本中有些格式需要转换。

但是呢大家帮我看看问题

这是我的测试代码。

procedure TForm1.JvRichEdit1Change(Sender: TObject);
begin
CnAAText1.Text.Lines:= JvRichEdit1.Lines;
end;

Image Attachment: QQ截图未命名.bmp (2009-3-30 00:11, 413.51 K) / Download count 397
http://bbs.cnpack.org/attachment.php?aid=609

Author: Passion Time: 2009-3-30 10:27

请问Delphi是什么版本？
可能是AnsiString与WideString的转换问题。

Author: Nashine Time: 2009-3-30 14:13

我的是D7，如果确实是您说的那个问题，那我应该怎么解决撒？谢谢指教。

Author: Passion Time: 2009-3-30 14:30

没装Jcl，不知JvRichEdit的Lines是啥类型的属性，如果也是TStrings，照理不该这样。
普通的RichEdit是否也有这个问题？

Author: Nashine Time: 2009-3-30 14:35

是JVRichEdit的原因，我用SuiMemo输入时正常。

Author: Passion Time: 2009-3-30 14:37

可能JvRichEdit的Lines这个StringList中存入的是WideString。
你可以这样试一试：

CnAAText1.Text.Lines.Text := string(JvRichEdit1.Lines.Text); // 如果它的Lines有Text属性的话

Author: Nashine Time: 2009-3-30 14:47

依旧有问题，可能真是JV存的是宽字符，但是ＪＶ代码里面我不知道怎么修改.
请高手帮我看下。PAS在附件中。

Attachment: JvRichEdit.rar (2009-3-30 14:47, 42.16 K) / Download count 381
http://bbs.cnpack.org/attachment.php?aid=611

Author: Nashine Time: 2009-3-30 14:58

唉，讨论的太复杂。
老大你有时间看看。
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2111942

Welcome to CnPack Forum (http://bbs.cnpack.org/)