paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-21 00:59:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

Designer: fixed typos related to 'occur' word

Browse Source 
git-svn-id: trunk@65205 -
This commit is contained in:
maxim 2021-06-10 22:16:29 +00:00
parent 61630354e6
commit 3566beff8f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
designer/jitforms.pp
View File

@ -1925,7 +1925,7 @@ begin
Action:=mrCancel; Action:=mrCancel;
FCurReadErrorMsg:=ErrorMsg; FCurReadErrorMsg:=ErrorMsg;
FCurUnknownProperty:=''; // ToDo find name property FCurUnknownProperty:=''; // ToDo find name property
// find out, what error occured // find out, what error occurred
if RightStr(ErrorMsg,length(SUnknownProperty))=SUnknownProperty then begin if RightStr(ErrorMsg,length(SUnknownProperty))=SUnknownProperty then begin
ErrorType:=jfeUnknownProperty; ErrorType:=jfeUnknownProperty;
Action:=mrIgnore; Action:=mrIgnore;