From dc78f11aef01865ded9c7cf5b2cab07265ca37cd Mon Sep 17 00:00:00 2001 From: mattias Date: Sat, 11 Sep 2010 14:06:32 +0000 Subject: [PATCH] fixed typo cant git-svn-id: trunk@27305 - --- components/printers/win32/winprinters.inc | 2 +- debugger/fpdebug/dbgclasses.pp | 2 +- debugger/fpdebug/dbgdwarf.pas | 2 +- debugger/gdbmidebugger.pp | 2 +- lcl/include/customlistbox.inc | 2 +- lcl/interfaces/gtk/gtklclintf.inc | 2 +- lcl/interfaces/gtk/gtkwinapi.inc | 2 +- lcl/interfaces/gtk/gtkwsdialogs.pp | 2 +- lcl/interfaces/gtk2/gtk2lclintf.inc | 2 +- lcl/interfaces/gtk2/gtk2winapi.inc | 2 +- lcl/interfaces/win32/win32wscustomlistview.inc | 2 +- lcl/interfaces/wince/wincewscustomlistview.inc | 2 +- lcl/interfaces/wince/wincewsmenus.pp | 2 +- 13 files changed, 13 insertions(+), 13 deletions(-) diff --git a/components/printers/win32/winprinters.inc b/components/printers/win32/winprinters.inc index 98eed20ab8..b44016ce8c 100644 --- a/components/printers/win32/winprinters.inc +++ b/components/printers/win32/winprinters.inc @@ -6,7 +6,7 @@ Uses InterfaceBase, LCLIntf, WinVer, WinUtilPrn; // todo: this ^ is a mess: mixed WinUtilPrn/Windows units clean... -// todo: this should be a method, cant be atm because mixed units ^ +// todo: this should be a method, can not be atm because mixed units ^ function GetCurrentDevMode(out DM:PDeviceMode): boolean; var PDev: TPrinterDevice; diff --git a/debugger/fpdebug/dbgclasses.pp b/debugger/fpdebug/dbgclasses.pp index 55531231d0..078bc4c2c2 100644 --- a/debugger/fpdebug/dbgclasses.pp +++ b/debugger/fpdebug/dbgclasses.pp @@ -584,7 +584,7 @@ function TDbgProcess.HandleDebugEvent(const ADebugEvent: TDebugEvent): Boolean; end; end else begin - // if we cant get the context, we probable weren't able to set it either + // if we can not get the context, we probable weren't able to set it either Log('Thread %u: Unable to get context', [ADebugEvent.dwThreadId]); end; diff --git a/debugger/fpdebug/dbgdwarf.pas b/debugger/fpdebug/dbgdwarf.pas index c226dbcf55..fbac07cc37 100644 --- a/debugger/fpdebug/dbgdwarf.pas +++ b/debugger/fpdebug/dbgdwarf.pas @@ -1924,7 +1924,7 @@ begin if Scope.Next <> nil then begin - // scope.Childvalid is true, otherwise we cant have a next. + // scope.Childvalid is true, otherwise we can not have a next. // So no need to check if lefSearchSibling in AFlags then begin diff --git a/debugger/gdbmidebugger.pp b/debugger/gdbmidebugger.pp index e4cc724461..c2d1f4f6ea 100644 --- a/debugger/gdbmidebugger.pp +++ b/debugger/gdbmidebugger.pp @@ -5798,7 +5798,7 @@ begin else Result := SolveMath(ADebugger, Left, Left^.Next, Value, Info); end; eoDereference: begin - Result := (ARight = '') // right part cant have value + Result := (ARight = '') // right part can not have value and SolveDeref(ADebugger, Left, Value, Info); end; eoAddress: begin diff --git a/lcl/include/customlistbox.inc b/lcl/include/customlistbox.inc index 23f89b84f6..fb80b0d79a 100644 --- a/lcl/include/customlistbox.inc +++ b/lcl/include/customlistbox.inc @@ -51,7 +51,7 @@ var begin // Paul: This will happen only once if Style = lbStandard then CheckListBox is // OwnerDrawFixed in real (under windows). Handle is not allocated and we - // cant use Canvas since it will cause recursion but we need correct font height + // can not use Canvas since it will cause recursion but we need correct font height B := TBitmap.Create; try B.Canvas.Font := Font; diff --git a/lcl/interfaces/gtk/gtklclintf.inc b/lcl/interfaces/gtk/gtklclintf.inc index e85d7327c8..cec6eb56d1 100644 --- a/lcl/interfaces/gtk/gtklclintf.inc +++ b/lcl/interfaces/gtk/gtklclintf.inc @@ -373,7 +373,7 @@ begin // create a GdkPixmap if ImgData <> nil then begin - { The gdk_pixmap_create_from_data creates only a two-color pixmap so we cant use it } + { The gdk_pixmap_create_from_data creates only a two-color pixmap so we can not use it } GdkImage := gdk_image_new(GDK_IMAGE_FASTEST, Visual, ImgWidth, ImgHeight); diff --git a/lcl/interfaces/gtk/gtkwinapi.inc b/lcl/interfaces/gtk/gtkwinapi.inc index f7b456d282..e4349c2bcb 100644 --- a/lcl/interfaces/gtk/gtkwinapi.inc +++ b/lcl/interfaces/gtk/gtkwinapi.inc @@ -6343,7 +6343,7 @@ begin Data := GetLCLObject(Pointer(Handle)); if Data is TControl then Result := PtrInt(@(TControl(Data).WindowProc)); - // TODO fix this, a method pointer (2 pointers) cant be casted to a longint + // TODO fix this, a method pointer (2 pointers) can not be casted to a longint end; } { GWL_HWNDPARENT : diff --git a/lcl/interfaces/gtk/gtkwsdialogs.pp b/lcl/interfaces/gtk/gtkwsdialogs.pp index f68bc5399b..27776271a7 100644 --- a/lcl/interfaces/gtk/gtkwsdialogs.pp +++ b/lcl/interfaces/gtk/gtkwsdialogs.pp @@ -374,7 +374,7 @@ var // maybe user entered nonexistent dir if ((AFileName<>'') and (IsPathDelimiter(AFileName, Length(AFileName)))) then begin - // cant jump to nonexistent dir + // can not jump to nonexistent dir if not (ofNoChangeDir in TOpenDialog(TheDialog).Options) then MessageDlg(rsfdDirectoryMustExist, Format(rsfdDirectoryNotExist,[AFileName]), mtError, [mbCancel], 0); // GTK2 shows "The folder contents could not be displayed" diff --git a/lcl/interfaces/gtk2/gtk2lclintf.inc b/lcl/interfaces/gtk2/gtk2lclintf.inc index 0198cc26ae..c5dcbcacef 100644 --- a/lcl/interfaces/gtk2/gtk2lclintf.inc +++ b/lcl/interfaces/gtk2/gtk2lclintf.inc @@ -390,7 +390,7 @@ begin // create a GdkPixmap if ImgData <> nil then begin - { The gdk_pixmap_create_from_data creates only a two-color pixmap so we cant use it } + { The gdk_pixmap_create_from_data creates only a two-color pixmap so we can not use it } GdkImage := gdk_image_new(GDK_IMAGE_FASTEST, Visual, ImgWidth, ImgHeight); diff --git a/lcl/interfaces/gtk2/gtk2winapi.inc b/lcl/interfaces/gtk2/gtk2winapi.inc index a7c9a1b37c..235eec9300 100644 --- a/lcl/interfaces/gtk2/gtk2winapi.inc +++ b/lcl/interfaces/gtk2/gtk2winapi.inc @@ -5631,7 +5631,7 @@ begin Data := GetLCLObject(Pointer(Handle)); if Data is TControl then Result := PtrInt(@(TControl(Data).WindowProc)); - // TODO fix this, a method pointer (2 pointers) cant be casted to a longint + // TODO fix this, a method pointer (2 pointers) can not be casted to a longint end; } { GWL_HWNDPARENT : diff --git a/lcl/interfaces/win32/win32wscustomlistview.inc b/lcl/interfaces/win32/win32wscustomlistview.inc index a6a7ebd7a6..9e3bc01b3c 100644 --- a/lcl/interfaces/win32/win32wscustomlistview.inc +++ b/lcl/interfaces/win32/win32wscustomlistview.inc @@ -300,7 +300,7 @@ begin if not WSCheckHandleAllocated(ALV, 'ColumnGetWidth') then Exit; - // do not use ListView_GetColumnWidth since we cant detect errors + // do not use ListView_GetColumnWidth since we can not detect errors lvc.Mask := LVCF_WIDTH; if ListView_GetColumn(ALV.Handle, AIndex, lvc) <> 0 then Result := lvc.cx; diff --git a/lcl/interfaces/wince/wincewscustomlistview.inc b/lcl/interfaces/wince/wincewscustomlistview.inc index 109120d7f8..09fc71c7e1 100644 --- a/lcl/interfaces/wince/wincewscustomlistview.inc +++ b/lcl/interfaces/wince/wincewscustomlistview.inc @@ -100,7 +100,7 @@ begin if not WSCheckHandleAllocated(ALV, 'ColumnGetWidth') then Exit; - // do not use ListView_GetColumnWidth since we cant detect errors + // do not use ListView_GetColumnWidth since we can not detect errors lvc.Mask := LVCF_WIDTH; if LongInt(ListView_GetColumn(ALV.Handle, AIndex, lvc)) <> 0 then Result := lvc.cx; end; diff --git a/lcl/interfaces/wince/wincewsmenus.pp b/lcl/interfaces/wince/wincewsmenus.pp index 77c83c66af..e79aad7dfb 100644 --- a/lcl/interfaces/wince/wincewsmenus.pp +++ b/lcl/interfaces/wince/wincewsmenus.pp @@ -302,7 +302,7 @@ begin if LCLMenu.Items.Items[j].Checked then tbbi.fsState:=tbbi.fsState or TBSTATE_CHECKED; - // Adds a top-level item (We cant really add it, so we find + // Adds a top-level item (We can not really add it, so we find // and modify the existing top-level item) if i = 2 then Break; // smartphones have maximum 2 top level menu items.