오태양 wrote:

> 안녕하세요.

>

> 델초본데여.. 제가 프로그램을 짜다가 막히는 부분이 있어서 일케 부탁드립니당.

>

> 다른게 아니구염... 메모 컴포넌트에서.. 어떤 내용을 입력하고나서 엔터 쳤을때

>

> 입력한 라인의 내용을 다른 컴포넌트로 보내야 하거든요. 근데.. 일단 보내고보니까

>

> Memo 컴포넌트에 들어있는 모든 내용이 가버리지 뭡니까 ㅜ.ㅜ 어흑.

>

> 그래서 현재 커서가 있는 라인의 내용만을 보내주고자 하는데.. 찾질 못하겠네요

>

> 여러 책을 뒤져바도 나와있는게 없고.. 좀 도와주십사.. 만약 저게 불가능하다면

>

> 불가능하다고라도 말씀해주세요.. 그럴꺼 같진 않은데... ㅜ.ㅜ

>

> 아래는 예를 들어서 다시 설명드린거에여.. 부디... 답변을 ㅜ.ㅜ

>

> 예)

>

> *메모 컴포넌트의 내용*

> 1:하나둘하나둘 마이크테스트

> 2:아~아~ 마이크 테스트 중입니다.| <- 요부분임다!!

> 3:음~~ 잘되는군요..!

>

> 이렇게 있을때 '|'가 현재 커서가 있는 위치고, 그곳에서 엔터키를 쳤을때,

>

> 2번째 라인의 내용을 다른 컴포넌트로 보내는거죠.. 근데..

>

> 저기 커서가 있는게 눈으로는 두번째 라인이란걸 알지만 소스상에서 어떻게 알 수

>

> 있는지 모르겠어요.. 제발 부탁합니다. 그럼 좋은 답변 기다릴께요 ^^..





안녕하세요.

음 메모컴퍼넌트에 포커스 위치만 찾음 될꺼 같네요.

저두 잘 몰라서 포커스 찾는건 팁을 보구 글 올립니다.

아무쪼록 참고하시길...

엔터쳤을때라면.. KeyPress 이벤트에서 넣어주시면 될것 같네요..그럼..

행복하세요.





procedure TForm1.Button1Click(Sender: TObject);

var

Row : Integer;

begin

Row := SendMessage(Memo1.Handle, EM_LINEFROMCHAR, Memo1.SelStart, 0);

Edit1.Text := Memo1.Lines[ Row ];

end;