Autor Téma: Delphi 10.4 - TEdgeBrowser  (Přečteno 3200 krát)

Offline neo

  • Plnoletý
  • ***
  • Příspěvků: 120
  • Karma: 2
    • Verze Delphi: Delphi 6, Delphi 10.3.3
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #30 kdy: 20-07-2020, 10:53:13 »
Takže Delphi 10.4

Script error
https://pagead2.googlesyndication.com/pagead/js/adsbygoogle.js

Objekt neumožňuje použít vlastnosti či metody addEventListener
URL:    https://www.whatismybrowser.com/

Script error
https://cdn.whatismybrowser.com/prod-website/static/main/js/site.min.js?date=o72jJ19gpv14

------------------------------------
A Delphi 10.3.3

Pouze jedna chyba

Script error
https://cdn.whatismybrowser.com/prod-website/static/main/js/site.min.js?date=o72jJ19gpv14





Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 2867
  • Karma: 106
    • Verze Delphi: D2007, DXE + 2 poslední
    • O Delphi v češtině
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #31 kdy: 20-07-2020, 10:57:33 »
Takže Delphi 10.4

Obavam se, ze je spise neco spatne s tvojimi Win - viz. priloha z D 10.4

Dal jsem na formular v novem VCL projektu TWebBrowser, a na tlacitko jsem dal

WebBrowser1.Navigate('https://www.whatismybrowser.com/');

Kód: Delphi [Vybrat]
  1.   object WebBrowser1: TWebBrowser
  2.     Left = 24
  3.     Top = 8
  4.     Width = 465
  5.     Height = 393
  6.     TabOrder = 0
  7.     SelectedEngine = EdgeIfAvailable
  8.     ControlData = {
  9.       4C0000000F3000009E2800000000000000000000000000000000000000000000
  10.       000000004C000000000000000000000001000000E0D057007335CF11AE690800
  11.       2B2E12620A000000000000004C0000000114020000000000C000000000000046
  12.       8000000000000000000000000000000000000000000000000000000000000000
  13.       00000000000000000100000000000000000000000000000000000000}
  14.   end
  15.  
« Poslední změna: 20-07-2020, 10:59:54 od Radek Červinka »
Embarcadero MVP - Czech republic

Offline neo

  • Plnoletý
  • ***
  • Příspěvků: 120
  • Karma: 2
    • Verze Delphi: Delphi 6, Delphi 10.3.3
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #32 kdy: 20-07-2020, 10:59:29 »
Pokud tu adresu zavolám přímo z IE nebo Edge tak jede bez chyb

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 2867
  • Karma: 106
    • Verze Delphi: D2007, DXE + 2 poslední
    • O Delphi v češtině
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #33 kdy: 20-07-2020, 11:01:46 »
P.S.: bez povoleni v registrech to pise

Your web browser is:
Internet Explorer 11 on Windows 10
Internet Explorer 7 Compatibility View
Embarcadero MVP - Czech republic

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 2867
  • Karma: 106
    • Verze Delphi: D2007, DXE + 2 poslední
    • O Delphi v češtině
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #34 kdy: 20-07-2020, 11:02:13 »
Pokud tu adresu zavolám přímo z IE nebo Edge tak jede bez chyb

To jsi asi nepochopil, CO ti to vypise?
Embarcadero MVP - Czech republic

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 2867
  • Karma: 106
    • Verze Delphi: D2007, DXE + 2 poslední
    • O Delphi v češtině
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #35 kdy: 20-07-2020, 11:08:36 »
A jeste, mas nainstalovane nejake "inteligentni" antiviry, listicky nebo tak neco na blokovani? Evidentne neco ti to blokuje.
Embarcadero MVP - Czech republic

Offline neo

  • Plnoletý
  • ***
  • Příspěvků: 120
  • Karma: 2
    • Verze Delphi: Delphi 6, Delphi 10.3.3
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #36 kdy: 20-07-2020, 11:14:39 »
Používám ESET NOD, ale hlavně ... jak jsem již psal .. pokud to zavolám přímo z IE nebo Egde ... žádnou chybu to nehlásí

Offline neo

  • Plnoletý
  • ***
  • Příspěvků: 120
  • Karma: 2
    • Verze Delphi: Delphi 6, Delphi 10.3.3
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #37 kdy: 20-07-2020, 11:22:02 »
Tady je screen

Offline neo

  • Plnoletý
  • ***
  • Příspěvků: 120
  • Karma: 2
    • Verze Delphi: Delphi 6, Delphi 10.3.3
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #38 kdy: 20-07-2020, 11:22:40 »
A tady Delphi 10.4

Offline neo

  • Plnoletý
  • ***
  • Příspěvků: 120
  • Karma: 2
    • Verze Delphi: Delphi 6, Delphi 10.3.3
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #39 kdy: 20-07-2020, 11:24:08 »
Ty screeny jsou z aplikace

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 2867
  • Karma: 106
    • Verze Delphi: D2007, DXE + 2 poslední
    • O Delphi v češtině
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #40 kdy: 20-07-2020, 11:30:39 »
A tady Delphi 10.4
No prima, takze vsichni vidime, ze pouzivas IE v modu IE7, tj. vychozi mod.

A ted v registrech
Počítač\HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION

pro tvuj exe zaloz spravny zaznam a tim rekni jadru ze  opravdu fakt muze pouzivat IE v modernim modu a včetně javascriptu ... a tim se dostaneme tam, co jsem psal v 10:57....
« Poslední změna: 20-07-2020, 11:33:55 od Radek Červinka »
Embarcadero MVP - Czech republic

Offline neo

  • Plnoletý
  • ***
  • Příspěvků: 120
  • Karma: 2
    • Verze Delphi: Delphi 6, Delphi 10.3.3
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #41 kdy: 20-07-2020, 12:14:05 »
No fajn ... takže každý kdo si spustí aplikaci ve které bude použit TWebBrowser musí udělat nejprve tuhle opičárnu v registrech ?

To znamená, že bude nekonečné vysvětlování proč ten IE (nebo Edge) samostatně funguje správně ala "zabalený" v applikaci sází jednu chybu za druhou ...

Asi to tak bude ... nicméně to je opravdu pokrok ......... 

Jdu to zkusit

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 2867
  • Karma: 106
    • Verze Delphi: D2007, DXE + 2 poslední
    • O Delphi v češtině
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #42 kdy: 20-07-2020, 12:19:06 »
No fajn ... takže každý kdo si spustí aplikaci ve které bude použit TWebBrowser musí udělat nejprve tuhle opičárnu v registrech ?

To znamená, že bude nekonečné vysvětlování proč ten IE (nebo Edge) samostatně funguje správně ala "zabalený" v applikaci sází jednu chybu za druhou ...

Asi to tak bude ... nicméně to je opravdu pokrok ......... 

Jdu to zkusit

Ted si delas srandu že? Tohle je std. chovani embedded IE ve Windows od IE 8, kdy je výchozí pro použití v aplikacích nastaveno, že se chová jako IE7 a ty nebo instalátor to musíš explicitně povolit. Většina webů  nějak funguvala i v modu IE7 takže jsi na to možná nepřišel.
 
Je možné, že v 10.4 se začalo používat něco z API co umí až ten vyšší mod IE, ale tato akce v registrech je známá x let a aplikují to všemožné programy. TWebBrowser s tím nemá nic společného.
« Poslední změna: 20-07-2020, 12:21:41 od Radek Červinka »
Embarcadero MVP - Czech republic

Offline neo

  • Plnoletý
  • ***
  • Příspěvků: 120
  • Karma: 2
    • Verze Delphi: Delphi 6, Delphi 10.3.3
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #43 kdy: 20-07-2020, 12:31:27 »
Přiznám, se že jsem tohle do detailů nikdy nezkoumal a ani se o to nezajímál ... TWebBrowser je do aplikace přidaný jako méně podstatný doplňek pro zjednodušení náhledu na nějaké stránky přímo z aplikace. Takže mě dost překvapilo, že zcela jednoduchá věc v 10.3 fungovala, v 10.4. přestala fungovat - takže dva exe file (jeden kompilovaný 10.3 a druhý 10.4 se chovají diamterálně jinak.

Navíc asi nemám možnost ovlivnit to chování přímo z komponenty TWebBrowser - to znamená přímo z aplikace.

Myslím, že došlo i ke změně v používání API ...tak jak píšeš ...


Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 2867
  • Karma: 106
    • Verze Delphi: D2007, DXE + 2 poslední
    • O Delphi v češtině
Re:Delphi 10.4 - TEdgeBrowser
« Odpověď #44 kdy: 20-07-2020, 12:47:00 »
tak zkus pouzit ten puvodni webbrowser prejmenovany v 10.4
Embarcadero MVP - Czech republic