zoukankan      html  css  js  c++  java
  • Delphi 常用语句

    1.屏蔽Float浮点数出错:

    Set8087CW(Longword($133f));



    2.Idhttp参数设置:

      FIdhttp                  := TIdHTTP.Create(nil);
      FSSL := TIdSSLIOHandlerSocket.Create(nil);        

      strlst := TStringList.Create;

       strlst.Add('a=saveclientlog');
       strlst.Add('logmac=' + MacStr);


      FSSL.SSLOptions.Method:=sslvSSLv23;
      FSSL.SSLOptions.Mode:=sslmUnassigned;
      FIdhttp.IOHandler := FSSL;
      FIdhttp.AllowCookies := True;
      FIdhttp.HandleRedirects := false;
      FIdhttp.HTTPOptions := [hoKeepOrigProtocol, hoForceEncodeParams];
      FIdhttp.ReadTimeout := 20000;
      FIdhttp.Request.UserAgent := 'Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko)   Chrome/44.0.2403.107 Safari/537.36';

     s   := FIdhttp.Get(str_url);

     s :=  IdHTTP.Post(str_url, strlst);
      FIdhttp.Free;


    3.Headers参数设置

     Header := TCefStringMapOwn.Create;
    //  Header.Append('Accept', 'text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8');
    //  Header.Append('Accept-Charset', 'GBK,utf-8;q=0.7,*;q=0.3');
    //  Header.Append('Accept-Encoding', 'gzip,deflate,sdch');
    //  Header.Append('Accept-Language', 'zh-CN,zh;q=0.8');
    //  Header.Append('Connection', 'keep-alive');
      Header.Append('Referer', FromUrl);
    //  Header.Append('Cookie', '');


        request.SetFlags(WUR_FLAG_NONE);
        request.SetMethod('GET');
        try
          request.SetHeaderMap(Header);
        except
        end;
        request.SetUrl(targetUrl);





  • 相关阅读:
    tomcat控制台运行窗口中文乱码
    jquery html5 file 上传图片显示图片
    修改输入框placeholder文字默认颜色-webkit-input-placeholder
    H5移动端知识点总结
    PostgreSQL
    PostgreSQL
    Hexo系列(2)
    SQL
    Java笔记-序列化的注意点
    js、css外部文件的相对路径问题
  • 原文地址:https://www.cnblogs.com/xtfnpgy/p/9285384.html
Copyright © 2011-2022 走看看