안녕하세요?
엑셀로 자료를 전환중에 있는데요,
Memo컴포넌트에 아래처럼 3줄을 넣어 디비에 저장하였습니다.
줄끝마다 엔터(Enter)를 쳤구요.

안녕하세요이번주에도좋은일만있으시길(엔터)
안녕하세요이번주에도좋은일만있으시길(엔터)
안녕하세요이번주에도좋은일만있으시길

위의 3줄을 엑셀에 보여줄때는 하나의 셀안에 3줄 그대로 보여주고 싶습니다.
아래코드를 이용해 보았지만 맨아래에 보이는 것처럼 여러줄로 보여주고 있습니다.
XL.Cells[1,2]].Value:=StringReplace(FieldByName('sMemo').AsString, Chr(13)+chr(10), chr(10), [rfReplaceAll])) ;  
XL.Columns.AutoFit;

어떻게 하면 엑셀에서도 맨위에 입력한 형태로 보여줄 수 있을까요?
경험있으신 분들의 도움을 부탁드립니다.

안녕하세요
이번주에도
좋은일만있
으시길
안녕하세요
이번주에도
좋은일만있
으시길
안녕하세요
이번주에도
좋은일만있
으시길