Var
UA: integer;
UAescojido: Ustring;
...
{$ELSE}
settings.multi_threaded_message_loop := True;
{$ENDIF}
settings.cache_path := CefString(Cache);
UA:= Random(2)+1;
if UA=1 then UAescojido:= 'Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; Trident/5.0)';
if UA=2 then UAescojido:= 'Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; WOW64; Trident/5.0)';
settings.user_agent := cefstring(UAescojido);