unit1.dfm

利用锚点实现网页中的标题定位 我吴斌通过9年的不懈研究,写出的宇宙无敌定位原代码,这下大家满足了吧~!

object Form1: TForm1
  Left = 244
  Top = 114
  Width = 696
  Height = 480
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object WebBrowser1: TWebBrowser
    Left = 0
    Top = 0
    Width = 457
    Height = 425
    TabOrder = 0
    ControlData = {
      4C0000003B2F0000ED2B00000000000000000000000000000000000000000000
      000000004C000000000000000000000001000000E0D057007335CF11AE690800
      2B2E126208000000000000004C0000000114020000000000C000000000000046
      8000000000000000000000000000000000000000000000000000000000000000
      00000000000000000100000000000000000000000000000000000000}
  end
  object Button1: TButton
    Left = 488
    Top = 80
    Width = 75
    Height = 25
    Caption = 'Button1'
    TabOrder = 1
    OnClick = Button1Click
  end
  object Edit1: TEdit
    Left = 480
    Top = 24
    Width = 121
    Height = 21
    TabOrder = 2
    Text = 'Edit1'
  end
  object Button2: TButton
    Left = 480
    Top = 152
    Width = 75
    Height = 25
    Caption = 'Button2'
    TabOrder = 3
    OnClick = Button2Click
  end
  object Edit2: TEdit
    Left = 488
    Top = 112
    Width = 121
    Height = 21
    TabOrder = 4
    Text = 'Edit2'
  end
  object Button4: TButton
    Left = 488
    Top = 208
    Width = 75
    Height = 25
    Caption = 'psp'
    TabOrder = 5
    OnClick = Button4Click
  end
  object Button5: TButton
    Left = 488
    Top = 248
    Width = 75
    Height = 25
    Caption = #32858#23453#30406
    TabOrder = 6
    OnClick = Button5Click
  end
  object Button6: TButton
    Left = 488
    Top = 288
    Width = 75
    Height = 25
    Caption = #20010#20154#38386#32622
    TabOrder = 7
    OnClick = Button6Click
  end
  object TreeView1: TTreeView
    Left = 536
    Top = 320
    Width = 121
    Height = 97
    Indent = 19
    TabOrder = 8
    OnClick = TreeView1Click
    Items.Data = {
      010000001D0000000000000000000000FFFFFFFFFFFFFFFF0000000003000000
      04B1EACCE21C0000000000000000000000FFFFFFFFFFFFFFFF00000000000000
      00037073701F0000000000000000000000FFFFFFFFFFFFFFFF00000000000000
      0006BEDBB1A6C5E8210000000000000000000000FFFFFFFFFFFFFFFF00000000
      0000000008B8F6C8CBCFD0D6C3}
  end
end