memo1.lines.text := memo1.lines.text + 'text';