Mass typo fix for Textmode IDE.

packages/ide/fp.pas

@@ -196,7 +196,7 @@ begin
             ShowReadme:=true;
           end else
         case Upcase(Param[1]) of
-          'C' : { custom config file (BP compatiblity) }
+          'C' : { custom config file (BP compatibility) }
            if BeforeINI then
             begin
               delete(param,1,1); // delete C

packages/ide/fpcodcmp.pas

@@ -442,7 +442,7 @@ begin
   Insert(New(PLabel, Init(R2, 'Case handling', RB)));
   Insert(RB);
 
-  { Mininum length inputline }
+  { Minimum length inputline }
   R.Copy(R3); R.A.Y:=R.B.Y-7;R.B.Y:=R.A.Y+1; Dec(R.B.X); R.A.X:=R.B.X -5;
   New(MinInputL, Init(R,5));
   MinInputL^.SetValidator(New(PRangeValidator, Init(1,255)));

packages/ide/fpcompil.pas

@@ -17,7 +17,7 @@ unit FPCompil;
 interface
 
 { don't redir under linux, because all stdout (also from the ide!) will
-  then be redired (PFV) }
+  then be redirected (PFV) }
 { this should work now correctly because
   RedirDisableAll and RedirEnableAll function are added in fpredir (PM) }
 
@@ -716,7 +716,7 @@ begin
        CompilerStatus:=true;
        exit;
     end;
-{ only display line info every 100 lines, ofcourse all other messages
+{ only display line info every 100 lines, of course all other messages
   will be displayed directly }
   if (getrealtime-lasttime>=CompilerStatusUpdateDelay) or (status.compiledlines=1) then
    begin
@@ -960,7 +960,7 @@ begin
     FileName:='"'+FileName+'"';
   if mode=cBuild then
     FileName:='-B '+FileName;
-  { tokens are created and distroed by compiler.compile !! PM }
+  { tokens are created and destroyed by compiler.compile !! PM }
   DoneTokens;
   PPasFile:='ppas'+source_info.scriptext;
   WUtils.DeleteFile(GetExePath+PpasFile);
@@ -992,7 +992,7 @@ begin
   else
     EXEFile:=DirOf(MainFile)+NameOf(MainFile)+GetTargetExeExt;
   DefaultReplacements(ExeFile);
-  { tokens are created and distroyed by compiler.compile !! PM }
+  { tokens are created and destroyed by compiler.compile !! PM }
   InitTokens;
   if LinkAfter and
      ExistsFile(GetExePath+PpasFile) and

packages/ide/fpdesk.pas

@@ -551,7 +551,7 @@ begin
     if (W^.Flags and wfGrow)<>0 then
       WI.Bounds.B.Y:=Max(6,round(WI.Bounds.B.Y*(ScreenHeight-2)/(VM.row-2)));
   end;
-  {relocat and resize window as needed}
+  {relocate and resize window as needed}
   W^.GetBounds(R);
   if (R.A.X<>WI.Bounds.A.X) or (R.A.Y<>WI.Bounds.A.Y) then
     R.Move(WI.Bounds.A.X-R.A.X,WI.Bounds.A.Y-R.A.Y);
@@ -897,7 +897,7 @@ begin
       Setlength(Dir,Size);
       S^.Read(Dir[1], Size);                           { Read the directory }
       {$i-}ChDir(Dir);{$i+}
-      IOResult; {eat io result so it does not affect leater operations}
+      IOResult; {eat io result so it does not affect later operations}
       GetDir(0,StartUpDir);
     end;
   end;

packages/ide/fphelp.pas

@@ -201,7 +201,7 @@ const
       hint_browser           = 'Specify global browser settings';
       hint_reloadmodifiedfile= 'Reload file modified on disk';
       hint_tools             = 'Create or change tools';
-      hint_environmentmenu   = 'Specify environment settins';
+      hint_environmentmenu   = 'Specify environment settings';
       hint_preferences       = 'Specify preferences settings';
       hint_editoroptions     = 'Specify default editor settings';
       hint_codecomplete      = 'Specify CodeComplete keywords';
@@ -218,7 +218,7 @@ const
       hint_cascade           = 'Arrange windows on desktop by cascading';
       hint_stepped           = 'Arrange windows on desktop by stepping';
       hint_closeall          = 'Close all windows on the desktop';
-      hint_resize            = 'Change the size/postion of the active window';
+      hint_resize            = 'Change the size/position of the active window';
       hint_zoom              = 'Enlarge or restore the size of the active window';
       hint_next              = 'Make the next window active';
       hint_prev              = 'Make the previous window active';

packages/ide/fpide.pas

@@ -157,7 +157,7 @@ type
       procedure RemoveRecentFile(Index: integer);
     public
       procedure CurDirChanged;
-      procedure UpdateClockAndHeap; { update visiblity of ClockView and HeapView }
+      procedure UpdateClockAndHeap; { update visibility of ClockView and HeapView }
     private
       procedure UpdatePrimaryFile;
       procedure UpdateINIFile;
@@ -318,7 +318,7 @@ resourcestring  menu_local_gotosource = '~G~oto source';
                 menu_tools_msgprev     = 'Goto ~p~revious';
                 menu_tools_grep        = '~G~rep';
                 menu_tools_calculator  = '~C~alculator';
-                menu_tools_asciitable  = 'Ascii ~t~able';
+                menu_tools_asciitable  = 'ASCII ~T~able';
 
                 menu_options           = '~O~ptions';
                 menu_options_mode      = 'Mode~.~..';
@@ -1583,7 +1583,7 @@ begin
   UpdateScreen(true);
 {$endif go32v2}
 {$endif Windows}
-  CurDirChanged; {To avoid memory corruption, palce this call after screen resize has been done.}
+  CurDirChanged; {To avoid memory corruption, place this call after screen resize has been done.}
   displaymode:=dmIDE;
 end;
 
@@ -1601,7 +1601,7 @@ begin
       SOK:=SaveAll;
   if (AutoSaveOptions and asDesktop)<>0 then
     begin
-      { destory all help & browser windows - we don't want to store them }
+      { destroy all help & browser windows - we don't want to store them }
       { UserScreenWindow is also not registered PM }
       DoCloseUserScreenWindow;
       {$IFNDEF NODEBUG}
@@ -1777,9 +1777,9 @@ begin
 
   GetExtent(R);
   AdjustRecentCount :=0;
-  {calculate how much lines on screen for reacent files can be used }
+  {calculate how much lines on screen for recent files can be used }
   if r.b.y-r.a.y -19 > 0 then AdjustRecentCount:=r.b.y-r.a.y -19;
-  {only if there is enough space then show all reacent files }
+  {only if there is enough space then show all recent files }
   {else cut list shorter }
   if RecentFileCount < AdjustRecentCount then
      AdjustRecentCount:=RecentFileCount;
@@ -1982,7 +1982,7 @@ destructor TIDEApp.Done;
 begin
   InsideDone:=true;
   IsRunning:=false;
-  {manualy dispose ClockView and HeapView}
+  {manually dispose ClockView and HeapView}
   Delete(ClockView);
   Dispose(ClockView);
   Delete(HeapView);

packages/ide/fpini.pas

@@ -127,7 +127,7 @@ const
   ieBrowserSymbols   = 'SymbolFlags';
   ieBrowserDisplay   = 'DisplayFlags';
   ieBrowserSub       = 'SubBrowsing';
-  ieBrowserPane      = 'PreferrdPane';
+  ieBrowserPane      = 'PreferredPane';
   ieOpenExts         = 'OpenExts';
   ieHighlightExts    = 'Exts';
   ieTabsPattern      = 'NeedsTabs';
@@ -486,7 +486,7 @@ begin
   DefaultSaveExt:=INIFile^.GetEntry(secEditor,ieDefaultSaveExt,DefaultSaveExt);
   { Browser }
   DefaultSymbolFlags:=INIFile^.GetIntEntry(secBrowser,ieBrowserSymbols,DefaultSymbolFlags);
-  DefaultDispayFlags:=INIFile^.GetIntEntry(secBrowser,ieBrowserDisplay,DefaultDispayFlags);
+  DefaultDisplayFlags:=INIFile^.GetIntEntry(secBrowser,ieBrowserDisplay,DefaultDisplayFlags);
   DefaultBrowserSub:=INIFile^.GetIntEntry(secBrowser,ieBrowserSub,DefaultBrowserSub);
   DefaultBrowserPane:=INIFile^.GetIntEntry(secBrowser,ieBrowserPane,DefaultBrowserPane);
   { Highlight }
@@ -580,7 +580,7 @@ begin
         TryToOpenFile(@R,S1,X,Y,false)
       else
         TryToOpenFile(nil,S1,X,Y,false);
-      { remove it because otherwise we allways keep old files }
+      { remove it because otherwise we always keep old files }
       INIFile^.DeleteEntry(secFiles,ieOpenFile+IntToStr(I));
     end;
 *)
@@ -712,7 +712,7 @@ begin
   INIFile^.SetEntry(secEditor,ieDefaultSaveExt,DefaultSaveExt);
   { Browser }
   INIFile^.SetIntEntry(secBrowser,ieBrowserSymbols,DefaultSymbolFlags);
-  INIFile^.SetIntEntry(secBrowser,ieBrowserDisplay,DefaultDispayFlags);
+  INIFile^.SetIntEntry(secBrowser,ieBrowserDisplay,DefaultDisplayFlags);
   INIFile^.SetIntEntry(secBrowser,ieBrowserSub,DefaultBrowserSub);
   INIFile^.SetIntEntry(secBrowser,ieBrowserPane,DefaultBrowserPane);
   { Highlight }

packages/ide/fpmcomp.inc

@@ -61,7 +61,7 @@ begin
   if Desktop^.ExecView(D)=cmOK then
     begin
        TargetSwitches^.SetCurrSel(RB^.Value);
-       { we allways need to recompile if we change
+       { we always need to recompile if we change
          the target OS PM }
        if L<>RB^.Value then
          PrevMainFile:='';

packages/ide/fpmdebug.inc

@@ -44,7 +44,7 @@ end;
 procedure TIDEApp.DoUserScreenWindow;
 begin
   {$ifdef HASAMIGA}
-  Exit; // Do not open the Userscreen on AMIGA systems, its not closeable
+  Exit; // Do not open the Userscreen on AMIGA systems, its not closable
   {$endif}
   if UserScreenWindow=nil then
     begin

packages/ide/fpmingw.pas

@@ -32,7 +32,7 @@ implementation
 
 uses
   windows,
-  gdbint; // force dependancies that hopefully make it execute at the right moment.
+  gdbint; // force dependencies that hopefully make it execute at the right moment.
 
 // prototype of atexit:
 Type

packages/ide/fpmopts.inc

@@ -90,7 +90,7 @@ begin
   Count:=max(Count,ProcessorCodeGenerationSwitches^.ItemCount); {lines we need to be able to show}
   if Count < 10 then Count:=10; {10 lines are needed in Assembler page}
   TargetHeight:=Count+11; {11 lines for rest (empty lines, borders, pages, conditions...)}
-  if TargetHeight> 31 then TargetHeight:=31; {don't go wild, limit ourselvs on 31 line}
+  if TargetHeight> 31 then TargetHeight:=31; {don't go wild, limit ourselves on 31 line}
   if (R.B.Y-R.A.Y) < (TargetHeight+5) then
     TargetHeight:= (R.B.Y-R.A.Y)-5; {screen allow exactly this much lines}
   if TargetHeight<21 then
@@ -355,7 +355,7 @@ begin
     Tab^.GrowMode:=0;
     Insert(Tab);
 
-    { conditionnals }
+    { conditionals }
     R2.Copy(TabR); R2.A.Y:=R2.B.Y+1; R2.B.Y:=R2.A.Y+1; Dec(R2.B.X,4);
     New(IL, Init(R2, 255));
     IL^.Data^:=ConditionalSwitches^.GetStringItem(0);
@@ -935,7 +935,7 @@ begin
             c^.freeall;
             for j:=0 to e^.GetLineCount-1 do
               begin
-                s:=e^.GetLineText(j);   { Note: AnsiString to ShortString convertino}
+                s:=e^.GetLineText(j);   { Note: AnsiString to ShortString convertion}
                 s:=Trim(s);
                 if s<>'' then
                   c^.insert(newstr(s));
@@ -1137,7 +1137,7 @@ begin
       NewSItem(label_preferences_showheapmonitor,
       nil))));
     CB3^.Value:=DesktopPreferences;
-    if OverrideHeapMonitor then  { if heap motior state is set by fp parameter }
+    if OverrideHeapMonitor then  { if heap monitor state is set by fp parameter }
       CB3^.EnableMask:=CB3^.EnableMask and not(dpHeapMonitor); { disable heap monitor check box }
     Insert(New(PGroupView, Init(R, label_preferences_clockheap, CB3)));
     Insert(CB3);
@@ -1374,7 +1374,7 @@ begin
   begin    { Default browser options }
     TitleS:=dialog_browseroptions;
     SymbolsFlags := DefaultSymbolFlags;
-    DisplayFlags := DefaultDispayFlags;
+    DisplayFlags := DefaultDisplayFlags;
     BrowserSub:=DefaultBrowserSub;
     BrowserPane:=DefaultBrowserPane;
     DialogWidth:=56;
@@ -1390,7 +1390,7 @@ begin
     DialogWidth:=56-20;
     SymbolsHight:=7;
     DisplayHight:=2;
-    RB1:=nil; {it is not suppoused to be valid}
+    RB1:=nil; {it is not supposed to be valid}
   end;
   R.Assign(0,0,DialogWidth,16);
   New(D, Init(R, TitleS));
@@ -1462,7 +1462,7 @@ begin
     begin
       {DefaultBrowserFlags:=BrowserFlags;}
       DefaultSymbolFlags:=SymbolsFlags;
-      DefaultDispayFlags:=DisplayFlags;
+      DefaultDisplayFlags:=DisplayFlags;
       DefaultBrowserSub:=RB1^.Value;
       DefaultBrowserPane:=RB2^.Value;
     end else

packages/ide/fpmrun.inc

@@ -240,9 +240,9 @@ begin
               else
                 Debugger^.Run;
               RunDirect:=false;
-              {we are about to run debuger, AutoSave first}
+              {we are about to run debugger, AutoSave first}
               SaveCancelled:=false;
-              AutoSave; {ignore result, ignore if canceled}
+              AutoSave; {ignore result, ignore if cancelled}
             end;
         end;
 {$endif ndef NODEBUG}

packages/ide/fpredir.pas

@@ -811,7 +811,7 @@ end;
     {We need to use fpsystem to get wildcard expansion and avoid being
      interrupted by ctrl+c (SIGINT).
      But used wifexited and wexitstatus functions
-     to correctly interpret fpsystem reutrn value }
+     to correctly interpret fpsystem return value }
      s:=fpsystem(MaybeQuoted(FixPath(Progname))+' '+Comline);
      if wifexited(s) then
        ExecuteResult:=wexitstatus(s)

packages/ide/fpregs.pas

@@ -513,7 +513,7 @@ const
            OK:=GetIntRegs(rs);
            LastOK:=OK;
            NewReg:=rs;
-           { get inital values }
+           { get initial values }
            if first then
              begin
                OldReg:=NewReg;
@@ -1083,7 +1083,7 @@ const
              );
            LastOK:=OK;
            NewReg:=rs;
-           { get inital values }
+           { get initial values }
            if first then
              begin
                OldReg:=NewReg;
@@ -1468,7 +1468,7 @@ const
              );
            LastOK:=OK;
            NewReg:=rs;
-           { get inital values }
+           { get initial values }
            if first then
              begin
                OldReg:=NewReg;

packages/ide/fpswitch.pas

@@ -1514,7 +1514,7 @@ begin
                OtherLinkerSwitches^.SetBooleanItem(0,true);
             end;
        end;
-       { set appriopriate default target }
+       { set appropriate default target }
        TargetSwitches^.SetCurrSelParam(target_info.shortname);
     end;
   SwitchesMode:=OldSwitchesMode;

packages/ide/fpsymbol.pas

@@ -49,9 +49,9 @@ const
 const
       DefaultSymbolFlags : longint = bfUnits or
          bfLabels or bfConstants or bfTypes or bfVariables or bfProcedures;
-      DefaultDispayFlags : longint = (bfQualifiedSymbols) shr 30;
+      DefaultDisplayFlags : longint = (bfQualifiedSymbols) shr 30;
       { Note: default browser flags will be created with formula:
-        BrowserFlags:=DefaultDispayFlags shl 30 or DefaultSymbolFlags;
+        BrowserFlags:=DefaultDisplayFlags shl 30 or DefaultSymbolFlags;
       }
       DefaultBrowserSub  : longint = 0;
       DefaultBrowserPane : longint = 0;
@@ -82,7 +82,7 @@ type
       {Shell of TSymbol used to filter inherited and to display qualified symbols }
     PHollowSymbol = ^THollowSymbol;
     THollowSymbol = object(TSymbol)
-        Sym        : PSymbol; { orginal symbol, need for unit info save}
+        Sym        : PSymbol; { original symbol, need for unit info save}
         Parent     : PSymbol; { to get object name from }
         NeedPrefix : Boolean; { GetName will add object prefix if needed }
         constructor Init(ASymbol,AParent:PSymbol);
@@ -301,7 +301,7 @@ type
     end;
 
     { Tree to go to previous browser windows }
-    { Holds all parametrs to recreate closed previous window if needed to be}
+    { Holds all parameters to recreate closed previous window if needed to be}
     TBrowserLinked = Object(TObject)
         BrowserWindow : PBrowserWindow;
         Previous : PBrowserLinked;
@@ -1182,7 +1182,7 @@ begin
       if Idx<>-1 then
         begin
           { Have found, but get filtered list index first
-            Some entries might be missing if need then look up agin }
+            Some entries might be missing if need then look up again }
           Idx:=GetFilteredLookUpIdx(Idx);
           if Idx<>-1 then
           begin
@@ -1337,7 +1337,7 @@ begin
         {----------  only selected ones  ----------}
         S^.NeedPrefix:=bQua;
         if Inh then  { we are in object scope view }
-          if not bInh then  { Inherite checkbox is not selected }
+          if not bInh then  { Inherited checkbox is not selected }
             if S^.Parent <> ObjSymbol then continue;
         case S^.typ of
           labelsym: if not bLab then continue;
@@ -2208,7 +2208,7 @@ begin
   HelpCtx:=hcBrowserWindow;
   Sym:=ASym;
   Prefix:=NewStr(APrefix);
-  BrowserFlags:=DefaultDispayFlags shl 30 or DefaultSymbolFlags;
+  BrowserFlags:=DefaultDisplayFlags shl 30 or DefaultSymbolFlags;
 
   GetExtent(R); R.Grow(-1,-1); R.B.Y:=R.A.Y+1;
 {$ifndef NODEBUG}
@@ -2399,7 +2399,7 @@ begin
   PageTab^.GrowMode:=gfGrowHiX;
   Insert(PageTab);
 
-  if assigned(ScopeView) {Scope assinged and chosen to be selected by default}
+  if assigned(ScopeView) {Scope assigned and chosen to be selected by default}
     and ((DefaultBrowserPane=0) or not assigned(ReferenceView)) then
     SelectTab(btScope)
   else if assigned(ReferenceView) then
@@ -2638,7 +2638,7 @@ var Y, uL,dL,tL: sw_integer;
 begin
   if (PrevSize.Y<>Size.Y) then
   begin
-    {-- unit info page resize manualy --}
+    {-- unit info page resize manually --}
     if assigned(UnitInfo) then
     begin
       { get number of lines everyone needs }

packages/ide/fptools.pas

@@ -1261,7 +1261,7 @@ begin
                           I:=I+ReplacePart(LastWordStart,I-1,S)-1;
                   end;
                 end
-              else { just prompt for parms }
+              else { just prompt for parameters }
                 begin
                   I:=I+ReplacePart(LastWordStart,I-1,'')-1;
                   if CheckOnly=false then

packages/ide/fpusrscr.pas

@@ -440,7 +440,7 @@ end;
 procedure TDOSScreen.FreeGraphBuffer;
 begin
   { We don't want to restore the last user screen if
-    it was a grpahic screen, for example if we
+    it was a graphic screen, for example if we
     leave in the middle of the debugging of a
     graphic program, so we first
     dispose the graphic buffer, thus
@@ -999,7 +999,7 @@ begin
   GetConsoleScreenBufferInfo(StartScreenBufferHandle,
     @ConsoleScreenBufferInfo);
   BigWin.X:=ConsoleScreenBufferInfo.dwSize.X;
-  BigWin.Y:=ConsoleScreenBufferInfo.srwindow.bottom-ConsoleScreenBufferInfo.srwindow.top; // mants 15779 was 200
+  BigWin.Y:=ConsoleScreenBufferInfo.srwindow.bottom-ConsoleScreenBufferInfo.srwindow.top; // mantis 15779 was 200
   { Try to allow to store more info }
   res:=SetConsoleScreenBufferSize(NewScreenBufferHandle,BigWin);
   if not res then
@@ -1017,7 +1017,7 @@ begin
   BigWin.Y:=ConsoleScreenBufferInfo.srwindow.bottom-ConsoleScreenBufferInfo.srwindow.top;
   res:=SetConsoleScreenBufferSize(NewScreenBufferHandle,
      BigWin);
-// mants 15779 : was
+// mantis 15779 : was
 //  res:=SetConsoleScreenBufferSize(NewScreenBufferHandle,
 //         ConsoleScreenBufferInfo.dwMaximumWindowSize);
   if not res then

packages/ide/fputils.pas

@@ -2,7 +2,7 @@
     This file is part of the Free Pascal Integrated Development Environment
     Copyright (c) 1998 by Berczi Gabor
 
-    Utilility routines used by the IDE
+    Utility routines used by the IDE
 
     See the file COPYING.FPC, included in this distribution,
     for details about the copyright.

packages/ide/fpvars.pas

@@ -112,7 +112,7 @@ const INIFileName      : string = ININame;
                                    dfCodeCompleteWords+dfCodeTemplates;
       DesktopLocation  : byte    = dlConfigFileDir;
       AutoSaveOptions  : longint = asEnvironment+asDesktop;
-      DesktopPreferences:longint = 0; { by default show no Clock, no Heap mointor }
+      DesktopPreferences:longint = 0; { by default show no Clock, no Heap monitor }
       MiscOptions      : longint = moChangeDirOnOpen+moCloseOnGotoSource;
       EditorModified   : boolean = false;
       IniCenterDebuggerRow : tcentre = do_centre;

packages/ide/fpviews.pas

@@ -139,7 +139,7 @@ type
     TSourceEditor = object(TFileEditor)
       CompileStamp : longint;
       CodeCompleteTip: PFPToolTip;
-      {for nested comments managment}
+      {for nested comments management}
       SwitchesNestedComments : boolean;
       NestedComments : boolean;
       FixedNestedComments : TPoint;
@@ -581,7 +581,7 @@ uses
      ag68kgas,
   {$endif}
 {$ifdef USE_EXTERNAL_COMPILER}
-   fpintf, { superseeds version_string of version unit }
+   fpintf, { supersedes version_string of version unit }
 {$endif USE_EXTERNAL_COMPILER}
   {$ifdef VESA}Vesa,{$endif}
   FPSymbol,FPDebug,FPVars,FPUtils,FPCompil,FPHelp,
@@ -1457,7 +1457,7 @@ begin
   ResultIsSet:=false;
   RegisterNestnessPoint(0,0);
   if (not IsFlagSet(efSyntaxHighlight)) then
-  begin {not ment to be syntax highlighted }
+  begin { not meant to be syntax highlighted }
     FixedNestedComments.Y:=0;
     FixedNestedComments.X:=0;
     exit;
@@ -4660,11 +4660,11 @@ begin
    DInput := New(PEditorInputLine, Init(R, FileNameLen+4));
    DInput^.GrowMode:=gfGrowHiX;
    DInput^.SetData(S);
-   InsertBefore(DInput,DirInput); {insert before to preserv order as it was}
+   InsertBefore(DInput,DirInput); {insert before to preserve order as it was}
    Delete(DirInput);
    Dispose(DirInput,done);
    DirInput:=DInput;
-   Control:=DirInput^.Next; {here we make assumption that THistory control will folow}
+   Control:=DirInput^.Next; {here we make assumption that THistory control will follow}
    while (Control<> nil) do
    begin
      if TypeOf(Control^) = TypeOf(THistory) then

packages/ide/gdbmiint.pas

@@ -368,10 +368,10 @@ Ignore:
         {    TODO: maybe show information to the user about the signal
           we have:
                GDB.ExecAsyncOutput.Parameters['signal-name'].AsString (e.g. 'SIGTERM')
-               GDB.ExecAsyncOutput.PArameters['signal-meaning'].AsString (e.g. 'Terminated')
+               GDB.ExecAsyncOutput.Parameters['signal-meaning'].AsString (e.g. 'Terminated')
           }
         LocalSignalName:=GDB.ExecAsyncOutput.Parameters['signal-name'].AsString;
-        LocalSignalString:=GDB.ExecAsyncOutput.PArameters['signal-meaning'].AsString;
+        LocalSignalString:=GDB.ExecAsyncOutput.Parameters['signal-meaning'].AsString;
         signal_name:=@LocalSignalName;
         signal_string:=@LocalSignalString;
         if (user_screen_shown) then
@@ -454,7 +454,7 @@ Ignore:
         {    TODO: maybe show information to the user about the signal
           we have:
                GDB.ExecAsyncOutput.Parameters['signal-name'].AsString (e.g. 'SIGTERM')
-               GDB.ExecAsyncOutput.PArameters['signal-meaning'].AsString (e.g. 'Terminated')
+               GDB.ExecAsyncOutput.Parameters['signal-meaning'].AsString (e.g. 'Terminated')
           }
         DoEndSession(1);
       end;

packages/ide/globdir.inc

@@ -18,7 +18,7 @@
 {$ifdef Go32V2}
   { NOVESA conditional avoids use of
     vesa unit, it also disables USE_GRAPH_SWITCH
-    conditional, in order to obtain a go32v2 excutable that
+    conditional, in order to obtain a go32v2 executable that
     doesn't require full screen switching
     at startup on Windows OS }
   {$ifndef NOVESA}

packages/ide/weditor.pas

@@ -300,7 +300,7 @@ type
       function    GetMark(Index:Sw_integer):PEditorBookMark; virtual;
       procedure   AdjustMark(APosX,Adjustment:Sw_integer); virtual;
       { Syntax information is now generated separately for each editor instance.
-        This is not neccessary for a one-language IDE, but this unit contains
+        This is not necessary for a one-language IDE, but this unit contains
         a _generic_ editor object, which should be (and is) as flexible as
         possible.
         The overhead caused by generating the same syntax info for ex.
@@ -2395,7 +2395,7 @@ var
     tmpIs:=(MatchesAnySpecSymbol(ssCommentPrefix,pmLeft));
     if tmpIs
       and (CurrentCommentType=2) {bad, we are making assumption that this is comment opener (* }
-      and (LineText[X+1]=')') { looking into next char is bad aproach but it is working }
+      and (LineText[X+1]=')') { looking into next char is bad approach but it is working }
       then
         tmpIs:=false;  { in comment this "(*)" is not start of new nested comment but end }
     IsMatchingCommentPrefix:= tmpIs and (CurrentCommentType=SymbolIndex);
@@ -2698,7 +2698,7 @@ var
                 begin
                   inc(CurrentCommentDepth);
                   if LookForNestedComments then
-                  begin  { once per every nested comment test IsNestedCommments }
+                  begin  { once per every nested comment test IsNestedComments }
                     LookForNestedComments:=false;
                     NestedComments:=Editor^.IsNestedComments(X,CurLineNr);
                   end;
@@ -2786,7 +2786,7 @@ begin
     PrevLine:=GetLine(CurLineNr-1)
   else
     PrevLine:=nil;
-  CommentStartY:=CurLineNr-1; { use in detection for false positive commment: (*) }
+  CommentStartY:=CurLineNr-1; { use in detection for false positive comment: (*) }
   repeat
     Line:=GetLine(CurLineNr);
     if Assigned(PrevLine) then PrevLI:=PrevLine^.GetEditorInfo(Editor) else PrevLI:=nil;
@@ -4397,7 +4397,7 @@ begin
                 FreeFormat[X]:=false;
               end;
 
-            { redundant check, for loop condition is taking care of coorect range
+            { redundant check, for loop condition is taking care of correct range
             if (0<=LSX+X-1-Delta.X) and (LSX+X-1-Delta.X<MaxViewWidth) then  }
               MoveChar(B[LSX+X-1-Delta.X],C,Color,1);
           end; { for X:=1 to ... }
@@ -4425,7 +4425,7 @@ begin
       SetCursor(GetReservedColCount+CurPos.X-Delta.X,EditorToViewLine(CurPos.Y)-Delta.Y);
       InsertMode:=Overwrite;
       if IsFlagSet (efBlockInsCursor) then
-         InsertMode:=not InsertMode; {revers insert and overwrite mode cursor shapes}
+         InsertMode:=not InsertMode; {reverse insert and overwrite mode cursor shapes}
       SetState(sfCursorIns,InsertMode);
     end;
 end;
@@ -4847,7 +4847,7 @@ begin
   else
     SetCurPtr(CurPos.X,Delta.Y);
  end;
- 
+
  procedure TCustomCodeEditor.WindowEnd;
  begin
   if not NoSelect and ShouldExtend then
@@ -4903,7 +4903,7 @@ begin
     if Assigned(Line) then
       Line^.InsertMark(@Self,@Bookmarks[MarkIdx])
     else
-      Bookmarks[MarkIdx].Valid:=false; {this should not be ever reached, but safty first}
+      Bookmarks[MarkIdx].Valid:=false; {this should not be ever reached, but safety first}
   end;
 end;
 
@@ -6691,7 +6691,7 @@ begin
   begin
     Lines:=GetLineCount;
     {Linecount can be 0, but in that case there still is a cursor blinking in top
-     of the window, which will become line 1 as soon as sometype hits a key.}
+     of the window, which will become line 1 as soon as someone hits a key.}
     if lines=0 then
       lines:=1;
     if EditorDialog(edGotoLine, @GotoRec) <> cmCancel then
@@ -7273,7 +7273,7 @@ begin
   Lock;
 
   { here should be some kind or "mark" or "break" inserted in the Undo
-    information, so activating it "undoes" only the completition first and
+    information, so activating it "undoes" only the completion first and
     doesn't delete the complete word at once... - Gabor }
 
   FragLen:=Length(GetCodeCompleteFrag);
@@ -7354,7 +7354,7 @@ begin
       else if (SelStart.Y < SelEnd.Y) and ( ((SelStart.Y=CurPos.Y) and (SelStart.X<=CurPos.X)) or ((SelEnd.Y=CurPos.Y) and (SelEnd.X>=CurPos.X))) then
         InSelectionArea:=true  {in first line or last line}
       else if (SelStart.Y > SelEnd.Y) and ( ((SelStart.Y=CurPos.Y) and (SelStart.X>=CurPos.X)) or ((SelEnd.Y=CurPos.Y) and (SelEnd.X<=CurPos.X))) then
-        InSelectionArea:=true; {in first line or last line (selection Start and End revers)}
+        InSelectionArea:=true; {in first line or last line (selection Start and End reverse)}
     end;
 end;
 
@@ -7439,7 +7439,7 @@ begin
    dec(ey);
   S:='';
   { Find shortest white space of beginning of line from all lines
-    for simplisity reason Tab is not recognized as white space in this regard }
+    for simplicity reason Tab is not recognized as white space in this regard }
   LLen:=0;
   WhiteLen:=-1;
   WhiteLen:= WhiteLen shr 1; { logical SHR to get max sw_integer }
@@ -7694,7 +7694,7 @@ begin
   while OK and (Line<=EndP.Y) and (Line<GetLineCount) do
   begin
     S:=GetLineText(Line);
-    { Remove all traling spaces PM }
+    { Remove all trailing spaces PM }
     if not Editor^.IsFlagSet(efKeepTrailingSpaces) then
       s:=RTrim(S,False); // removes trailing #0 too
     { if FlagSet(efUseTabCharacters) then
@@ -7988,7 +7988,7 @@ begin
   DInput := New(PFPFileInputLine, Init(R, 79{FileNameLen+4}));
   DInput^.SetData(S);
   DInput^.GrowMode:=FileName^.GrowMode;
-  InsertBefore(DInput,FileName); {insert before to preserv order as it was}
+  InsertBefore(DInput,FileName); {insert before to preserve order as it was}
   Delete(FileName);
   Dispose(FileName,done);
   FileName:=DInput;

packages/ide/whlpview.pas

@@ -887,7 +887,7 @@ begin
   begin
     if Y=R.A.Y then StartX:=R.A.X else StartX:=Margin;
     if Y=R.B.Y then EndX:=R.B.X else EndX:=High(S);
-    S:=S+copy(GetLineText(Y),StartX+1,EndX-StartX+1);   { Note: AnsiString to ShortString convertino}
+    S:=S+copy(GetLineText(Y),StartX+1,EndX-StartX+1);   { Note: AnsiString to ShortString convertion}
     Inc(Y);
   end;
   GetLinkText:=S;

packages/ide/whtml.pas

@@ -441,7 +441,7 @@ begin
   if (Code=165) or (Name='yen')    then E:=''   else { yen sign                      }
   if (Code=166) or (Name='brvbar') then E:='|'   else { broken vertical bar           }
   if (Code=167) or (Name='sect')   then E:=''   else { section sign                  }
-  if (Code=168) or (Name='uml')    then E:='"'   else { umlaut  (dieresis)            }
+  if (Code=168) or (Name='uml')    then E:='"'   else { umlaut  (diaeresis)           }
   if (Code=169) or (Name='copy')   then E:='(C)' else { copyright sign                }
 (*  if (Code=170) or (Name='ordf')   then E:=#255  else { ordinal indicator, feminine   }*)
   if (Code=171) or (Name='laquo')  then E:='"'   else { angle quotation mark -left    }
@@ -460,7 +460,7 @@ begin
 (*  if (Code=184) or (Name='cedil')  then E:='?'   else { cedilla                       }*)
   if (Code=185) or (Name='sup1')   then E:='^1'  else { superscript 1                 }
 (*  if (Code=186) or (Name='ordm')   then E:='?'   else { ordinal indicator, masculine  }*)
-  if (Code=187) or (Name='raquo')  then E:='"'   else { angle quoatation mark -right  }
+  if (Code=187) or (Name='raquo')  then E:='"'   else { angle quotation mark -right   }
   if (Code=188) or (Name='frac14') then E:='¬'   else { fraction one-quarter          }
   if (Code=189) or (Name='frac12') then E:='«'   else { fraction one-half             }
   if (Code=190) or (Name='frac34') then E:='3/4' else { fraction three-quarters       }
@@ -476,11 +476,11 @@ begin
   if (Code=200) or (Name='Egrave') then E:=''   else { capital E, grave accent       }
   if (Code=201) or (Name='Eacute') then E:=''   else { capital E, acute accent       }
   if (Code=202) or (Name='Ecirc')  then E:='E'   else { capital E, circumflex accent  }
-  if (Code=203) or (Name='Euml')   then E:='E'   else { capital E, dieresis or umlaut }
+  if (Code=203) or (Name='Euml')   then E:='E'   else { capital E, diaeresis or umlaut}
   if (Code=204) or (Name='Igrave') then E:='I'   else { capital I, grave accent       }
   if (Code=205) or (Name='Iacute') then E:='I'   else { capital I, acute accent       }
   if (Code=206) or (Name='Icirc')  then E:='I'   else { capital I, circumflex accent  }
-  if (Code=207) or (Name='Iuml')   then E:='I'   else { capital I, dieresis or umlaut }
+  if (Code=207) or (Name='Iuml')   then E:='I'   else { capital I, diaeresis or umlaut}
 (*  if (Code=208) or (Name='ETH')    then E:='?'   else { capital Eth, Icelandic        }*)
   if (Code=209) or (Name='Ntidle') then E:='¥'   else { capital N, tilde              }
   if (Code=210) or (Name='Ograve') then E:='O'   else { capital O, grave accent       }
@@ -525,10 +525,10 @@ begin
   if (Code=249) or (Name='ugrave') then E:='—'   else { small u, grave accent         }
   if (Code=250) or (Name='uacute') then E:='£'   else { small u, acute accent         }
   if (Code=251) or (Name='ucirc')  then E:='–'   else { small u, circumflex accent    }
-  if (Code=252) or (Name='uuml')   then E:=''   else { small u, dieresis or umlaut   }
+  if (Code=252) or (Name='uuml')   then E:=''   else { small u, diaeresis or umlaut   }
   if (Code=253) or (Name='yacute') then E:='y'   else { small y, acute accent         }
 (*  if (Code=254) or (Name='thorn')  then E:='?'   else { small thorn, Icelandic        }*)
-  if (Code=255) or (Name='yuml')   then E:='y'   else { small y, dieresis or umlaut   }
+  if (Code=255) or (Name='yuml')   then E:='y'   else { small y, diaeresis or umlaut  }
   { Special codes appearing in TeXH generated files }
   if (code=$2c6{710}) or (Name='circ')  then E:='^' else      { Modifier Letter Circumflex Accent }
   if (code=$2dc{732}) or (Name='tilde') then E:='~' else      { Small tilde }

packages/ide/whtmlhlp.pas

@@ -734,7 +734,7 @@ begin
  CanonicalizeURL:=CompleteURL(Base,relative);
 end;
 
-procedure THTMLTopicRenderer.Resolve( href: ansistring; var AFileId,ALinkId : sw_integer); 
+procedure THTMLTopicRenderer.Resolve( href: ansistring; var AFileId,ALinkId : sw_integer);
 begin
 {$IFDEF WDEBUG}
               DebugMessageS({$i %file%},' htmlresolve "'+HRef+'"',{$i %line%},'1',0,0);
@@ -792,7 +792,7 @@ begin
         begin
 {$IFDEF WDEBUG}
           DebugMessage(GetFileName,' Found '+SuppressUntil+'comment "'
-            +Comment+'" SuppressOuput reset to false',Line,1);
+            +Comment+'" SuppressOutput reset to false',Line,1);
 {$endif WDEBUG}
           SuppressOutput:=false;
           SuppressUntil:='';
@@ -1362,14 +1362,14 @@ begin
    CanonicalizeUrl:=relative;
 end;
 
-procedure TCHMTopicRenderer.Resolve( href: ansistring; var AFileId,ALinkId : sw_integer); 
+procedure TCHMTopicRenderer.Resolve( href: ansistring; var AFileId,ALinkId : sw_integer);
 var resolved:boolean;
 begin
 {$IFDEF WDEBUG}
   DebugMessageS({$i %file%},' chmresolve "'+HRef+'"',{$i %line%},'1',0,0);
 {$ENDIF WDEBUG}
   resolved:=false; AFileID:=0; ALinkID:=0;	
-  href:=stringreplace(href,'%20',' '); 
+  href:=stringreplace(href,'%20',' ');
   if copy(href,1,7)='ms-its:' then
     resolved:=CHMResolve(Href,AFileId,ALinkID);
   if not resolved then

packages/ide/winclip.pas

@@ -218,7 +218,7 @@ var
   M : MemPtr;
 {$endif DOS}
 {$ifdef linux}
-  rez : boolean; {one variable needed to satifay compiler}
+  rez : boolean; {one variable needed to satisfy compiler}
 {$endif linux}
 {$ifdef Windows}
   h : HGlobal;

packages/ide/wnghelp.pas

@@ -394,7 +394,7 @@ begin
          AddFormatParamInt(R.SClass);
          AddFormatParamInt(L);
          AddFormatParamInt(R.Size);
-         ErrorBox('Uknown help record tag %x encountered, '+
+         ErrorBox('Unknown help record tag %x encountered, '+
                   'offset %x, size %d',@FormatParams);
        {$else}
          {Skip};

packages/ide/woahelp.pas

@@ -181,7 +181,7 @@ begin
        AddFormatParamInt(R.SClass);
        AddFormatParamInt(L);
        AddFormatParamInt(R.Size);
-       ErrorBox('Uknown help record tag %x encountered, '+
+       ErrorBox('Unknown help record tag %x encountered, '+
                 'offset %x, size %d',@FormatParams);
      {$else}
        {Skip};

packages/ide/wos2help.pas

@@ -84,7 +84,7 @@ type
 
       TINFTOCEntry = packed record
         Size     : byte; { length of the entry including this byte    }
-        Flags    : byte; { flag byte, description folows (MSB first)  }
+        Flags    : byte; { flag byte, description follows (MSB first)  }
         NumSlots : byte; { number of "slots" occupied by the text for }
                          { this toc entry                             }
         Slots    : record end;

packages/ide/wviews.pas

@@ -151,7 +151,7 @@ type
     end;
 
     { Dialog that broadcasts empty space mouse clicks }
-    { Needed for dialogs that contines TDropDownListBox }
+    { Needed for dialogs that contains TDropDownListBox }
     PDialogEmptyClick = ^TDialogEmptyClick;
     TDialogEmptyClick = object(TCenterDialog)
       procedure HandleEvent(var Event: TEvent); virtual;
@@ -2279,7 +2279,7 @@ begin
 {          ListBox^.List:=nil;}
           InDel:=true;
           LB:=ListBox; ListBox:=nil; { this prevents GPFs while deleting }
-          Owner^.Delete(LB);  { GPFs have been resoved by not calling this rotine from ListBox itself  M }
+          Owner^.Delete(LB);  { GPFs have been resolved by not calling this routine from ListBox itself  M }
           Dispose(LB, Done);
         end;
       if SB<>nil then

packages/ide/wwinhelp.pas

@@ -1444,7 +1444,7 @@ begin
           {Column:=}ReadSHORT; {-1 = end of topic}
           {Unknown:=}ReadSHORT; {Always0:=}ReadCHAR;
         end;
-        {Unknown:=}ReadUCHAR; {Uknown:=}ReadCHAR;
+        {Unknown:=}ReadUCHAR; {Unknown:=}ReadCHAR;
         ID:=ReadUSHORT;
         Flags:=ReadUSHORT;
         if (Flags and 1)<>0 then