13得票3回答
如何让TMemo控件中Ctrl+A自动全选?

在Delphi 7的TMemo控件中,尝试使用键组合Ctrl + A选中所有文本无效(不会选中所有文本)。于是我写了这个过程:procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);...

11得票5回答
能否让TMemo自适应其所包含的文本大小?

在表单设计器中编辑 TLabel 的标题时,它会自动调整 TLabel 的大小。有没有办法让 TMemo 在运行时也做到这一点? 我想能够取一个 TMemo,给其 .lines.text 属性赋值,然后告诉它调整自己的大小并且不超过一定的宽度,但它可以尽可能的高。有人知道如何实现吗?

7得票1回答
在Delphi中向备忘录顶部添加行

在Delphi中,Memo.Lines.Add('Some text')函数可以将字符串添加到Memo的底部。是否有一种函数可以将文本添加到顶部? 例如,如果Memo的Lines属性包含: string 1 string 2 string 3 我想在string 1之前添加一个字符串s...