+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف اضغط على زر داخل المتصفح برمجيا (/showthread.php?tid=5338)
كيف اضغط على زر داخل المتصفح برمجيا - noor - 24-06-2013
السلام عليكم
كيف اضغط على زر داخل المتصفح برمجيا ؟
صنعت متصفح ووضعت موقع معين ويوجد زر بلموقع كيف اضغط على هذا الزر برمجيا
كيف اضغط على زر داخل المتصفح برمجيا - CID_01 - 24-06-2013
[COLOR="DarkOrange"]وعليكم السلام أخي
صراحةلم يسبق لي ان تعاملت مع هذا النوع من البرمجة ولكن هذه الدالة ستفيدك[/COLOR]
PHP كود :
SendMessage(BtnHandle, BM_CLICK, 0,0);
كيف اضغط على زر داخل المتصفح برمجيا - onexite - 24-06-2013
PHP كود :
wb1.OleObject.Document.GetElementByID('Username').SetAttribute('value', edt1.Text);
wb1.OleObject.Document.GetElementByID('Password').SetAttribute('value', edt2.Text);
wb1.OleObject.Document.GetElementByID('submit1').click;
![[صورة: gb7h.jpg]](http://img689.imageshack.us/img689/323/gb7h.jpg)
![[صورة: db35.jpg]](http://img17.imageshack.us/img17/446/db35.jpg)
كيف اضغط على زر داخل المتصفح برمجيا - onexite - 25-06-2013
PHP كود :
procedure TForm1.btn1Click(Sender: TObject);
begin
wb1.OleObject.Document.GetElementByID('skip_ad_button').click;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin //skip_ad_button
wb1.Navigate('http://a d f .l y /1111');
end;