-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathmv.WebView.BrowserForm.fmx
102 lines (102 loc) · 3 KB
/
mv.WebView.BrowserForm.fmx
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
object BrowserForm: TBrowserForm
Left = 0
Top = 0
BorderStyle = None
Caption = 'Simple FMX Browser - Initializing...'
ClientHeight = 600
ClientWidth = 1000
Position = ScreenCenter
FormFactor.Width = 320
FormFactor.Height = 480
FormFactor.Devices = [Desktop]
OnCreate = FormCreate
OnResize = FormResize
OnShow = FormShow
DesignerMasterStyle = 0
object Timer1: TTimer
Enabled = False
Interval = 300
OnTimer = Timer1Timer
Left = 104
Top = 192
end
object BrowserLay: TLayout
Align = Client
Size.Width = 1000.000000000000000000
Size.Height = 578.000000000000000000
Size.PlatformDefault = False
TabOrder = 2
object FocusWorkaroundBtn: TButton
Position.X = 368.000000000000000000
Position.Y = 208.000000000000000000
Size.Width = 1.000000000000000000
Size.Height = 1.000000000000000000
Size.PlatformDefault = False
TabOrder = 0
end
end
object AddressLay: TLayout
Align = Top
Enabled = False
Padding.Left = 5.000000000000000000
Padding.Top = 5.000000000000000000
Padding.Right = 5.000000000000000000
Padding.Bottom = 5.000000000000000000
Size.Width = 1000.000000000000000000
Size.Height = 32.000000000000000000
Size.PlatformDefault = False
Visible = False
TabOrder = 0
object AddressEdt: TEdit
Touch.InteractiveGestures = [LongTap, DoubleTap]
Align = Client
TabOrder = 0
Size.Width = 949.000000000000000000
Size.Height = 22.000000000000000000
Size.PlatformDefault = False
Visible = False
end
object GoBtn: TButton
Align = Right
Margins.Left = 5.000000000000000000
Position.X = 959.000000000000000000
Position.Y = 5.000000000000000000
Size.Width = 36.000000000000000000
Size.Height = 22.000000000000000000
Size.PlatformDefault = False
TabOrder = 1
Text = 'Go'
Visible = False
OnClick = GoBtnClick
end
end
object StatusBar1: TStatusBar
Padding.Left = 3.000000000000000000
Padding.Top = 3.000000000000000000
Padding.Right = 30.000000000000000000
Padding.Bottom = 3.000000000000000000
Position.Y = 578.000000000000000000
ShowSizeGrip = True
Size.Width = 1000.000000000000000000
Size.Height = 22.000000000000000000
Size.PlatformDefault = False
TabOrder = 1
object StatusLbl: TLabel
Align = Client
Size.Width = 967.000000000000000000
Size.Height = 16.000000000000000000
Size.PlatformDefault = False
TabOrder = 0
end
end
object WVFMXBrowser1: TWVFMXBrowser
TargetCompatibleBrowserVersion = '95.0.1020.44'
AllowSingleSignOnUsingOSPrimaryAccount = False
OnInitializationError = WVFMXBrowser1InitializationError
OnAfterCreated = WVFMXBrowser1AfterCreated
OnGotFocus = WVFMXBrowser1GotFocus
OnStatusBarTextChanged = WVFMXBrowser1StatusBarTextChanged
Left = 104
Top = 104
end
end