var
  IdHTTP: TIdHTTP;
  Request: TStringList;
begin
  Request := TStringList.Create;
  try
    Request.Add('action=do_login');
    Request.Add('url=http://www.delphican.com/index.php');
    Request.Add('quick_login=1');
    Request.Add('quick_username=KULLANICI_ADI');
    Request.Add('quick_password=SIFRE');
    Request.Add('quick_remember=yes');
    Request.Add('submit=Giriş Yap');
    IdHTTP := TIdHTTP.Create;
    try
      IdHTTP.AllowCookies := True;
      IdHTTP.HandleRedirects := True;
      IdHTTP.Request.ContentType := 'application/x-www-form-urlencoded';
      IdHTTP.Post('http://www.delphican.com/member.php', Request);
    finally
      IdHTTP.Free;
    end;
  finally
    Request.Free;
  end;

function DoLogin(const username, password: string): string;
var
 IdHTTP: TIdHTTP;
 Request: TStringList;
begin
 try
   Request := TStringList.Create;
   try
     Request.Add('action=do_login');
     Request.Add('url=http://www.delphican.com/index.php');
     Request.Add('quick_login=1');
     Request.Add('quick_username='+username);
     Request.Add('quick_password='+password);
     Request.Add('quick_remember=yes');
     Request.Add('submit=Giriş Yap');
     IdHTTP := TIdHTTP.Create;
     try
       IdHTTP.AllowCookies := True;
       IdHTTP.HandleRedirects := True;
       IdHTTP.Request.ContentType := 'application/x-www-form-urlencoded';
       IdHTTP.Post('http://www.delphican.com/member.php', Request);
       Result := IdHTTP.Get('http://www.delphican.com');
       if StrUtils.ContainsStr(Result, 'quick_login') then //Login başarısız demektir
         Result := '';
     finally
       IdHTTP.Free;
     end;
   finally
     Request.Free;
   end;
 except
   Result := '';
 end;
end;

(11-11-2017, Saat: 15:36)SimaWB Adlı Kullanıcıdan Alıntı: Bir çok kişi için kendi yazdığı program aracılığıyla bir web sitesine login olup oradan bazı bilgileri alma ihtiyacı hâsıl olmuştur. Zaten bu yüzden forumlarda sık sık sorulan 2 konudur "Bir web sitesine login olmak" ve "html parse" konuları.

Bu 2 konuyu bir örnekle göstermeye çalışacağım:
Login olma konusuna örnek olarak http://www.delphican.com'a login olmaya çalışalım  

Bu konuda değişik yöntemler kullanılabilir ama ben Delphi ile birlikte geldiği için Indy bileşenlerinden TIdHTTP bileşenini kullanacağım.
Öncelikle login olmak istediğimiz web sayfasının kaynak kodlarına bakıp login olmak için hangi URL kullanılıyor, hangi değerler POST ediliyor onları tespit etmek gerekli.

http://www.delphican.com/index.php sayfasının kaynak kodlarına baktığımızda login formunun şu şekilde olduğu görülür:



Burada dikkat edeceğimiz ilk şey bu formdaki datalar hangi URLye post edilecek. Form’un action özelliğinden bunu anlayabiliyoruz: http://www.delphican.com/member.php
Demek ki biz IdHTTP.Post işlemi yaparken bu adresi kullanacağız. 

İkincisi ise POST edilecek veriler nelerdir. Bunlar formun içindeki INPUTlardır. 
Programımızda form içindeki inputları ve değerlerini bir liste haline getirip IdHTTP.Post’un ikinci parametresi olarak kullanmalıyız.

var
  IdHTTP: TIdHTTP;
  Request: TStringList;
begin
  Request := TStringList.Create;
  try
    Request.Add('action=do_login');
    Request.Add('url=http://www.delphican.com/index.php');
    Request.Add('quick_login=1');
    Request.Add('quick_username=KULLANICI_ADI');
    Request.Add('quick_password=SIFRE');
    Request.Add('quick_remember=yes');
    Request.Add('submit=Giriş Yap');
    IdHTTP := TIdHTTP.Create;
    try
      IdHTTP.AllowCookies := True;
      IdHTTP.HandleRedirects := True;
      IdHTTP.Request.ContentType := 'application/x-www-form-urlencoded';
      IdHTTP.Post('http://www.delphican.com/member.php', Request);
    finally
      IdHTTP.Free;
    end;
  finally
    Request.Free;
  end;

Bu aşamada kullanıcı adımız ve şifremiz doğru ise login işlemi başarıyla sağlanmış demektir. Fakat başarısız bir login işlemi de olsa yukarıdaki kodda hata mesajı almazsınız. Neden? 
Cevabı basit: hatalı giriş yapsak da bize bir web sayfası gösteriliyor. O zaman biz başarılı giriş yapıp yapmadığımızı nasıl anlayacağız? 
Bunun da kişiye göre değişen çözümleri olabilir. Örneğin, login olunmadığı takdirde delphican.com'un ana sayfasında "Hoşgeldin, Ziyaretçi" yazıyor. Ama login olunmuşsa Ziyaretçi yerine kullanıcı adımız yazıyor. Bu yazı kontrol edilebilir. Ben yukarıda kullandığımız quick_login'leri kullanmak istedim. Login'den sonra sayfanın kaynak kodlarında quick_login varsa login başarısız demektir. 

Bu bilgiler ışında ve yukarıdaki kodlarda sadece kullanıcı adı ve şifremiz değişken olacağına göre bunları bir fonksiyon haline dönüştürelim. 

function DoLogin(const username, password: string): string;
var
 IdHTTP: TIdHTTP;
 Request: TStringList;
begin
 try
   Request := TStringList.Create;
   try
     Request.Add('action=do_login');
     Request.Add('url=http://www.delphican.com/index.php');
     Request.Add('quick_login=1');
     Request.Add('quick_username='+username);
     Request.Add('quick_password='+password);
     Request.Add('quick_remember=yes');
     Request.Add('submit=Giriş Yap');
     IdHTTP := TIdHTTP.Create;
     try
       IdHTTP.AllowCookies := True;
       IdHTTP.HandleRedirects := True;
       IdHTTP.Request.ContentType := 'application/x-www-form-urlencoded';
       IdHTTP.Post('http://www.delphican.com/member.php', Request);
       Result := IdHTTP.Get('http://www.delphican.com');
       if StrUtils.ContainsStr(Result, 'quick_login') then //Login başarısız demektir
         Result := '';
     finally
       IdHTTP.Free;
     end;
   finally
     Request.Free;
   end;
 except
   Result := '';
 end;
end;

Fonksiyonumuz bize tüm sayfanın HTML kodlarını döndürecek. Tabi login başarılı ise    

Bir sonraki aşamada HTML parse'ye örnek olması için bu dönen değeri kullanacağız.

(14-11-2017, Saat: 00:50)delphi-x Adlı Kullanıcıdan Alıntı: Hocam https://namazvakitleri.diyanet.gov.tr/tr-TR adresindeki post sayfasını ve parametreleri nasıl alabiliriz denedim ama yapamadım:
country=2
state=546
stateRegion=9626

(14-11-2017, Saat: 08:04)hyperxman Adlı Kullanıcıdan Alıntı:

(14-11-2017, Saat: 00:50)delphi-x Adlı Kullanıcıdan Alıntı: Hocam https://namazvakitleri.diyanet.gov.tr/tr-TR adresindeki post sayfasını ve parametreleri nasıl alabiliriz denedim ama yapamadım:
country=2
state=546
stateRegion=9626

Hocam bu şekilde birşey istiyorsaniz size source kodları akşam atabilirim.

https://youtu.be/6MsyU7Bse1g

(01-01-2018, Saat: 17:33)tavsanlili Adlı Kullanıcıdan Alıntı: selamlar.

idHttp ile login olduktan sonra diğer sayfalara login olmuş hale gezmek mümkün mü bunun için nasıl bir yok izlemek gerekiyor.
her yeni sayfada tekrar login işleminin tekrarlanması mi gerekli?
dolaşacağımız site bunu nasıl bilecek farklı bir yöntem yada bileşen mi gerekiyor?
bilgi verirseniz sevinirim.

DoLogin('Kullaniciadim', 'sifrem');

  memo1.Lines.add(idhttp1.Get('http://www.delphican.com/index.php'));