안녕하세요.
역시나 근본없는 초보라 그런지 생각치도 못했던 부분이 문제가 되네요.
음... 현재 델파이 2007을 사용 중이고 DB는 파이어버드 2.0을 쓰고 있습니다.
구체적인 상황은,
A폼에서 먼저 [입력]을 누르면 Memo 컨트롤이 있는 B폼이 뜨고
Memo 컨트롤 안에 내용을 입력하고 [저장] 버튼을 누르면 DB에 저장되면서 (쿼리 insert into) B폼이 닫히고 다시 A폼으로 돌아옵니다.
A폼에서 [보기]를 누르면 다시 B폼이 뜨면서 전에 작성했던 내용이 보여줘야 하는데,
입력때는
aaaaa
bbbbb
cccccc
였던 내용이 보기를 하니
aaaaabbbbbccccc
요렇게 나오더라고요.
<!--CodeS-->
var
i : Integer;
strMemo : String;
// Memo의 내용을 String에 저장하는 부분입니다.
for i := 0 to Memo1.Lines.Count - 1 do
begin
if i=0 then
begin
strMemo := Memo1.Lines.Strings[i];
end
else
begin
strMemo := strMemo + Memo1.Lines.Strings[i];
end;
end;
// 쿼리문로 DB에 저장하는 부분입니다.
Close;
SQL.Clear;
SQL.Add('Insert into TBL_Test ');
SQL.Add('(vchMemo) ');
SQL.Add(' VALUES (' + strMemo + ')' );
ExecSQL;
<!--CodeE-->
그래서 검색을 통해 한 줄이 끝날 때마다 #10#13 이런식으로 다음줄로 넘어가도록 했는데,
메모내용을 나중에 txt로 뽑아내는 부분에서
(작성자|메모)
a1|aaaaabbbbbccccc
b1|dddddeeeeefffff
c1|ggggghhhhhiiiii
요렇게 나오게 하고 싶거든요.
그렇데 #10#13이런식으로 하면
a1|aaaaa
bbbbb
ccccc
b1|ddddd
eeeee
fffff
c1|ggggg
hhhhh
iiiii
요렇게 나와서 요걸 어떻게 해결해야 할 지.... 어렵네요;;
해결방법을 알고 계신분들의 도움을 얻고자 글을 올립니다.
보기 를 할경우엔 줄바꿈이 그대로 보여지고... 검색해서 보여줄땐 줄바꿈이 없이 보여준다는 말씀이신가요?
검색후 보여줄때는 줄바꿈을 제거하셔야겟죠... StringReplace 함수를 참고하세요...
(그리고...메모의 내용을 담을때 굳이 루프로 돌면서 따로 문자열변수에 담을 필요는 없습니다. Memo1.Lines.Text 로 접근하시면 메모장의 내용그대로~ (줄바꿈코드도 같이..) 제어됩니다. )