paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-07 22:58:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

TurboPower_IPro: fixed typos related to 'occur' word

Browse Source 
git-svn-id: trunk@65203 -
This commit is contained in:
maxim 2021-06-10 22:15:11 +00:00
parent 163edb07b5
commit 04e48f1044
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/turbopower_ipro/iputils.pas
View File

@ -287,7 +287,7 @@ begin
Result := Copy(Strng, StrStart, StrEnd - StrStart + 1);
end;
{ Find leftmost occurence of character C in string S }
{ Find leftmost occurrence of character C in string S }
{* If C not found returns 0 }
function CharPos(C: AnsiChar; const S : string): Integer;
var
@ -422,7 +422,7 @@ begin
Result := i;
end;
{ Find location of first occurence of a substring (SubStr) in a string (S) }
{ Find location of first occurrence of a substring (SubStr) in a string (S) }
{ past a particular index (Idx) }
{ * Result is relative to the start of the entire original string }
{ * Returns 0 if substring not found }