안녕 하세요?
BacTeria 박종민 입니다.
음... 밑에 어떤 분이 언급 하셨던 메모 컴포넌트에서
라인과 컬럼 알아내는 방법입니다.
이 내용은 파워러브 델파이에 있던 것 입니다.
----------------------------------------------------------------------
1. 현재 라인번호 알아내기
메모에서 현재 Caret이 위치하고 있는 줄이 몇번째 줄인지를 리턴한다.
Caption := IntToStr( GetCurrLine(Memo1) );
function GetCurrLine(Memo : TMemo) : integer;
begin
Result := Memo.Perform(EM_LINEFROMCHAR, Memo.SelStart, 0);
end;
2. 현재 컬럼알아내기
현재 Caret이 몇번째 컬럼에 위치하는지를 리턴한다.
Caption := IntToStr( GetCurrPos(Memo1) );
function GetCurrPos(Memo : TMemo) : integer;
begin
Result := Memo.SelStart
- Memo.Perform(EM_LINEINDEX, GetCurrLine(Memo), 0);
end;
----------------------------------------------------------------------
이상입니다.
그럼 즐통~
청주에서 종미니...
|