Chip: Shareware for Win 95/Chip-Shareware-Win95.bin/komunik/webedit/data.z/WebEdit.exe/0/RCDATA/TFRMURL/TFRMURL.txt

Text File | 1996-10-14 | 8KB | 305 lines

object frmURL: TfrmURL
  Left = 276
  Top = 638
  HelpContext = 105
  ActiveControl = txtFile
  BorderStyle = bsDialog
  Caption = 'URL Builder'
  ClientHeight = 197
  ClientWidth = 588
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Position = poScreenCenter
  ShowHint = True
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 4
    Top = 4
    Width = 577
    Height = 157
    Shape = bsFrame
    IsControl = True
  end
  object lblResourceType: TLabel
    Left = 12
    Top = 8
    Width = 73
    Height = 13
    Caption = '&Resource Type'
    FocusControl = lstType
  end
  object lblServer: TLabel
    Left = 144
    Top = 24
    Width = 34
    Height = 13
    Caption = '&Server:'
    Enabled = False
    FocusControl = txtServer
  end
  object lblPort: TLabel
    Left = 144
    Top = 52
    Width = 22
    Height = 13
    Caption = '&Port:'
    Enabled = False
    FocusControl = txtPort
  end
  object lblFile: TLabel
    Left = 144
    Top = 80
    Width = 19
    Height = 13
    Caption = '&File:'
    FocusControl = txtFile
  end
  object lblAnchor: TLabel
    Left = 144
    Top = 108
    Width = 37
    Height = 13
    Caption = '&Anchor:'
    FocusControl = txtAnchor
  end
  object lblURL: TLabel
    Left = 16
    Top = 136
    Width = 25
    Height = 13
    Caption = '&URL:'
    FocusControl = cmbURL
  end
  object OKBtn: TBitBtn
    Left = 336
    Top = 168
    Width = 77
    Height = 25
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 4
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object CancelBtn: TBitBtn
    Left = 420
    Top = 168
    Width = 77
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 5
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object HelpBtn: TBitBtn
    Left = 504
    Top = 168
    Width = 77
    Height = 25
    Caption = '&Help'
    TabOrder = 6
    OnClick = HelpBtnClick
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object lstType: TListBox
    Left = 12
    Top = 24
    Width = 125
    Height = 93
    Hint =
      'Use http:// for www resources or none for document path relative' +
      ' to current file'
    ItemHeight = 13
    Items.Strings = (
      'none'
      'http://'
      'afs://'
      'gopher://'
      'file://'
      'file://localhost/'
      'ftp://'
      'mailto:'
      'news:'
      'newsrc:'
      'nntp://'
      'telnet://'
      'wais://')
    TabOrder = 7
    OnClick = UpdateURL
    OnDblClick = lstTypeDblClick
    OnKeyUp = lstTypeKeyUp
  end
  object txtServer: TEdit
    Left = 192
    Top = 20
    Width = 229
    Height = 21
    Hint = 'Server name (e.g., myserver.com)'
    Enabled = False
    TabOrder = 0
    OnChange = UpdateURL
  end
  object txtFile: TEdit
    Left = 192
    Top = 76
    Width = 145
    Height = 21
    Hint = 'Name of file on server (e.g., myfile.html)'
    TabOrder = 2
    OnChange = UpdateURL
    OnKeyPress = txtFileKeyPress
  end
  object txtAnchor: TEdit
    Left = 192
    Top = 104
    Width = 229
    Height = 21
    Hint = 'Named location within a file'
    TabOrder = 3
    OnChange = UpdateURL
  end
  object txtPort: TEdit
    Left = 192
    Top = 48
    Width = 61
    Height = 21
    Hint = 'Required only if resource server is on a non-standard port'
    Enabled = False
    TabOrder = 1
    OnChange = UpdateURL
  end
  object bbtnBrowse: TBitBtn
    Left = 344
    Top = 73
    Width = 77
    Height = 25
    Hint = 'Search for file on local computer'
    Caption = '&Browse'
    TabOrder = 8
    OnClick = bbtnBrowseClick
    Glyph.Data = {
      12040000424D1204000000000000760000002800000054000000150000000100
      0400000000009C03000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777777777777777777777777777777777777777777777777777777777777777
      7777777700007777777777777777777777777777777777777777777777777777
      77777777777F7F7F7F7F7F7F7F7F7F7F00007777777777777777777777777777
      7777777777777777777777777777777777777777777777777777777700007777
      777777777777777777777FFFFFFFFFFFF77777777777777777777777777F7F7F
      7F7F7F7F7F7F7F7F00007780000000000000777777778888888888888F777777
      8000000000000077777778000000000000077777000077007B7B7B7B7B7B0777
      77788F777777777778F77777007B7B7B7B7B7B07777F7007B7B7B7B7B7B07F7F
      0000770F07B7B7B7B7B707777778F8F77777777778F777770707B7B7B7B7B7B0
      777770707B7B7B7B7B7B07770000770B0B7B7B7B7B7B07777778F8F777777777
      778F77770BB07B7B7B7B7B7B077F70BB07B7B7B7B7B7B07F0000770F0BB7B7B7
      B7B7B0777778F78F77777777778F777707BF000007B7B7B7B077707B7000007B
      7B7B7B070000770BF07B7B7B7B7B70777778F78FFFFF77777778F7770BFBFBFB
      F0000000077F70B7BF0FFF000000007F0000770FB0B7B7B7B7B7B0777778F778
      8888FFFFFFF8F77707BFBFBFBFBFB0777777707B7B0FFFFFFFF077770000770B
      F07B7B7B7B7B7B077778F77777778888888777770BFBFBFBFBFBF077777F70B7
      BF0FFFFFFFF07F7F0000770FBF000000B7B7B7077778F777777777778F777777
      07BFBFBFBFBFB0777777707B7B0FFFFFFFF077770000770BFBFBFBF000000077
      7778F7777FFFFFFF8F7777770BFBFBFBFBFBF077777F70B7BF0FFFFFFFF07F7F
      0000770FBFBF0000000777777778FFFFF88888887777777707BFBF0000000777
      7777707B7B0FFFFFFFF077770000777000007777777777777777888887777777
      777777777000007777777777777F7F00000FFFFF00007F7F0000777777777777
      77777777777777777777777777777777777777777777777777777777770FFFFF
      0F07777700007777777777777777777777777777777777777777777777777777
      77777777777F7F7F7F0FFFFF007F7F7F00007777777777777777777777777777
      7777777777777777777777777777777777777777770000000777777700007777
      77777777777777777777777777777777777777777777777777777777777F7F7F
      7F7F7F7F7F7F7F7F000077777777777777777777777777777777777777777777
      77777777777777777777777777777777777777770000}
    NumGlyphs = 4
  end
  object cmbURL: TComboBox
    Left = 48
    Top = 132
    Width = 373
    Height = 21
    Hint = 'Click on dropdown for list of previous URLs'
    ItemHeight = 13
    Sorted = True
    TabOrder = 9
    OnChange = cmbURLChange
    OnClick = cmbURLClick
    OnKeyPress = cmbURLKeyPress
  end
  object chkChangeDOSSlashes: TCheckBox
    Left = 268
    Top = 48
    Width = 149
    Height = 17
    Caption = 'Re&verse DOS Slashes'
    TabOrder = 10
    Visible = False
    OnClick = chkChangeDOSSlashesClick
  end
  object pnlPreview: TPanel
    Left = 432
    Top = 16
    Width = 137
    Height = 137
    BevelOuter = bvLowered
    TabOrder = 11
    object imgPreview: TPMultiImage
      Left = 1
      Top = 1
      Width = 135
      Height = 135
      Align = alClient
      Color = clBtnFace
      ImageName = 'file not found'
      ImageDither = True
      ImageReadRes = lAutoMatic
      ImageWriteRes = sAutoMatic
      TifSaveCompress = sNONE
      JPegSaveQuality = 25
      JPegSaveSmooth = 0
      TextLeft = 0
      TextTop = 0
      TextRotate = 0
      TabOrder = 0
      TabStop = False
    end
    object pnlImageStatus: TPanel
      Left = 112
      Top = 120
      Width = 25
      Height = 17
      BevelInner = bvRaised
      Caption = 'Off'
      TabOrder = 1
      OnClick = pnlImageStatusClick
    end
  end
  object dlgOpen: TOpenDialog
    DefaultExt = 'GIF'
    FileEditStyle = fsEdit
    FileName = '*.*'
    Filter =
      'All Files (*.*)|*.*|HTML Files (*.HTML;*.HTM;*.HT3)|*.HTML;*.HTM' +
      ';*.HT3|Image Files (*.GIF;*.JPG;*.BMP)|*.GIF;*.JPG;*.BMP|Audio F' +
      'iles (*.WAV;*.AU;*.SND)|*.WAV;*.AU;*.SND'
    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
    Title = 'Select File'
    Left = 7
    Top = 164
  end
end