forum.boolean.name - keybd

не работает keybd_event, и портит всю роботу открития элемента, открытие просто циклитса...:SOS: :SOS:

PHP код:




procedure TForm2.Timer2Timer(Sender: TObject); 
begin 
 
 inc(ii); 
 
            Edit1.Text := Utf8ToAnsi(zapp[ii]); 
            Clipboard. AsText:= Edit1. Text; 
    b:=webbrowser1.oleobject.document.getelementbyid('ldF9'); 
 
   b.click;     
 
 
 Application.ProcessMessages(); 
 
    keybd_event(VK_LCONTROL,0,0,0); 
  keybd_event(Ord('V'),0,0,0); 
  keybd_event(Ord('V'),0,KEYEVENTF_KEYUP,0); 
  keybd_event(VK_LCONTROL,0,KEYEVENTF_KEYUP,0); 
 
   keybd_event(VK_RETURN,0,0,0); 
  keybd_event(VK_RETURN,0,KEYEVENTF_KEYUP,0); 
 
 
timer3.Interval:=2000; 
timer3.Enabled:=true; 
timer2.enabled:=false; 
 
  end;