通过调用api确定memo控件中的当前行和列
你可以调用windowsapi中的em—linefromchar和em—lineindex函数来确定mem
o控件中的当前行和列,具体调用的过程见下面的过程。
var
linenum:longint;
charsbeforeline:longint;
begin
linenumΚsendmessage(memo1.handle,em—linefromchar,memo1.selsta
rt,0);
charsbeforeline:=sendmessage(memo1.handle,em—lineindex,linenum
,0);
label1.caption:=′line′+inttostr(linenum+1)
label2.caption:=′position′+inttostr((memo1.selstart-charsbe
foreline)+1);
end;