var
oldcur:tcursor;
begin
oldcur := Screen.Cursor;
screen.cursor :=crHourGlass;
oldcur:tcursor;
begin
oldcur := Screen.Cursor;
screen.cursor :=crHourGlass;
OpenEnglishItinerary();
Self.FocusControl(WebBrowser1);
screen.Cursor:=oldcur;
screen.Cursor:=oldcur;