Browse Source

* FindRec needs longint for CheckBoxes

pierre 26 years ago
parent
commit
7fea4eedc9
1 changed files with 7 additions and 4 deletions
  1. 7 4
      ide/text/weditor.pas

+ 7 - 4
ide/text/weditor.pas

@@ -347,8 +347,8 @@ uses Dos,MsgBox,Dialogs,App,StdDlg,HistList,Validate,
 type
      TFindDialogRec = packed record
        Find     : String[80];
-       Options  : Word;
-       Direction: word;
+       Options  : {Word}longint;{checkboxes need 32  bits PM  }
+       Direction: word;{ and tcluster has word size }
        Scope    : word;
        Origin   : word;
      end;
@@ -356,7 +356,7 @@ type
      TReplaceDialogRec = packed record
        Find     : String[80];
        Replace  : String[80];
-       Options  : Word;
+       Options  : {Word}longint;{checkboxes need 32  bits PM  }
        Direction: word;
        Scope    : word;
        Origin   : word;
@@ -3433,7 +3433,10 @@ end;
 END.
 {
   $Log$
-  Revision 1.25  1999-03-05 17:39:39  pierre
+  Revision 1.26  1999-03-07 22:58:57  pierre
+   * FindRec needs longint for CheckBoxes
+
+  Revision 1.25  1999/03/05 17:39:39  pierre
    * Actions item freeing
 
   Revision 1.24  1999/03/03 16:45:07  pierre