pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

richmemo: fix typo in parameter name

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4084 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
skalogryz
2015-04-19 01:53:20 +00:00
parent 06ae0f91dc
commit fd5de1f0bf
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/richmemo/richmemo.pas
View File

@ -87,7 +87,7 @@ type
TParaRange = record
start : Integer; // the first character in the paragraph
lenghtNoBr : Integer; // the length of the paragraph, excluding the line break character
lengthNoBr : Integer; // the length of the paragraph, excluding the line break character
length : Integer; // the length of the paragrpah, including the line break, if present
// the last line in the control doesn't contain a line break character,
// thus length = lengthNoBr

2
components/richmemo/win32/win32richmemoproc.pas
View File

@ -829,7 +829,7 @@ begin
until (res=0) or (buf[1] = HardBreak);
para.start:=tost;
para.lenghtNoBr:=toend;
para.lengthNoBr:=toend;
if res>0 then inc(toend); // there's a line break character - add it to the range
para.length:=toend;
end;