@rb: don't close popup unless user clicked outside of it (fix in regards of kernel changes)

git-svn-id: svn://kolibrios.org@1411 a494cfbc-eb01-0410-851d-a64ba20cac60

programs/system/rb/trunk/@RB.ASM

@@ -172,10 +172,28 @@ mouse:		  ;
   mov	eax,37
   mov	ebx,2	  ; ª ª¨¥ ª­®¯ª¨ ­ ¦ âë?
   mcall
-  test	eax,eax   ; ­¨ª ª¨¥? - ⮣¤  ¯à¥ªà á­®! ¢¥à­ñ¬áï ¢ £« ­ë© 横«
+  test	eax,eax   ; ­¨ª ª¨¥? - ⮣¤  ¯à¥ªà á­®! ¢¥à­ñ¬áï ¢ £« ¢­ë© 横«
   jz	still2
-  jmp	exit_menu ;   ¥á«¨ ¢áñ-â ª¨ ­ ¦ âë - § ªà®¥¬ ®ª­®
 
+        mcall   37, 0
+        mov     esi, eax
+        shr     esi, 16
+        movzx   edi, ax
+        mcall   9, procinfo2, -1
+        mov     eax, [procinfo2.box.left]
+        cmp     esi, eax
+        jl      exit_menu
+        add     eax, [procinfo2.box.width]
+        cmp     esi, eax
+        jge     exit_menu
+        mov     eax, [procinfo2.box.top]
+        cmp     edi, eax
+        jl      exit_menu
+        add     eax, [procinfo2.box.height]
+        cmp     edi, eax
+        jge     exit_menu
+
+        jmp     still2
 
 ; <20>€†€’€ Š<>Ž<EFBFBD>Š€
 button:
@@ -392,6 +410,7 @@ start_info.path rb 256
 
   sc	   system_colors	; á¨á⥬­ë¥ 梥â 
   procinfo process_information	; ¨­ä®à¬ æ¨ï ® ¯à®æ¥áá¥
+  procinfo2 process_information
 
   rb 1024			; áâíª ¤«ï ®ª­  ¬¥­î - 墠â¨â ¨ 1 Š¡
   align 32
@@ -399,4 +418,4 @@ start_info.path rb 256
 
 
 MEOS_APP_END
-; ŠŽ<C5A0>…– <20><>Žƒ<C5BD>€ŒŒ›
+; ŠŽ<C5A0>…– <20><>Žƒ<C5BD>€ŒŒ›