* Various files: cosmetic: typo: occurance=>occurrence

git-svn-id: trunk@46757 -
This commit is contained in:
reiniero 2014-11-05 10:00:42 +00:00
parent 2ea7ac784f
commit 5e6a4176d3
4 changed files with 6 additions and 6 deletions

View File

@ -21,7 +21,7 @@
$0007D0B4 TPSPASCALCOMPILER__COMPILE, line 11704 of upscompiler.pas
you can fix this by using the "unaligned" keyword around the pointer operation.
search for occurances of "unaligned" to see how this is done,
search for occurrences of "unaligned" to see how this is done,
(use $ifdef FPC_REQUIRES_PROPER_ALIGNMENT).
for more information, visit:

View File

@ -217,7 +217,7 @@ end;
procedure PosLastAndCount(const ASubString, AString: WideString;
out ALastPos: integer; out ACount: integer);
var
{This gets the last occurance and count in one go. It saves time}
{This gets the last occurrence and count in one go. It saves time}
LastChar1: WideChar;
Index1: integer;
Index2: integer;

View File

@ -398,7 +398,7 @@ begin
Result := 0;
end;
{ Find Nth from the rightmost occurance of character C in string S }
{ Find Nth from the rightmost occurrence of character C in string S }
{ * If C not found returns 0 }
function RNthCharPos(C: AnsiChar; const S : string; Nth: Integer): Integer;
var

View File

@ -126,7 +126,7 @@ end;
Returns: The index of the added icon, -1 if unsuccesfull.
Adds one or more (bitmap width / imagelist width) bitmaps to the list.
Every occurance of MaskColor will be converted to transparent.
Every occurrence of MaskColor will be converted to transparent.
------------------------------------------------------------------------------}
function TCustomImageList.AddMasked(Image: TBitmap; MaskColor: TColor): Integer;
begin
@ -864,7 +864,7 @@ end;
Returns: Nothing
Adds one or more (bitmap width / imagelist width) bitmaps to the list.
Every occurance of MaskColor will be converted to transparent.
Every occurrence of MaskColor will be converted to transparent.
------------------------------------------------------------------------------}
procedure TCustomImageList.InsertMasked(Index: Integer; AImage: TCustomBitmap;
MaskColor: TColor);
@ -1444,7 +1444,7 @@ end;
Returns: Nothing
Replaces the index'th image with the image given.
Every occurance of MaskColor will be converted to transparent.
Every occurrence of MaskColor will be converted to transparent.
------------------------------------------------------------------------------}
procedure TCustomImageList.ReplaceMasked(Index: Integer; NewImage: TCustomBitmap; MaskColor: TColor);
var