Browse Source

* avoid a int64 warning

pierre 23 years ago
parent
commit
0e8b05cf11
1 changed files with 6 additions and 2 deletions
  1. 6 2
      ide/wviews.pas

+ 6 - 2
ide/wviews.pas

@@ -1809,7 +1809,8 @@ const
 var
 var
   Mouse : TPoint;
   Mouse : TPoint;
   OldItem, NewItem : Sw_Integer;
   OldItem, NewItem : Sw_Integer;
-  ColWidth,Count : Sw_Word;
+  ColWidth : sw_integer;
+  Count : Sw_Word;
   GoSelectItem: sw_integer;
   GoSelectItem: sw_integer;
   MouseWhere: TPoint;
   MouseWhere: TPoint;
 begin
 begin
@@ -2495,7 +2496,10 @@ end;
 END.
 END.
 {
 {
   $Log$
   $Log$
-  Revision 1.5  2002-09-07 15:40:50  peter
+  Revision 1.6  2002-09-09 07:06:53  pierre
+   * avoid a int64 warning
+
+  Revision 1.5  2002/09/07 15:40:50  peter
     * old logs removed and tabs fixed
     * old logs removed and tabs fixed
 
 
   Revision 1.4  2002/08/13 07:12:08  pierre
   Revision 1.4  2002/08/13 07:12:08  pierre