* fixed resize helptext

ide/fpcompil.pas

@@ -294,9 +294,11 @@ begin
     V_Used    : ClassS:=msg_class_used;
     V_Tried   : ClassS:=msg_class_tried;
     V_Debug   : ClassS:=msg_class_debug;
-{$endif}
     else
       ClassS:='???';
+{$endif}
+    else
+      ClassS:='';
   end;  
   if ClassS<>'' then
    ClassS:=RExpand(ClassS,0)+': ';
@@ -1294,7 +1296,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.27  2004-11-06 17:22:52  peter
+  Revision 1.28  2004-11-06 22:02:48  peter
+    * fixed resize helptext
+
+  Revision 1.27  2004/11/06 17:22:52  peter
     * fixes for new fv
 
   Revision 1.26  2004/11/05 00:00:33  peter

ide/fpide.pas

@@ -491,9 +491,9 @@ begin
     NewStatusDef(hcDragging, hcDragging,
       NewStatusKey(status_help, kbF1, cmHelp,
       StdStatusKeys(
-      NewStatusKey('~'#24#25#26#27+'~ Move', kbNoKey, 65535,
-      NewStatusKey('~Shift+'#24#25#26#27+'~ Size', kbNoKey, 65535,
-      NewStatusKey('~'#17+'ÄÙ~ Done', kbNoKey, 65535,
+      NewStatusKey('~Cursor~ Move', kbNoKey, 65535,
+      NewStatusKey('~Shift+Cursor~ Size', kbNoKey, 65535,
+      NewStatusKey('~<ÄÙ~ Done', kbNoKey, 65535,
       NewStatusKey('~Esc~ Cancel', kbNoKey, 65535,
       nil)))))),
     NewStatusDef(hcStackWindow, hcStackWindow,
@@ -1248,7 +1248,10 @@ end;
 END.
 {
   $Log$
-  Revision 1.28  2004-11-04 20:57:59  peter
+  Revision 1.29  2004-11-06 22:02:49  peter
+    * fixed resize helptext
+
+  Revision 1.28  2004/11/04 20:57:59  peter
   sysmsgs is always available
 
   Revision 1.27  2004/11/02 23:53:19  peter

ide/fpmwnd.inc

@@ -27,8 +27,8 @@ end;
 
 procedure TIDEApp.ResizeApplication(x, y : longint);
 var
-  OldR, R : TRect;
-  Mode: TVideoMode;
+  OldR : TRect;
+  Mode : TVideoMode;
 begin
   GetBounds(OldR);
   { adapt to new size }
@@ -259,7 +259,10 @@ end;
 
 {
   $Log$
-  Revision 1.4  2002-09-07 15:40:44  peter
+  Revision 1.5  2004-11-06 22:02:49  peter
+    * fixed resize helptext
+
+  Revision 1.4  2002/09/07 15:40:44  peter
     * old logs removed and tabs fixed
 
   Revision 1.3  2002/06/07 14:09:56  pierre