Delphi/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2024-11-16 16:25:57 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity
12cce1cbba
CEF4Delphi/demos/Lazarus_Linux/MiniBrowser/uMiniBrowser.lfm
Salvador Diaz Fau 76d296871f Added the MiniBrowser demo for Linux 
Fixed the Linux version of WindowInfoAsPopUp.
2021-01-06 12:18:14 +01:00

317 lines
8.3 KiB
Plaintext
Raw Blame History

object MiniBrowserFrm: TMiniBrowserFrm
Left = 347
Height = 712
Top = 163
Width = 1184
Caption = 'Initializing browser. Please wait...'
ClientHeight = 712
ClientWidth = 1184
Color = clBtnFace
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
OnActivate = FormActivate
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDestroy = FormDestroy
Position = poScreenCenter
LCLVersion = '2.0.10.0'
object NavControlPnl: TPanel
Left = 0
Height = 25
Top = 0
Width = 1184
Align = alTop
BevelOuter = bvNone
ClientHeight = 25
ClientWidth = 1184
Enabled = False
TabOrder = 0
object NavButtonPnl: TPanel
Left = 0
Height = 25
Top = 0
Width = 133
Align = alLeft
BevelOuter = bvNone
ClientHeight = 25
ClientWidth = 133
TabOrder = 0
object BackBtn: TButton
Left = 8
Height = 25
Top = 0
Width = 25
Caption = '3'
Font.CharSet = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Webdings'
OnClick = BackBtnClick
ParentFont = False
TabOrder = 0
end
object ForwardBtn: TButton
Left = 39
Height = 25
Top = 0
Width = 25
Caption = '4'
Font.CharSet = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Webdings'
OnClick = ForwardBtnClick
ParentFont = False
TabOrder = 1
end
object ReloadBtn: TButton
Left = 70
Height = 25
Top = 0
Width = 25
Caption = 'q'
Font.CharSet = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Webdings'
OnClick = ReloadBtnClick
ParentFont = False
TabOrder = 2
end
object StopBtn: TButton
Left = 101
Height = 25
Top = 0
Width = 25
Caption = '='
Font.CharSet = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Webdings'
OnClick = StopBtnClick
ParentFont = False
TabOrder = 3
end
end
object URLEditPnl: TPanel
Left = 133
Height = 25
Top = 0
Width = 978
Align = alClient
BevelOuter = bvNone
ClientHeight = 25
ClientWidth = 978
TabOrder = 1
object URLCbx: TComboBox
Left = 0
Height = 21
Top = 3
Width = 978
Anchors = [akTop, akLeft, akRight, akBottom]
ItemHeight = 0
ItemIndex = 0
Items.Strings = (
'https://www.google.com'
'https://www.whatismybrowser.com/detect/what-http-headers-is-my-browser-sending'
'https://www.w3schools.com/js/tryit.asp?filename=tryjs_win_close'
'https://www.w3schools.com/js/tryit.asp?filename=tryjs_alert'
'https://www.w3schools.com/js/tryit.asp?filename=tryjs_loc_assign'
'https://www.w3schools.com/html/html5_video.asp'
'http://www.adobe.com/software/flash/about/'
'http://isflashinstalled.com/'
'http://html5test.com/'
'https://webrtc.github.io/samples/src/content/devices/input-output/'
'https://test.webrtc.org/'
'https://www.w3schools.com/'
'http://webglsamples.org/'
'https://get.webgl.org/'
'https://www.briskbard.com'
'https://www.youtube.com'
'https://html5demos.com/drag/'
'https://developers.google.com/maps/documentation/javascript/examples/streetview-embed?hl=fr'
'https://www.w3schools.com/Tags/tryit.asp?filename=tryhtml_iframe_name'
'http://www-db.deis.unibo.it/courses/TW/DOCS/w3schools/html/tryit.asp-filename=tryhtml5_html_manifest.html'
'https://www.browserleaks.com/webrtc'
'https://frames-per-second.appspot.com/'
'chrome://version/'
'chrome://net-internals/'
'chrome://tracing/'
'chrome://appcache-internals/'
'chrome://blob-internals/'
'chrome://view-http-cache/'
'chrome://credits/'
'chrome://histograms/'
'chrome://media-internals/'
'chrome://kill'
'chrome://crash'
'chrome://hang'
'chrome://shorthang'
'chrome://gpuclean'
'chrome://gpucrash'
'chrome://gpuhang'
'chrome://extensions-support'
'chrome://process-internals'
)
TabOrder = 0
Text = 'https://www.google.com'
end
end
object ConfigPnl: TPanel
Left = 1111
Height = 25
Top = 0
Width = 73
Align = alRight
BevelOuter = bvNone
ClientHeight = 25
ClientWidth = 73
TabOrder = 2
object ConfigBtn: TButton
Left = 40
Height = 25
Top = 0
Width = 25
Caption = '≡'
Font.CharSet = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'Arial'
Font.Style = [fsBold]
OnClick = ConfigBtnClick
ParentFont = False
TabOrder = 0
end
object GoBtn: TButton
Left = 8
Height = 25
Top = 0
Width = 25
Caption = '►'
Default = True
Font.CharSet = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'Arial'
Font.Style = [fsBold]
OnClick = GoBtnClick
ParentFont = False
TabOrder = 1
end
end
end
object StatusBar1: TStatusBar
Left = 0
Height = 17
Top = 695
Width = 1184
Panels = <
item
Width = 500
end>
SimplePanel = False
end
object CEFLinkedWindowParent1: TCEFLinkedWindowParent
Left = 0
Height = 670
Top = 25
Width = 1184
Align = alClient
TabStop = True
TabOrder = 2
OnEnter = CEFLinkedWindowParent1Enter
OnExit = CEFLinkedWindowParent1Exit
Chromium = Chromium1
end
object Chromium1: TChromium
OnPdfPrintFinished = Chromium1PdfPrintFinished
OnLoadError = Chromium1LoadError
OnLoadingStateChange = Chromium1LoadingStateChange
OnGotFocus = Chromium1GotFocus
OnBeforeContextMenu = Chromium1BeforeContextMenu
OnContextMenuCommand = Chromium1ContextMenuCommand
OnPreKeyEvent = Chromium1PreKeyEvent
OnKeyEvent = Chromium1KeyEvent
OnAddressChange = Chromium1AddressChange
OnTitleChange = Chromium1TitleChange
OnStatusMessage = Chromium1StatusMessage
OnAfterCreated = Chromium1AfterCreated
OnBeforeClose = Chromium1BeforeClose
OnClose = Chromium1Close
OnBeforePluginLoad = Chromium1BeforePluginLoad
Left = 32
Top = 224
end
object PopupMenu1: TPopupMenu
Left = 32
Top = 168
object ShowDevTools1: TMenuItem
Caption = 'Show DevTools'
OnClick = ShowDevTools1Click
end
object HideDevTools1: TMenuItem
Caption = 'Hide DevTools'
OnClick = HideDevTools1Click
end
object N4: TMenuItem
Caption = '-'
end
object Openfile1: TMenuItem
Caption = 'Open file with a FILE URL...'
OnClick = Openfile1Click
end
object OpenfilewithaDAT1: TMenuItem
Caption = 'Open file with a DATA URL...'
OnClick = OpenfilewithaDAT1Click
end
object N2: TMenuItem
Caption = '-'
end
object Print1: TMenuItem
Caption = 'Print'
Enabled = False
OnClick = Print1Click
end
object PrintinPDF1: TMenuItem
Caption = 'Print to PDF'
Enabled = False
OnClick = PrintinPDF1Click
end
object N3: TMenuItem
Caption = '-'
end
object Zoom1: TMenuItem
Caption = 'Zoom'
object Inczoom1: TMenuItem
Caption = 'Inc zoom'
OnClick = Inczoom1Click
end
object Deczoom1: TMenuItem
Caption = 'Dec zoom'
OnClick = Deczoom1Click
end
object Resetzoom1: TMenuItem
Caption = 'Reset zoom'
OnClick = Resetzoom1Click
end
end
end
object SaveDialog1: TSaveDialog
Left = 32
Top = 112
end
object OpenDialog1: TOpenDialog
Filter = 'HTML files|*.htm;*.html|Text files|*.txt|PDF files|*.pdf|Image files|*.jpg;*.jpeg;*.png;*.bmp;*.gif'
Left = 32
Top = 280
end
object Timer1: TTimer
Enabled = False
Interval = 300
OnTimer = Timer1Timer
Left = 32
Top = 344
end
end
Reference in New Issue View Git Blame Copy Permalink