Как посимвольно записывать текст в Memo

[mixael]

такой вопрос-как посимвольно записывать текст в Memo? Append переносит символ на следующую строчку, Memo.strings.add() тоже, так как же тогда записать текст посимвольно в строчку(например в цикле и чтобы переменные не использовать, а напрямую в memo)?

[evg_m]

Мемо.Text
Memo.Lines.Text

[Alex Cones]

Memo1.Text := Memo1.Text + 'S';