왕 초보라서요....
MEMO1에...
1
AA 아름다운
델파이
COM
2
BB 사랑스런
델파이
COM
3
AA 바보들의
사랑하는
사람들은
거짓말
COM
4
CC 합창
것참
COM
라는것이 있읍니다..
이것을POS/COPY 하여 1부터 COM 까지 3부터COM까지 COPY하여
MEMO2에 넣고 싶은데...
for i := 0 to Memo1.Lines.Count - 1 do
begin
s_string:= Memo1.Lines[i];
j := POS('AA','s_string');
s_next4:= COPY(s_string,J*1,'COM');
Memo1.Lines.Add(s_next4);
end;
COPY(문자열,시작,끝)으로 알고 있는데...
끝이랑 한줄위부분좀 알려주세요..
그냥 lines.text 해서
com을 pos로 찾으시고
copy하시면 엔터키도 따라 올겁니다.