You've already forked CEF4Delphi
mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2025-12-13 21:45:55 +02:00
Added the MiniBrowser demo for Linux
Fixed the Linux version of WindowInfoAsPopUp.
This commit is contained in:
Salvador Diaz Fau
316
demos/Lazarus_Linux/MiniBrowser/uMiniBrowser.lfm
Normal file
316
demos/Lazarus_Linux/MiniBrowser/uMiniBrowser.lfm
Normal file
@@ -0,0 +1,316 @@
|
||||
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
Block a user