⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 demo.dfm

📁 delphi老牌的浏览器控件
💻 DFM
📖 第 1 页 / 共 5 页
字号:
object frmMain: TfrmMain
  Left = 150
  Top = 195
  Width = 888
  Height = 738
  Caption = 'TEmbeddedWB Mega Demo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  WindowState = wsMaximized
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object SplitterACC: TSplitter
    Left = 401
    Top = 110
    Width = 2
    Height = 555
    Cursor = crHSplit
  end
  object PanelWEB: TPanel
    Left = 403
    Top = 110
    Width = 477
    Height = 555
    Align = alClient
    TabOrder = 0
    object pctrlWB: TPageControl
      Left = 1
      Top = 1
      Width = 475
      Height = 553
      ActivePage = TabBrowser
      Align = alClient
      TabIndex = 0
      TabOrder = 0
      object TabBrowser: TTabSheet
        Caption = 'Web Browser'
        object EmbeddedWB1: TEmbeddedWB
          Left = 0
          Top = 0
          Width = 467
          Height = 525
          Align = alClient
          DragMode = dmAutomatic
          TabOrder = 0
          Visible = False
          OnStatusTextChange = EmbeddedWB1StatusTextChange
          OnProgressChange = EmbeddedWB1ProgressChange
          OnCommandStateChange = EmbeddedWB1CommandStateChange
          OnDownloadBegin = EmbeddedWB1DownloadBegin
          OnDownloadComplete = EmbeddedWB1DownloadComplete
          OnTitleChange = EmbeddedWB1TitleChange
          OnPropertyChange = EmbeddedWB1PropertyChange
          OnBeforeNavigate2 = EmbeddedWB1BeforeNavigate2
          OnNewWindow2 = EmbeddedWB1NewWindow2
          OnNavigateComplete2 = EmbeddedWB1NavigateComplete2
          OnDocumentComplete = EmbeddedWB1DocumentComplete
          OnVisible = EmbeddedWB1Visible
          OnFullScreen = EmbeddedWB1FullScreen
          DisableCtrlShortcuts = 'N'
          UserInterfaceOptions = [EnableThemes]
          OnScriptError = EmbeddedWB1ScriptError
          OnRefresh = EmbeddedWB1Refresh
          OnUnload = EmbeddedWB1Unload
          About = ' EmbeddedWB http://bsalsa.com/'
          OnShowDialog = EmbeddedWB1ShowDialog
          PrintOptions.Margins.Left = 19.05
          PrintOptions.Margins.Right = 19.05
          PrintOptions.Margins.Top = 19.05
          PrintOptions.Margins.Bottom = 19.05
          PrintOptions.Header = '&w&bSeite &p von &P'
          PrintOptions.HTMLHeader.Strings = (
            '<HTML></HTML>')
          PrintOptions.Footer = '&u&b&d'
          PrintOptions.Orientation = poPortrait
          UserAgent = 'EmbeddedWB 14.33 from: http://www.bsalsa.com/'
          ControlData = {
            4C000000EA370000742000000000000000000000000000000000000000000000
            000000004C000000000000000000000001000000E0D057007335CF11AE690800
            2B2E126208000000000000004C0000000114020000000000C000000000000046
            8000000000000000000000000000000000000000000000000000000000000000
            00000000000000000100000000000000000000000000000000000000}
        end
      end
      object TabEditor: TTabSheet
        Caption = 'Editor'
        ImageIndex = 1
        TabVisible = False
        object RichEditWB1: TRichEditWB
          Left = 17
          Top = 29
          Width = 450
          Height = 479
          Hint = 
            'File Name: Untitled. | '#10#13'Position: Line:   1   Col:   1. | '#10#13'Mod' +
            'ified. | '#10#13'Caps Lock: Off. | '#10#13'NumLock: On. | '#10#13'Insert: Off. | '#10 +
            #13'Total Lines Count: 1. |'
          Align = alClient
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = []
          Lines.Strings = (
            
              '??????????????????????'#8240'?????????????????????????????????????????' +
              '?????????'#13)
          ParentFont = False
          ParentShowHint = False
          ScrollBars = ssBoth
          ShowHint = True
          TabOrder = 0
          WordWrap = False
          OnKeyDown = RichEditWB1KeyDown
          OnMouseDown = RichEditWB1MouseDown
          AutoNavigate = True
          EmbeddedWB = EmbeddedWB1
          FileName = 'Untitled'
          GapLeft = 21
          GapTop = 20
          HighlightHTML = True
          HighlightURL = True
          HighlightXML = True
          Image = ImageViewer
          RTFText = 
            '{\rtf1\ansi\deff0{\fonttbl{\f0\fnil\fcharset0 Tahoma;}}'#13#10'{\color' +
            'tbl ;\red0\green0\blue0;}'#13#10'\viewkind4\uc1\pard\cf1\lang2055\f0\f' +
            's16 ??????????????????????\'#39'89??????????????????????????????????' +
            '????????????????\par'#13#10'}'#13#10
          SupprtMoreThen64KB = True
          TextAlignment = taLeftJustify
          HideCaret = False
          Themes = tDefault
        end
        object ProgressBar2: TProgressBar
          Left = 0
          Top = 29
          Width = 17
          Height = 479
          Align = alLeft
          Min = 0
          Max = 100
          Orientation = pbVertical
          TabOrder = 1
        end
        object ProgressBar3: TProgressBar
          Left = 0
          Top = 508
          Width = 467
          Height = 17
          Align = alBottom
          Min = 0
          Max = 100
          TabOrder = 2
        end
        object ToolBar1: TToolBar
          Left = 0
          Top = 0
          Width = 467
          Height = 29
          ButtonHeight = 21
          ButtonWidth = 34
          Caption = 'ToolBar1'
          ShowCaptions = True
          TabOrder = 3
          object ToolButton1: TToolButton
            Left = 0
            Top = 0
            AutoSize = True
            Caption = 'File'
            MenuItem = File1
            ParentShowHint = False
            ShowHint = True
          end
          object ToolButton2: TToolButton
            Left = 27
            Top = 0
            Caption = 'Edit'
            MenuItem = Edit
          end
          object ToolButton3: TToolButton
            Left = 61
            Top = 0
            Caption = 'Tools'
            MenuItem = Tools
          end
          object ToolButton4: TToolButton
            Left = 95
            Top = 0
            Caption = 'Add'
            MenuItem = Add
          end
          object ToolButton5: TToolButton
            Left = 129
            Top = 0
            Caption = 'Fonts'
            MenuItem = Fonts
          end
          object Label3: TLabel
            Left = 163
            Top = 0
            Width = 605
            Height = 16
            Align = alBottom
            Caption = 
              '      This is a Toolbar Component which is placed INSIDE the TRi' +
              'chEditWB (As Well As The ProgressBars )'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clRed
            Font.Height = -13
            Font.Name = 'Tahoma'
            Font.Style = []
            ParentFont = False
          end
        end
      end
      object TabImage: TTabSheet
        Caption = 'Page Image'
        ImageIndex = 2
        TabVisible = False
        object ImageViewer: TImage
          Left = 0
          Top = 0
          Width = 467
          Height = 525
          Align = alClient
        end
      end
      object TabLinks: TTabSheet
        Caption = 'Links Checker'
        ImageIndex = 3
        TabVisible = False
        object PanelLinksTop: TPanel
          Left = 0
          Top = 0
          Width = 467
          Height = 468
          Align = alClient
          TabOrder = 0
          object StringGrid1: TStringGrid
            Left = 1
            Top = 1
            Width = 465
            Height = 466
            Align = alClient
            ColCount = 3
            DefaultRowHeight = 15
            FixedCols = 0
            Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
            TabOrder = 0
            ColWidths = (
              258
              263
              118)
          end
        end
        object PanelLinksBottum: TPanel
          Left = 0
          Top = 468
          Width = 467
          Height = 57
          Align = alBottom
          TabOrder = 1
          object Button1: TButton
            Left = 282
            Top = 16
            Width = 103
            Height = 25
            Caption = 'Check Links'
            TabOrder = 0
            OnClick = Button1Click
          end
          object RadioButton1: TRadioButton
            Left = 16
            Top = 32
            Width = 113
            Height = 17
            Caption = 'Synchronous'
            TabOrder = 1
            OnClick = RadioButton1Click
          end
          object RadioButton2: TRadioButton
            Left = 16
            Top = 8
            Width = 113
            Height = 17
            Caption = 'Asynchronous'
            Checked = True
            TabOrder = 2
            TabStop = True
            OnClick = RadioButton2Click
          end
        end
      end
    end
  end
  object PanelAcc: TPanel
    Left = 0
    Top = 110
    Width = 401
    Height = 555
    Align = alLeft
    TabOrder = 1
    Visible = False
    object Splitter2: TSplitter
      Left = 1
      Top = 25
      Width = 399
      Height = 2
      Cursor = crVSplit
      Align = alTop
    end
    object pnlFav: TPanel
      Left = 1
      Top = 1

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -