* Do not use InfoLong as size can be different from InfoPtr used in Message

git-svn-id: trunk@19844 -

ide/fpsymbol.pas

@@ -1789,7 +1789,7 @@ begin
         cmDebuggerStopped :
           begin
             if Assigned(DebuggerValue) and
-               (DebuggerValue^.GDBI<>Event.InfoLong) then
+               (DebuggerValue^.GDBI<>PtrInt(Event.InfoPtr)) then
               begin
                 If Assigned(ST^.Text) then
                   DisposeStr(ST^.Text);

ide/weditor.pas

@@ -6950,7 +6950,7 @@ begin
      evBroadcast :
            case Event.Command of
                    cminputlinelen : begin
-                                      if Event.InfoLong=0 then
+                                      if PtrInt(Event.InfoPtr)=0 then
                                         okbutton^.DisableCommands([cmok])
                                       else
                                         okbutton^.EnableCommands([cmok]);