Страница: 1 | 
		
		 
			   
			 
			 Есть кнопка, самая обычная =) Навожу на нее мышкой и кликаю =) Теперь вопрос, как сделать так, чтобы пока я не отпустил кнопку мыши, т.е. кнопка нажата у меня постоянно увеличивалась значение переменной i as integer, а как только кнопка будет отпущена, т.е. Command1_MouseUp значение переменной i перестало увеличиваться. Вро ды бы задача не сложная, но как реализовать не знаю. Может кто подскажет, буду очень благодарен =) 
			 
			 По-моему, тебе это подойдёт вешаеш на форме таймер ,задаеш интервал с которым у тебя будет прибавлятся значение... допустим ставиш 1000(1 сек), прописываеш в процедуре таймера i=i+1 и по событию Command1_MouseDown таймер врубаеш... т.е. timer1.enabled=true. соответственно по MouseUp - вырубаеш(timer1.enabled=false) вроде должно работать.... Таймер поставь.  MouseDown - Timer1.Enabled=True , а MouseUp - Timer1.Enabled=False   Ну а в таймере i=i+1  Гы... мы че одновременно писали ответы  походу  Все работает, спасибо  Страница: 1 | 
 
			
 
  
		
     
  
    
Вопрос: Вроде очень легко, но не знаю как. ?????          
     
    
Добавлено: 17.07.03 18:12
     
      
  
				
			  
					 
			
				 
    
		
       
    
Автор вопроса:  
     Chill | ICQ: 554200
 Chill | ICQ: 554200 
      
       
  
 
    
				
		
		
					 
			
				 
  
		
     
  
    
Ответы
     
    
Всего ответов: 6
     
      
  
		
	  
			 
	
		 
    
       
    
Номер ответа: 1 
      
Автор ответа: RotesByte
 RotesByte







Вопросов: 11
Ответов: 69
      
 Web-сайт:  
 Профиль |  | #1
      
Добавлено:  17.07.03 18:43
       
    
       
  
 
    
		
	  
			 
	
		 
    
       
    
Номер ответа: 2 
      
Автор ответа: Hydralisk
 Hydralisk

Вопросов: 5
Ответов: 13
      
 Профиль |  | #2
       
Добавлено:  17.07.03 18:44
       
    
       
  
 
    
		
	  
			 
	
		 
    
       
    
Номер ответа: 3 
      
Автор ответа: Russian Neo
 Russian Neo


ICQ: 248318020 
Вопросов: 22
Ответов: 195
      
 Web-сайт:  
 Профиль |  | #3
      
Добавлено:  17.07.03 18:44
       
    
       
  
 
     .
. 
		
	  
			 
	
		 
    
       
    
Номер ответа: 4 
      
Автор ответа: Russian Neo
 Russian Neo


ICQ: 248318020 
Вопросов: 22
Ответов: 195
      
 Web-сайт:  
 Профиль |  | #4
      
Добавлено:  17.07.03 18:46
       
    
       
  
 
     !!!!!!!!!!!!!!!!?
 !!!!!!!!!!!!!!!!?
		
	  
			 
	
		 
    
       
    
Номер ответа: 5 
      
Автор ответа: Hydralisk
 Hydralisk

Вопросов: 5
Ответов: 13
      
 Профиль |  | #5
       
Добавлено:  17.07.03 19:00
       
    
       
  
 
    
		
	  
			 
	
		 
    
       
    
Номер ответа: 6 
      
Автор ответа: Chill
 Chill




ICQ: 554200 
Вопросов: 101
Ответов: 343
      
 Профиль |  | #6
       
Добавлено:  17.07.03 20:31
       
    
       
  
 
    