Changeset 432

User picture

Author: koreec

(2010/02/01 00:55) About 2 years ago


  

Affected files

Updated branches/1.6.1/Units/unit_Globals.pas Download diff

431432
781
  Genres[i].Alias := Alias;
781
  Genres[i].Alias := Alias;
782
end;
782
end;
783
783
784
785
786
function TBookRecord.GetGenreCount: Integer;
784
function TBookRecord.GetGenreCount: Integer;
787
begin
785
begin
788
  Result := Length(Genres);
786
  Result := Length(Genres);
...
...
888
    end;
886
    end;
889
    BasicAuthentication := True;
887
    BasicAuthentication := True;
890
  end;
888
  end;
891
889
  idHTTP.Request.UserAgent := 'MyHomeLib/2.0 (compatible; Indy Library)';
892
  idHTTP.ConnectTimeout := Settings.TimeOut;
890
  idHTTP.ConnectTimeout := Settings.TimeOut;
893
  idHTTP.ReadTimeout := Settings.ReadTimeOut;
891
  idHTTP.ReadTimeout := Settings.ReadTimeOut;
894
895
//  idHTTP.CookieManager := frmMain.IdCookieManager;
896
  idHTTP.AllowCookies := True;
892
  idHTTP.AllowCookies := True;
897
898
  idHTTP.HandleRedirects := True;
893
  idHTTP.HandleRedirects := True;
899
end;
894
end;
900
895