mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2024-11-16 16:25:57 +01:00
031eb58ad1
Added Delphi_VCL/VirtualUIBrowser Added Delphi_FMX_Windows/FMXVirtualUIBrowser Added Lazarus_Windows/VirtualUIBrowser
172 lines
4.2 KiB
Plaintext
172 lines
4.2 KiB
Plaintext
object Form1: TForm1
|
|
Left = 0
|
|
Top = 0
|
|
Caption = 'VirtualUI Browser - Initializing browser. Please wait...'
|
|
ClientHeight = 684
|
|
ClientWidth = 1050
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
Position = poScreenCenter
|
|
OnAfterMonitorDpiChanged = FormAfterMonitorDpiChanged
|
|
OnCloseQuery = FormCloseQuery
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
OnHide = FormHide
|
|
OnShow = FormShow
|
|
TextHeight = 13
|
|
object NavControlPnl: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 1050
|
|
Height = 30
|
|
Align = alTop
|
|
BevelOuter = bvNone
|
|
Enabled = False
|
|
Padding.Left = 5
|
|
Padding.Top = 5
|
|
Padding.Right = 5
|
|
Padding.Bottom = 5
|
|
TabOrder = 0
|
|
ExplicitWidth = 1046
|
|
object AddressCb: TComboBox
|
|
Left = 5
|
|
Top = 5
|
|
Width = 969
|
|
Height = 21
|
|
Align = alClient
|
|
ItemIndex = 0
|
|
TabOrder = 0
|
|
Text = 'https://www.google.com'
|
|
OnEnter = AddressCbEnter
|
|
Items.Strings = (
|
|
'https://www.google.com'
|
|
'https://html5demos.com/drag'
|
|
|
|
'https://www.w3schools.com/tags/tryit.asp?filename=tryhtml5_selec' +
|
|
't_form'
|
|
'https://www.briskbard.com'
|
|
'https://frames-per-second.appspot.com/'
|
|
'file:///transparency.html')
|
|
ExplicitWidth = 965
|
|
end
|
|
object Panel2: TPanel
|
|
Left = 974
|
|
Top = 5
|
|
Width = 71
|
|
Height = 20
|
|
Margins.Left = 2
|
|
Margins.Top = 2
|
|
Margins.Right = 2
|
|
Margins.Bottom = 2
|
|
Align = alRight
|
|
BevelOuter = bvNone
|
|
Padding.Left = 4
|
|
TabOrder = 1
|
|
ExplicitLeft = 970
|
|
object GoBtn: TButton
|
|
Left = 4
|
|
Top = 0
|
|
Width = 31
|
|
Height = 20
|
|
Margins.Left = 5
|
|
Align = alLeft
|
|
Caption = 'Go'
|
|
TabOrder = 0
|
|
OnClick = GoBtnClick
|
|
OnEnter = GoBtnEnter
|
|
end
|
|
object SnapshotBtn: TButton
|
|
Left = 40
|
|
Top = 0
|
|
Width = 31
|
|
Height = 20
|
|
Hint = 'Take snapshot'
|
|
Margins.Left = 5
|
|
Align = alRight
|
|
Caption = #181
|
|
Font.Charset = SYMBOL_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -24
|
|
Font.Name = 'Webdings'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
OnClick = SnapshotBtnClick
|
|
OnEnter = SnapshotBtnEnter
|
|
end
|
|
end
|
|
end
|
|
object Panel1: TBufferPanel
|
|
Left = 0
|
|
Top = 30
|
|
Width = 1050
|
|
Height = 654
|
|
OnIMECancelComposition = Panel1IMECancelComposition
|
|
OnIMECommitText = Panel1IMECommitText
|
|
OnIMESetComposition = Panel1IMESetComposition
|
|
OnCustomTouch = Panel1CustomTouch
|
|
OnPointerDown = Panel1PointerDown
|
|
OnPointerUp = Panel1PointerUp
|
|
OnPointerUpdate = Panel1PointerUpdate
|
|
OnPaintParentBkg = Panel1PaintParentBkg
|
|
Align = alClient
|
|
Ctl3D = False
|
|
ParentCtl3D = False
|
|
BevelOuter = bvNone
|
|
TabOrder = 1
|
|
TabStop = True
|
|
OnClick = Panel1Click
|
|
OnEnter = Panel1Enter
|
|
OnExit = Panel1Exit
|
|
OnMouseDown = Panel1MouseDown
|
|
OnMouseMove = Panel1MouseMove
|
|
OnMouseUp = Panel1MouseUp
|
|
OnResize = Panel1Resize
|
|
OnMouseLeave = Panel1MouseLeave
|
|
ExplicitWidth = 1046
|
|
ExplicitHeight = 653
|
|
end
|
|
object chrmosr: TChromium
|
|
OnAddressChange = chrmosrAddressChange
|
|
OnTooltip = chrmosrTooltip
|
|
OnCursorChange = chrmosrCursorChange
|
|
OnBeforePopup = chrmosrBeforePopup
|
|
OnAfterCreated = chrmosrAfterCreated
|
|
OnBeforeClose = chrmosrBeforeClose
|
|
OnGetViewRect = chrmosrGetViewRect
|
|
OnGetScreenPoint = chrmosrGetScreenPoint
|
|
OnGetScreenInfo = chrmosrGetScreenInfo
|
|
OnPopupShow = chrmosrPopupShow
|
|
OnPopupSize = chrmosrPopupSize
|
|
OnPaint = chrmosrPaint
|
|
OnIMECompositionRangeChanged = chrmosrIMECompositionRangeChanged
|
|
Left = 24
|
|
Top = 56
|
|
end
|
|
object AppEvents: TApplicationEvents
|
|
OnMessage = AppEventsMessage
|
|
Left = 24
|
|
Top = 128
|
|
end
|
|
object SaveDialog1: TSaveDialog
|
|
DefaultExt = 'bmp'
|
|
Filter = 'Bitmap files (*.bmp)|*.BMP'
|
|
Title = 'Save snapshot'
|
|
Left = 24
|
|
Top = 278
|
|
end
|
|
object Timer1: TTimer
|
|
Enabled = False
|
|
Interval = 300
|
|
OnTimer = Timer1Timer
|
|
Left = 24
|
|
Top = 206
|
|
end
|
|
end
|