Delphi siteye yorum

[quiet1day]

(31-05-2018, Saat: 00:01)hyperxman Adlı Kullanıcıdan Alıntı:

(31-05-2018, Saat: 00:00)Paranoyaq Adlı Kullanıcıdan Alıntı:

function DoLogin(const username,email,url,comment: string): string;
var
IdHTTP: TIdHTTP;
Request: TStringList;
begin
try
 Request := TStringList.Create;
 try
   Request.Add('action=do_login');
   Request.Add('url=https://www.oyunkabini.com/battlefield-v-ilk-fragmanini-yayinladi-ve-daha-fazlasi-dlc-premium-passes/');
   Request.Add('submit=727');
   Request.Add('author='+username);
   Request.Add('email='+email);
   Request.Add('url='+url);
   Request.Add('comment='+comment);
   Request.Add('submit');
   IdHTTP := TIdHTTP.Create;
   try
     IdHTTP.AllowCookies := True;
     IdHTTP.HandleRedirects := True;
     IdHTTP.Request.ContentType := 'application/x-www-form-urlencoded';
     IdHTTP.Post('https://www.oyunkabini.com/wp-comments-post.php', Request);
     Result := IdHTTP.Get('http://www.oyunkabini.com');
     if StrUtils.ContainsStr(Result, 'submit') then //Login başarısız demektir
       Result := '';
   finally
     IdHTTP.Free;
   end;
 finally
   Request.Free;
 end;
finally
 Result := '';
end;
end;

except yerine finally

buton kodum 

memo2.Lines.Add(DoLogin(edit1.Text,edit2.Text,edit3.Text,memo1.Text));

Hata Could Not Load SSL library

Direkt hatayı yazsan koda gerek kalmayacak... Sadece SSLLib DLL paketini yükle uygulamanın yanına yükle. Forumda mevcut konu bizzat ben açmıştım zaten

Bende denemiştim senin konundaki gibi SSL sürümünden kaynaklanmış şuan hata vermiyor fakat yorumda yok