Disclosure Statement: This site contains affiliate links, which means that I may receive a commission if you make a purchase using these links. As an eBay Partner, I earn from qualifying purchases.
If you find these projects useful please consider becoming a sponsor with Patreon, GitHub or Liberapay.

WebView4DelphiFMX_designtime.bpl don't install TWVFMXWindowParent control

Post Reply
FMI
Posts: 6
Joined: Mon May 15, 2023 5:56 pm

WebView4DelphiFMX_designtime.bpl don't install TWVFMXWindowParent control

Post by FMI »

Hello the forum, hello Salvador

I have a problem installing WebView4DelphiFMX FMX design package.
Compilation is ok, but it just install TWVFMXBrowser component.
TWVWindowParent is present in VCL installation but not in FMX installation.

Did someone can explain me what I have to do ? Or what I'm doing wrong !

Thank's a lot and have a good day (or night !!!)

FMI
FMI
Posts: 6
Joined: Mon May 15, 2023 5:56 pm

Re: WebView4DelphiFMX_designtime.bpl don't install TWVFMXWindowParent control

Post by FMI »

Hello the forum, hello Salvador

Component registration is missing in WebView4DelphiFMX_register.pas file.

I do some modifications :
- add "uWVFMXWindowParent" in uses clause
- add "RegisterComponents('WebView4Delphi', [TWVFMXWindowParent]);" in "Register" procedure.

Now FMXWindowParent is in tools box but there is an error when I try to put control to a form.
There is an "Access Violation" error in WebView4DelphiFMXRTL.bpl module
Here details of the error if someone can help me

[48A0512C]{WebView4DelphiFMXRTL.bpl} uWVFMXWindowParent.TWVFMXWindowParent.UpdateSize$qqrv + $30
[50063FE9]{rtl230.bpl } System.@CopyRecord (Line 32731, "System.pas" + 233) + $0
[500640DE]{rtl230.bpl } System.@CopyArray (Line 33004, "System.pas" + 116) + $0
[50329B64]{rtl230.bpl } System.Messaging.{System.Generics.Collections}TList<System.Messaging.TMessageManager.TListenerWithId>.DoDelete (Line 4342, "System.Generics.Collections.pas" + 10) + $0
[50063D44]{rtl230.bpl } System.@FinalizeArray (Line 31928, "System.pas" + 139) + $0
[50063C34]{rtl230.bpl } System.@FinalizeRecord (Line 31631, "System.pas" + 25) + $0
[48A04FFC]{WebView4DelphiFMXRTL.bpl} uWVFMXWindowParent.TWVFMXWindowParent.Resize$qqrv + $14
[0995C8E9]{fmx230.bpl } FMX.Forms.TCommonCustomForm.AfterConstruction (Line 2761, "FMX.Forms.pas" + 3) + $9
[5005FEF1]{rtl230.bpl } System.@AfterConstruction (Line 17542, "System.pas" + 2) + $5
[0995B41B]{fmx230.bpl } FMX.Forms.TCommonCustomForm.Create (Line 2406, "FMX.Forms.pas" + 30) + $13
[21E458C7]{delphicoreide230.bpl} CompPalMgr.TComponentPalettePageItemDelegate.CreateComponent (Line 2755, "CompPalMgr.pas" + 2) + $7
[211ABCC8]{designide230.bpl} ComponentDesigner.TComponentRoot.DoCreateComponent (Line 2490, "ComponentDesigner.pas" + 28) + $17
[211B1FA4]{designide230.bpl} ComponentDesigner.TComponentRoot.CreateCurrentComponent (Line 4791, "ComponentDesigner.pas" + 2) + $34
[092BBBFD]{fmxdesigner230.bpl} FmxSurface.TFmxDesignSurface.CreateItem (Line 7424, "FmxSurface.pas" + 11) + $10
[5006017C]{rtl230.bpl } System.TMonitor.Destroy (Line 17781, "System.pas" + 0) + $0
[5005F7FF]{rtl230.bpl } System.TObject.CleanupInstance (Line 16399, "System.pas" + 24) + $0
[5005A19C]{rtl230.bpl } System.@FreeMem (Line 4644, "System.pas" + 20) + $0
[5005F5F8]{rtl230.bpl } System.TObject.FreeInstance (Line 16187, "System.pas" + 2) + $2
[211723BE]{designide230.bpl} Designer.TDesigner.DoDragCreate (Line 802, "Designer.pas" + 1) + $F
[21172CC0]{designide230.bpl} Designer.TDesigner.DragEnd (Line 988, "Designer.pas" + 19) + $3
[211752D8]{designide230.bpl} Designer.TDesigner.MouseUp (Line 1776, "Designer.pas" + 1) + $2
[092BA4FB]{fmxdesigner230.bpl} FmxSurface.MouseEvent (Line 6601, "FmxSurface.pas" + 89) + $D
[092BAA5C]{fmxdesigner230.bpl} FmxSurface.TFmxDesignSurface.IsDesignMsg (Line 6751, "FmxSurface.pas" + 38) + $2
[098C7904]{fmx230.bpl } FMX.Platform.Win.WndProc (Line 1963, "FMX.Platform.Win.pas" + 10) + $4
[092C771D]{fmxdesigner230.bpl} FmxFormContainer.TControlSizer.ControlWndProc (Line 1734, "FmxFormContainer.pas" + 83) + $32
[5017252C]{rtl230.bpl } System.Classes.StdWndProc (Line 16881, "System.Classes.pas" + 8) + $0
[50ADCEBB]{vcl230.bpl } Vcl.Forms.TApplication.ProcessMessage (Line 10438, "Vcl.Forms.pas" + 23) + $1
[50ADCEFE]{vcl230.bpl } Vcl.Forms.TApplication.HandleMessage (Line 10468, "Vcl.Forms.pas" + 1) + $4
[50ADD231]{vcl230.bpl } Vcl.Forms.TApplication.Run (Line 10606, "Vcl.Forms.pas" + 26) + $3


Thank's and have a good day

FMI
User avatar
salvadordf
Posts: 4563
Joined: Thu Feb 02, 2017 12:24 pm
Location: Spain
Contact:

Re: WebView4DelphiFMX_designtime.bpl don't install TWVFMXWindowParent control

Post by salvadordf »

Hi,

Follow the steps in this guide :
https://github.com/salvadordf/WebView4Delphi/wiki/Installation-in-Delphi

Uninstall WebView4Delphi following the steps in that guide and then install it again. Install the VCL and FMX components.

If you have several Delphi versions in the same operating system then read the last paragraphs of that page.
FMI
Posts: 6
Joined: Mon May 15, 2023 5:56 pm

Re: WebView4DelphiFMX_designtime.bpl don't install TWVFMXWindowParent control

Post by FMI »

Thank's Salvador.

With code modifications in in WebView4DelphiFMX_register.pas file, installation is OK.
TWVFMXWindowParent is present in tools box.

Looking in Delphi_FMX\SimpleFMXBrowser demo program TWVFMXWindowParent is created in run time not in design time.
So I do the same and it's OK.

Have a good day !
FMI
Post Reply