리치 에디트에서 아래의 문자열을 읽어왔습니다.

--------------------------------------------------------------------------------

**JUB NO = 0501145 **JUB NAME = 김학만 **JUB JUNO = 0000000000000 **JUB

TYMD = 991231

--------------------------------------------------------------------------------

//실제로 읽어올 문자열

//두줄로 분리되어 있음.

--------------------------------------------------------------------------------

//코드 부분.



with RichEdit1 do

begin

StartPos:=SelStart+SelLength; //시작하는곳 설정



while StartPos < ToEnd do // 시작하는곳부터 끝까지 검색해라.

begin

FoundAt := FindText('**JUB NO =', StartPos, ToEnd, [stMatchCase]);

if FoundAt <> -1 then //'**JUB NO =' 를 찾으면

begin

SetFocus;

SelStart := FoundAt;

SelLength := Length('**JUB NO =');

StartPos:=SelStart+SelLength;

inc(FoundAtNum);

label1.Caption := inttostr(FoundAtNum);

SelLength:= SelLength + 85; //찾은곳으로부터

//95 만큼의 문자열을 얻어와라.

label2.Caption := Trim(SelText);

end

else

begin //'**JUB NO =' 를 못찾으면

showmessage('셀수 없습니다.');

break;

end;

break;

end;

end;



위와 같이 하면 전 한줄로 문자열이 얻어오는줄 알았는데

있는 그대로 두줄로 분리되어 얻어와지더군요.

두줄을 한줄로 받는 방법은 없을까요? 아니면 위와같은 방법보다 더 좋은

방법이 있을까요?

고수분들 부탁드립니다.