home *** CD-ROM | disk | FTP | other *** search
/ Internet Magazine 2002 August / INTERNET94.ISO / pc / software / windows / utils / watznew / setup.exe / 0 / RCDATA / TPAGESOURCEWINDOW / TPAGESOURCEWINDOW.txt < prev   
Encoding:
Text File  |  2002-05-01  |  3.2 KB  |  138 lines
  1. object PageSourceWindow: TPageSourceWindow
  2.   Left = 320
  3.   Top = 241
  4.   AutoScroll = False
  5.   Caption = 'Page Source'
  6.   ClientHeight = 485
  7.   ClientWidth = 553
  8.   Color = clBtnFace
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Shell Dlg'
  13.   Font.Style = []
  14.   Icon.Data = {<image000.ico>}
  15.   OldCreateOrder = True
  16.   Position = poScreenCenter
  17.   OnClose = FormClose
  18.   OnCreate = FormCreate
  19.   OnDestroy = FormDestroy
  20.   OnShow = FormShow
  21.   PixelsPerInch = 96
  22.   TextHeight = 13
  23.   object StatusBar: TXPStatusBar
  24.     Left = 0
  25.     Top = 466
  26.     Width = 553
  27.     Height = 19
  28.     Panels = <>
  29.     SimplePanel = True
  30.   end
  31.   object PageControl: TPageControl
  32.     Left = 0
  33.     Top = 0
  34.     Width = 553
  35.     Height = 466
  36.     ActivePage = BodyTabSheet
  37.     Align = alClient
  38.     TabIndex = 0
  39.     TabOrder = 1
  40.     OnChange = PageControlChange
  41.     object BodyTabSheet: TTabSheet
  42.       Caption = 'Document Body'
  43.       object BodyTextArea: TExtEvtRichEdit
  44.         Left = 0
  45.         Top = 0
  46.         Width = 545
  47.         Height = 438
  48.         Align = alClient
  49.         Font.Charset = DEFAULT_CHARSET
  50.         Font.Color = clWindowText
  51.         Font.Height = -13
  52.         Font.Name = 'Courier New'
  53.         Font.Style = []
  54.         HideScrollBars = False
  55.         ParentFont = False
  56.         PlainText = True
  57.         PopupMenu = PopupMenu
  58.         ReadOnly = True
  59.         ScrollBars = ssVertical
  60.         TabOrder = 0
  61.         OnMouseWheelDown = BodyTextAreaMouseWheelDown
  62.         OnMouseWheelUp = BodyTextAreaMouseWheelUp
  63.         OnSelectionChange = BodyTextAreaSelectionChange
  64.         OnCopy = BodyTextAreaCopy
  65.       end
  66.     end
  67.     object HeaderTabSheet: TTabSheet
  68.       Caption = 'Document Header'
  69.       object HeaderTextArea: TRichEdit
  70.         Left = 0
  71.         Top = 0
  72.         Width = 545
  73.         Height = 438
  74.         Align = alClient
  75.         Font.Charset = DEFAULT_CHARSET
  76.         Font.Color = clWindowText
  77.         Font.Height = -13
  78.         Font.Name = 'Courier New'
  79.         Font.Style = []
  80.         HideScrollBars = False
  81.         ParentFont = False
  82.         PlainText = True
  83.         ReadOnly = True
  84.         ScrollBars = ssVertical
  85.         TabOrder = 0
  86.         OnMouseWheelDown = BodyTextAreaMouseWheelDown
  87.         OnMouseWheelUp = BodyTextAreaMouseWheelUp
  88.       end
  89.     end
  90.   end
  91.   object AdvHtml: THtmlDocument
  92.     Limit = 0
  93.     Port = 80
  94.     AuthMode = False
  95.     UseProxy = False
  96.     AuthProxy = False
  97.     ProxyPort = 80
  98.     ForceLoad = True
  99.     RemoveHeader = True
  100.     Timeout = 0
  101.     ServerType = stHttp11
  102.     OnLookup = AdvHtmlLookup
  103.     OnConnecting = AdvHtmlConnecting
  104.     OnConnect = AdvHtmlConnect
  105.     OnRead = AdvHtmlRead
  106.     OnDisconnect = AdvHtmlDisconnect
  107.     Left = 16
  108.     Top = 100
  109.   end
  110.   object PopupMenu: TPopupMenu
  111.     Left = 20
  112.     Top = 148
  113.     object FindItem: TMenuItem
  114.       Caption = '&Find...'
  115.       ShortCut = 16454
  116.       OnClick = FindItemClick
  117.     end
  118.     object FindNextItem: TMenuItem
  119.       Caption = 'Find &Next'
  120.       ShortCut = 114
  121.       OnClick = FindDialogFind
  122.     end
  123.   end
  124.   object FindDialog: TFindDialog
  125.     Options = [frDown, frHideUpDown]
  126.     OnFind = FindDialogFind
  127.     Left = 62
  128.     Top = 148
  129.   end
  130.   object AdvPerlIIS: TPerlExe
  131.     TimeOut = 60000
  132.     OnSingleLine = AdvPerlIISSingleLine
  133.     OnFinish = AdvPerlIISDone
  134.     Left = 60
  135.     Top = 96
  136.   end
  137. end
  138.