diff --git a/demos/SimpleLazarusBrowser/SimpleLazarusBrowser.lps b/demos/SimpleLazarusBrowser/SimpleLazarusBrowser.lps index 7cbff02e..f3065886 100644 --- a/demos/SimpleLazarusBrowser/SimpleLazarusBrowser.lps +++ b/demos/SimpleLazarusBrowser/SimpleLazarusBrowser.lps @@ -4,7 +4,7 @@ - + @@ -20,10 +20,10 @@ + - - - + + @@ -138,22 +138,23 @@ - - - + + + + - - - + + + + - - - + + @@ -225,18 +226,16 @@ - + - - + - @@ -269,15 +268,16 @@ - - + + + - - + + @@ -310,125 +310,56 @@ - + - - + - - + - - + - - + - + + + + + + + + + + + + + + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + + + diff --git a/demos/SimpleLazarusBrowser/usimplelazarusbrowser.pas b/demos/SimpleLazarusBrowser/usimplelazarusbrowser.pas index 7ece4bd8..d74f2597 100644 --- a/demos/SimpleLazarusBrowser/usimplelazarusbrowser.pas +++ b/demos/SimpleLazarusBrowser/usimplelazarusbrowser.pas @@ -172,7 +172,7 @@ begin // GlobalCEFApp.GlobalContextInitialized has to be TRUE before creating any browser // If it's not initialized yet, we use a simple timer to create the browser later. //if not(Chromium1.CreateBrowser(CEFWindowParent1)) then Timer1.Enabled := True; - Chromium1.CreateBrowser(CEFWindowParent1); + if not(Chromium1.CreateBrowser(CEFWindowParent1)) then Timer1.Enabled := True; end; procedure TForm1.GoBtnClick(Sender: TObject);