CEF4Delphi/demos/MiniBrowser/uMiniBrowser.dfm

302 lines
7.2 KiB
Plaintext
Raw Normal View History

object MiniBrowserFrm: TMiniBrowserFrm
Left = 0
Top = 0
Caption = 'MiniBrowser'
ClientHeight = 712
ClientWidth = 1184
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Splitter1: TSplitter
Left = 1179
Top = 41
Width = 5
Height = 652
Align = alRight
Visible = False
ExplicitLeft = 0
ExplicitTop = 657
ExplicitHeight = 909
end
object NavControlPnl: TPanel
Left = 0
Top = 0
Width = 1184
Height = 41
Align = alTop
BevelOuter = bvNone
Enabled = False
ShowCaption = False
TabOrder = 0
object NavButtonPnl: TPanel
Left = 0
Top = 0
Width = 133
Height = 41
Align = alLeft
BevelOuter = bvNone
ShowCaption = False
TabOrder = 0
object BackBtn: TButton
Left = 8
Top = 8
Width = 25
Height = 25
Caption = '3'
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Webdings'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = BackBtnClick
end
object ForwardBtn: TButton
Left = 39
Top = 8
Width = 25
Height = 25
Caption = '4'
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Webdings'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = ForwardBtnClick
end
object ReloadBtn: TButton
Left = 70
Top = 8
Width = 25
Height = 25
Caption = 'q'
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Webdings'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = ReloadBtnClick
end
object StopBtn: TButton
Left = 101
Top = 8
Width = 25
Height = 25
Caption = '='
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'Webdings'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = StopBtnClick
end
end
object URLEditPnl: TPanel
Left = 133
Top = 0
Width = 978
Height = 41
Align = alClient
BevelOuter = bvNone
Padding.Top = 9
Padding.Bottom = 8
ShowCaption = False
TabOrder = 1
object URLCbx: TComboBox
Left = 0
Top = 9
Width = 978
Height = 21
Align = alClient
ItemIndex = 0
TabOrder = 0
Text = 'https://www.google.com'
Items.Strings = (
'https://www.google.com'
'https://www.whatismybrowser.com/detect/what-http-headers-is-my-b' +
'rowser-sending'
'https://www.w3schools.com/js/tryit.asp?filename=tryjs_win_close'
'https://www.w3schools.com/html/html5_video.asp'
'http://www.adobe.com/software/flash/about/'
'http://isflashinstalled.com/'
2017-04-06 10:07:06 +02:00
'chrome://version/'
'http://html5test.com/'
2017-04-12 09:42:46 +02:00
'https://www.w3schools.com/'
'http://webglsamples.org/'
'https://www.youtube.com'
2017-08-29 13:59:11 +02:00
'https://html5demos.com/drag/'
'https://developers.google.com/maps/documentation/javascript/exam' +
'ples/streetview-embed?hl=fr')
end
end
object ConfigPnl: TPanel
Left = 1111
Top = 0
Width = 73
Height = 41
Align = alRight
BevelOuter = bvNone
TabOrder = 2
object ConfigBtn: TButton
Left = 40
Top = 8
Width = 25
Height = 25
Caption = #8801
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = ConfigBtnClick
end
object GoBtn: TButton
Left = 8
Top = 8
Width = 25
Height = 25
Caption = #9658
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = GoBtnClick
end
end
end
object CEFWindowParent1: TCEFWindowParent
Left = 0
Top = 41
Width = 1179
Height = 652
Align = alClient
TabOrder = 1
end
object DevTools: TCEFWindowParent
Left = 1184
Top = 41
Width = 0
Height = 652
Align = alRight
TabOrder = 2
Visible = False
end
object StatusBar1: TStatusBar
Left = 0
Top = 693
Width = 1184
Height = 19
Panels = <
item
Width = 50
end>
end
object Chromium1: TChromium
OnTextResultAvailable = Chromium1TextResultAvailable
2017-08-10 20:27:10 +02:00
OnPdfPrintFinished = Chromium1PdfPrintFinished
OnLoadingStateChange = Chromium1LoadingStateChange
OnBeforeContextMenu = Chromium1BeforeContextMenu
OnContextMenuCommand = Chromium1ContextMenuCommand
OnPreKeyEvent = Chromium1PreKeyEvent
OnKeyEvent = Chromium1KeyEvent
OnAddressChange = Chromium1AddressChange
OnTitleChange = Chromium1TitleChange
OnFullScreenModeChange = Chromium1FullScreenModeChange
OnStatusMessage = Chromium1StatusMessage
OnAfterCreated = Chromium1AfterCreated
OnResourceResponse = Chromium1ResourceResponse
Left = 32
Top = 224
end
object PopupMenu1: TPopupMenu
OnPopup = PopupMenu1Popup
Left = 32
Top = 168
object DevTools1: TMenuItem
Caption = 'DevTools'
OnClick = DevTools1Click
end
object N4: TMenuItem
Caption = '-'
end
object Openfile1: TMenuItem
Caption = 'Open file...'
OnClick = Openfile1Click
end
object N2: TMenuItem
Caption = '-'
end
object Print1: TMenuItem
Caption = 'Print'
OnClick = Print1Click
end
object PrintinPDF1: TMenuItem
Caption = 'Print to PDF'
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
object N1: TMenuItem
Caption = '-'
end
object Preferences1: TMenuItem
Caption = 'Preferences...'
OnClick = Preferences1Click
end
end
object SaveDialog1: TSaveDialog
Left = 32
Top = 112
end
object ApplicationEvents1: TApplicationEvents
OnMessage = ApplicationEvents1Message
Left = 32
Top = 56
end
object OpenDialog1: TOpenDialog
2017-06-22 11:51:15 +02:00
Filter =
'HTML files|*.htm;*.html|Text files|*.txt|PDF files|*.pdf|Image f' +
'iles|*.jpg;*.jpeg;*.png;*.bmp;*.gif'
Left = 32
Top = 280
end
end