刪除備忘錄中的最後一行空白

Question

我搜索谷歌，但似乎無法找到一個工作解決方案。

情況是獨一無二的。我需要在不同時間添加評論。每當我按下F9鍵時，行號將顯示後跟一個冒號「：」char，然後我在行號和光標位置輸入一些註釋。

運行的輸出應該是這樣的：

001: startup time 
002: watched tv 
003: | 

，其中 「|」是運行時的最後一個光標位置，等待我輸入一些文本。

而是，當我運行該程序，然後按F9鍵，我得到這個：

001: 
002: 
003: 
| 

，其中 「|」是運行時的最後一個光標位置，等待我輸入一些文本。

如何刪除備忘錄中的（最後一個）空白行？

Answer 1

Add()在插入的文本後面插入換行符。如果您不想換行符，請改用SelText屬性，例如;

Memo1.SelStart := Memo1.GetTextLen; 
Memo1.SelLength := 0; 
Memo1.SelText := '003: ';