Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
hido
Üye
Mesajlar: 268 Kayıt: 29 Mar 2014 04:32
Mesaj
gönderen hido » 14 Eyl 2014 08:23
Selam, google chrome veya yandex ile açmış olduğum web browserda açılan sitenin kullanıcı paneline otomatik olarak kullanıcı adını ve şifre girişi yapabilirim?
Kod: Tümünü seç
procedure TForm1.Button3Click(Sender: TObject);
var
ie: Variant;
begin
ie := CreateOleObject('InternetExplorer.Application');
ie.Visible := true;
ie.Navigate('http://www.delphiturkiye.com/forum/ucp.php?mode=login');
end;
hido
Üye
Mesajlar: 268 Kayıt: 29 Mar 2014 04:32
Mesaj
gönderen hido » 18 Eyl 2014 06:05
Konu güncel...
brs
Üye
Mesajlar: 626 Kayıt: 04 Eki 2012 03:52
Mesaj
gönderen brs » 18 Eyl 2014 07:49
hido yazdı: Konu güncel...
Dostum buna benzer bir konuda ben açmıştım fakat olmadı işin biraz zor...
İşi bilen yardım eder, az bilen akıl verir, bilmeyen eleştirir, yapamayan ise çamur atar...
ercanskose
Üye
Mesajlar: 62 Kayıt: 18 Eyl 2011 02:31
Mesaj
gönderen ercanskose » 19 Eyl 2014 01:49
bu işlem için html parse kullanmalısın. editlere kullanıcı adını ve şifreyi yazdırıp butona komut verdirmelisin.
brs
Üye
Mesajlar: 626 Kayıt: 04 Eki 2012 03:52
Mesaj
gönderen brs » 19 Eyl 2014 07:14
bu konuyu bende ayrıca araştırıyorum fakat zor bir konu seçmişsin yazılım konusunda iyi bir bilgi birikim gerekiyor...
İşi bilen yardım eder, az bilen akıl verir, bilmeyen eleştirir, yapamayan ise çamur atar...
hido
Üye
Mesajlar: 268 Kayıt: 29 Mar 2014 04:32
Mesaj
gönderen hido » 22 Eyl 2014 06:40
Bir haftadır bir çok kod denedim ama hiç biri olmadı maalesef Türkiye'de çok araştıra bileceğin forum yok bir delphi türkiye kaldı burasıda pek aktif değil bakalım nasıl çözeceğim sorunu...
brs
Üye
Mesajlar: 626 Kayıt: 04 Eki 2012 03:52
Mesaj
gönderen brs » 24 Eyl 2014 10:43
Selam, buna benzer bir şey olası lazım ama inputlara setfocus işlemini nasıl yapabilirsin bilmiyorum
Kod: Tümünü seç
procedure TForm2.Button1Click(Sender: TObject);
var
IE: OleVariant;
begin
if VarIsEmpty(IE) then
begin
IE := CreateOleObject('InternetExplorer.Application');
IE.Navigate('https://www.facebook.com.tr');
IE.Document.GetElementById('keywords').Value := 'sifrem';
IE.Document.GetElementById('email').Value := 'kullanıcıad';
end;
try
IE.Visible := True;
except
ShowMessage('İnternet Explorer Kapatılmış');
end;
end;
İşi bilen yardım eder, az bilen akıl verir, bilmeyen eleştirir, yapamayan ise çamur atar...