Страница: 1 | 
		
		 
			   
			 
			 
			 
			 Страница: 1 | 
 
			
 
  
		
     
  
    
Вопрос: Кнопка закрытия окна [X](Обработка события)
     
    
Добавлено: 15.06.07 13:25
     
      
  
				
			  
					 
			
				 
    
		
       
    
Автор вопроса:  
    
 Vitaly
      
       
  
Подскажите, как можно обработать событие нажатия на кнопку закрытия окна броузера [X].
 
    
Я создал на форме кнопку "Завершить работу" и вот процедура, которая выполняет обработку на нажатие этой кнопки.
if (MsgBox ("Завершить работу?",580,"Диалоговое окно выхода")=vbYes)  then
window. close
end if  
end sub
Пытался через событе Window_OnUnload но не то.
				
		
		
					 
			
				 
  
		
     
  
    
Ответы
     
    
Всего ответов: 6
     
      
  
		
	  
			 
	
		 
    
       
    
Номер ответа: 1 
      
Автор ответа:
 1959
![]()
![]()
![]()
![]()
![]()
Вопросов: 2
Ответов: 5
      
 Профиль |  | #1
       
Добавлено:  15.06.07 15:52
       
    
       
  
Попробуй это...
 
    
Private Sub MDIForm_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Unload Me
End Sub
		
	  
			 
	
		 
    
       
    
Номер ответа: 2 
      
Автор ответа:
 ZagZag
![]()
![]()
ICQ: 295002202 
Вопросов: 87
Ответов: 1684
      
 Профиль |  | #2
       
Добавлено:  15.06.07 16:03
       
    
       
  
 
    
    Cancel = Not MsgBox("Закрыть прогу?", vbYesNo) = vbYes
End Sub
		
	  
			 
	
		 
    
       
    
Номер ответа: 3 
      
Автор ответа:
 ZagZag
![]()
![]()
ICQ: 295002202 
Вопросов: 87
Ответов: 1684
      
 Профиль |  | #3
       
Добавлено:  15.06.07 16:05
       
    
       
  
А если по свобственному событию надо закрывать, то
 
    
		
	  
			 
	
		 
    
       
    
Номер ответа: 4 
      
Автор ответа:
 Vitaly
![]()
![]()
![]()
![]()
![]()
![]()
![]()
![]()
Вопросов: 5
Ответов: 7
      
 Профиль |  | #4
       
Добавлено:  16.06.07 19:53
       
    
       
  
Я хочу конкретизировать вопрос, который ранее задал:
 
    
Создал в HTML документе на форме
.......
Sub quit 
if (MsgBox ("Завершить работу?",580,"Диалоговое окно выхода"
=vbYes)  then 
window. close 
end if   
end sub
.......
<FORM>
<INPUT TYPE="BUTTON" VALUE="Завершить работу" name="But" onclick=quit>
.......
</FORM>
Как можно обработать событие нажатия на кнопку закрытия окна броузера [X]. 
		
	  
			 
	
		 
    
       
    
Номер ответа: 5 
      
Автор ответа:
 ZagZag
![]()
![]()
ICQ: 295002202 
Вопросов: 87
Ответов: 1684
      
 Профиль |  | #5
       
Добавлено:  17.06.07 02:37
       
    
       
  
 
    
Но отменить закрытие окна не в состоянии ни один скрипт. Максимум что можно сделать - открыть такую же страницу.
		
	  
			 
	
		 
    
       
    
Номер ответа: 6 
      
Автор ответа:
 Sharp
![]()
![]()
![]()
![]()
![]()
![]()
![]()
![]()
![]()
![]()
Лидер форума
ICQ: 216865379 
Вопросов: 106
Ответов: 9979
      
 Web-сайт:  
 Профиль |  | #6
      
Добавлено:  17.06.07 12:23
       
    
       
  
Можно выдавать дофига алертов, тогда окно IE, во всяком случае, становится просто недоступно  
    
 Но его можно убить через CAD.