问题标签 [tmemo]

我有一个 VCLTMemo控件，每次滚动文本时都需要通知。没有OnScroll事件，滚动消息似乎没有传播到父表单。

知道如何获得通知吗？作为最后的手段，我可​​以放置一个外部TScrollBar并更新TMemo事件OnScroll，但是当我移动光标或滚动鼠标滚轮时我必须保持它们同步TMemo......

如图所示。

图片：带有备忘录的标签

目前，我的 TMEMO 显示一堆不同的数据，如下所示：

数据#1 段落

数据#2 段落

数据#N 段

所以为了避免滚动，我想在第 N 个数字上添加标签。

那么我需要哪些组件以及我应该如何启动该过程？

在（Firemonkey）中添加行TMemo，每行具有不同的颜色？

注意：Firemonkey 没有 RichEdit。

我使用TMemo框而不是TEdit框仅仅是因为多行功能。

我在猜测，我使用.Text属性在运行时分配一个值。但后来我意识到在设计时没有Text属性。相反，我找到了Lines属性。

我检查了这个页面： http: //lazarus-ccr.sourceforge.net/docs/lcl/stdctrls/tmemo.html了解更多信息。

我发现该文档中没有Text属性，而只有Lines属性。

我对.Text的使用是正确的还是使用它有问题？

这是我的代码：

txtSaveName : TMemo

dlgSave : TSaveDialog

感谢您的任何意见。

我有一个备忘录，里面有很多“芒果”行，我想计算它找到文本“芒果”的次数。

但是，例如，如果它找到六个“芒果”条目，结果将是这样的：

我怎么能得到结果只有 6？

我有两行文字的备忘录，比如

我想在同一行中获得“：” - 一个在另一个下方，例如

我使用delphi和代码。

我尝试使用SetLength，但现在不知道如何使用。

我编写了一个自定义的 TMemo，但注意到文本与边框相撞，根本没有填充。虽然我可以尝试通过抵消它等来解决 ClientRect 内部的问题，但在现阶段这不是一个非常优雅的解决方案。TMemo 至少有 1px 的填充，不属于客户区域，所以我想我会尝试做同样的事情（我假设这就是他们所做的）。

所以我已经使用 WM_NCCALCSIZE 缩小了客户区，但是当然边界没有完全绘制，所以我也必须实现 WM_NCPAINT。这样可行。我现在绘制一个 clBlack 边框，然后是 clWindow 的填充矩形。到目前为止，一切都很好。

在 XP（经典风格）上，但是 1px 边框看起来有点奇怪，所以我想也许有一种方法可以绘制旧的“客户端边缘”边框，并且还符合 XP/Vista/Win7 主题客户端边缘外观（我没有不知道如何使用渐变手动绘制）。

这就是我有点卡住的地方。有谁知道如何以我可以进行填充的方式绘制边框，以及如何保持适当的“客户端边缘”外观（1px 或 2px）？

非常感激。;)

（当然也欢迎其他方法）

=====

编辑： 经过一番修修补补，我想出了以下解决方案。我以为我会把它贴在这里。

编辑： 啊！当有滚动条在播放时，上面的这些东西就会崩溃。我还没有解决方案。有什么建议么？

我使用下面的代码（尝试了所有 2 种方法）将用 Winword 制作的 UTF8 文件读入 Tmemo。该文件包含 IPA 发音字符。对于这些字符，我只看到正方形。我尝试了不同版本的 tmemo.font.charset，但没有帮助。

我能做些什么？

彼得

我有这样的输出：

1
2
3
4

5
6
7
8

9
10
11
12

但我需要像这样的输出：

1,2,3,4
5,6,7,8
9,10,11,12

如何在 C++ Builder 中做到这一点？我有备忘录 1 或列表框。我需要格式化输出。

如何在我的 Delphi 应用程序中自动打开自定义扩展？我正在尝试制作加载文本文件但扩展名不同的应用程序。

示例：Text.DZ| 我想要的只是当我单击带有.DZ扩展名的文件时，它会自动打开我的应用程序并将里面的文本加载到memo1.lines.text.

我知道我必须注册我的新自定义扩展，但我不知道如何去做并将文本加载到我的应用程序中。

此外，如果您可以包含一个很棒的源代码示例。

任何帮助都感激不尽 ！很抱歉我的新手和糟糕的英语解释，但我希望你们能理解我（^-^）/。