  | 
	
		
	
	
		Chromium - Вопросы и ответы, обсуждения - Ваши вопросы по Pascal/Delphi только в данном разделе | 
	 
	 
	
	
	
	
	
	
	
	
	
	
	
		 
	 
 
	
	
		
	
	
    
        
            
             
            15.01.2014, 13:47
            
            
         | 
        
             
            #1
            
         | 
    
 
    
    
  
    | 
    
     | 
     
  
    | 
    
     | 
    
    
     | 
   
  
    
        Разведчик  
     | 
     
 
    
      
  
            
    
      
    
            
                 Регистрация: 27.10.2012  
                
                
                
                 Сообщений: 24
                   
 Популярность: -183  
                  
	 Сказал(а) спасибо: 35  
	
		
			
				Поблагодарили 23 раз(а) в 14 сообщениях
			
		
	 
     
 
             
                
               
                
       
                  
     | 
    
    
    
        
        
            
            
                 
                Chromium
             
             
            
        
        
        
            
               
    
  
        
        
          
                
                
                  
                        
                          | 
                        
                        Цитата: | 
                        
                          | 
                   
                 
                 | 
                
                 | 
                
                
                
                 | 
           
         
        
          
                | 
                 | 
                 | 
                
                 | 
           
          
                | 
                 | 
                
                	 procedure TForm1.Chromium1LoadEnd(Sender: TObject; const browser: ICefBrowser; 
const frame: ICefFrame; httpStatusCode: Integer; out Result: Boolean); 
 
begin 
if CheckBox1.Checked=True then 
begin 
Chromium1.Browser.MainFrame.ExecuteJavaScript ('document.getElementById("Кнопка") .click();','',0); 
Chromium1.Browser.MainFrame.ExecuteJavaScript ('document.getElementById("Кнопка") .click();','',0); 
if pos ('Текст',Chromium1.Browser.MainFrame.Source) <> 0 then 
begin 
pars(edit4.text,edit5.text,edit1.text,edit2.text,'  Текст',0); 
chistka(); 
cheked (); 
end 
else 
begin 
Chromium1.Load('Ссылка); 
end 
end 
else 
begin 
end; 
end;  | 
                
                 | 
           
          
                
                  | 
                
                 | 
                
                  | 
           
         
         | 
   
 
 Проблема в том, что сначала выполняются функции, а потом уже клики. 
Мне нужно наоборот, что бы сначала выполнилось 2 клика, а потом уже функции. 
 
P.S. Заранее спасибо.
     
         
        
        
        
        
        
        
            
             ________________  
                 Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
  
 Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). 
             
        
        
        
        
     | 
 
    | 
        
        
        
        
         
     | 
    
    
    
        
        
        
        
             
        
        
        
        
        
        
        
            
        
        
        
     | 
 
 
 
  
	 
	
		 
	 
 
	
	
		
	
	
    
        
            
             
            18.01.2014, 00:35
            
            
         | 
        
             
            #2
            
         | 
    
 
    
    
  
    | 
    
     | 
     
  
    | 
    
     | 
    
    
     | 
   
  
    
        Рыцарь  
     | 
     
 
    
      
  
            
    
      
    
            
                 Регистрация: 12.04.2009  
                
                
                
                 Сообщений: 394
                   
 Популярность: 47903  
                  
	 Сказал(а) спасибо: 515  
	
		
			
				Поблагодарили 1,124 раз(а) в 430 сообщениях
			
		
	 
     
 
             
                
               
                
       
                  
     | 
    
    
    
        
        
            
            
                 
                Re: Chromium
             
             
            
        
        
        
            
               
    По идее нужно добавить задержку. Чтобы процесс браузера получил процессорное время. 
sleep(100);
     
         
        
        
        
        
        
        
            
             ________________  
                 Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
  
В любом из нас спит гений. И с каждым днем все крепче.  
Запомните раз и навсегда:= 'Помочь' <> 'Сделайте за меня'; 
 Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). 
             
        
        
        
        
     | 
 
    | 
        
        
        
        
         
     | 
    
    
    
        
        
        
        
             
        
        
        
        
        
        
        
            
        
        
        
     | 
 
 
 
	
		
			| 
				
					Пользователь сказал cпасибо:
				
				
				
			 | 
			 | 
		 
	 
  
  
	 
	
		 
	 
 
 
	
		
	
	
	
	
	
		
	
		 
		Ваши права в разделе
	 | 
 
	
		
		Вы не можете создавать новые темы 
		Вы не можете отвечать в темах 
		Вы не можете прикреплять вложения 
		Вы не можете редактировать свои сообщения 
		 
		
		
		
		
		HTML код Выкл. 
		 
		
	  | 
 
 
	 | 
	
		
	 | 
 
 
Заявление об ответственности / Список мошенников
Часовой пояс GMT +4, время: 10:39. 
		 
	 
 
 | 
  |