Страница: 1 | 
		
		 
			   
			 
			 
			 
			 Страница: 1 | 
 
			
 
  
		
     
  
    
Вопрос: Операции над окнами
     
    
Добавлено: 20.03.07 17:04
     
      
  
				
			  
					 
			
				 
    
		
       
    
Автор вопроса:  
     KreAtoR
 KreAtoR
      
       
  
Заглавление написал, чтоб и другие примеры тоже пихали.
 
    
А вопрос снова просто до немогу.
Задача чтоб при вызове окна оно открывалось поверх всех окон и не давала их сфокусировать. Это похоже на MsgBox но не оно Ю:(
				
		
		
					 
			
				 
  
		
     
  
    
Ответы
     
    
Всего ответов: 6
     
      
  
		
	  
			 
	
		 
    
       
    
Номер ответа: 1 
      
Автор ответа: ADSemenov.ru
 ADSemenov.ru



Вопросов: 5
Ответов: 276
      
 Web-сайт:  
 Профиль |  | #1
      
Добавлено:  20.03.07 17:22
       
    
       
  
____ Вопрос не понял.
 
    
____ А что, просто изначальная установка ShowModal у формы не годится? Или надо, чтобы и посторонние приложения "загородились"?
		
	  
			 
	
		 
    
       
    
Номер ответа: 2 
      
Автор ответа: AgentFire
 AgentFire



ICQ: 192496851 
Вопросов: 75
Ответов: 3178
      
 Профиль |  | #2
       
Добавлено:  20.03.07 19:08
       
    
       
  
Создавай с помощьй SetWindowLong помоему ей статус "поверх всех окон" (короче, в примеры), а потом просто по таймеру, а лучше по двум ( 
     ) повторяй это дело и даже великие и ужастный Диспетчер задач не будет активен.
) повторяй это дело и даже великие и ужастный Диспетчер задач не будет активен.
		
	  
			 
	
		 
    
       
    
Номер ответа: 3 
      
Автор ответа: Arseny
 Arseny


ICQ: 298826769 
Вопросов: 53
Ответов: 1732
      
 Профиль |  | #3
       
Добавлено:  20.03.07 19:46
       
    
       
  
 
    
Public Const HWND_NOTOPMOST = -2
Public Const HWND_TOPMOST = -1
Public Const SWP_NOACTIVATE = &H10
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOSIZE = &H1
Public Sub SetFormPosition(frmHandl As Long, TopPosition As Boolean)
    If TopPosition Then
        SetWindowPos frmHandl, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE Or SWP_NOSIZE Or SWP_NOMOVE
    Else
        SetWindowPos frmHandl, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOSIZE Or SWP_NOMOVE
    End If
End Sub
'Использование: нижнюю строчку - в Form_Load, или в кнопку, как хочешь...
'Call SetFormPosition(Me.hwnd, True)
		
	  
			 
	
		 
    
       
    
Номер ответа: 4 
      
Автор ответа: MIRC
 MIRC







ICQ: 254226129 
Вопросов: 6
Ответов: 6
      
 Профиль |  | #4
       
Добавлено:  20.03.07 20:04
       
    
       
  
нет ребята, KreAtoR имел ввиду что-то типа 
 
    
frmMain.Show vbModal
и все дела  
		
	  
			 
	
		 
    
       
    
Номер ответа: 5 
      
Автор ответа: AgentFire
 AgentFire



ICQ: 192496851 
Вопросов: 75
Ответов: 3178
      
 Профиль |  | #5
       
Добавлено:  20.03.07 23:28
       
    
       
  
Ах, да, SetWindowPos. Юзай ее каждое таймеровское тобытие по интервалу = 1
 
    
frmMain.Show vbModal 
и все дела  
 
		
	  
			 
	
		 
    
       
    
Номер ответа: 6 
      
Автор ответа: KreAtoR
 KreAtoR





Вопросов: 120
Ответов: 438
      
 Профиль |  | #6
       
Добавлено:  21.03.07 13:26
       
    
       
  
 
    
frmMain.Show vbModal 
и все дела  
 
да да именно это я и имел в виду  пасибо за объяснение что не все так сложно!!!!!
 пасибо за объяснение что не все так сложно!!!!!
а вы сразу API API  )) надо то было хахаха
)) надо то было хахаха
сенкс всем