unit_geturl.~dfm

菜鸟猜地址(完全源码) DELPHI 源代码 菜鸟猜地址(完全源码) DELPHI 源代码

        5904105A04115D0309581649892B8DB1144089186D91186C76248488248E9E17
        5E7B13467F0D484B2379863EA6D00F4096052E8608348B0A358D08358D09328B
        09318C082A8306257C051F76061B6F06166904146505126204115F05105D060F
        5D050D5C050C59060C58050A57050956050A54050A54040A5304095305095305
        095204095304095204095104095104085204085104084F04084E05084E04074E
        141758897FB314175605084B04084B05084B040A4C05094C04094C04094D0409
        4E05094E050A4F050A51050B52040951040A52050B54050C53040D55050D5605
        0E57050F5A04115B040E5A030859050B5F217CA540BBCF44B5D321868F3CABBB
        41B7CF5EC1CC1958690A4A423599A944ABDA07308C042D87052E860939900A39
        9109389009378F07318A072B8507257E071F76061A6E05176905146505126105
        105F050F5D040E5B040D5A050C5A040B58050A57040A56040A55050A54040953
        050953040953050B5305095405095305095304095204085204085004084F0408
        4F0509501317594EA6A814185606094B04094C04094D04094D05094D050A4D05
        094D05094E04084E04094F050A50050A51040A51040A51040B53050C54050D56
        050E57050E5805115A020853091B66124E880A31731031802284A335A1AB1969
        6C3EABB44EC9E464E0F2207681135F5E2A8BA11858A32A6EB63D9AD22369B10A
        3B920A3C940A3C93093B9409389009338C092C8607247D061F74061A6D051668
        05146305116105105E050D5C050D5B040C5A040C58040C56040A560509550509
        55050A53040A52040A5304095405085305095204095205095205095104095005
        085005095005094F14175929A19713175604084B05094D050A4D05094D050A4E
        050A4E040A4F050A4F050950040950050A51040A52050A53050A53050B53040D
        54040D55050E58040E59040C592059943189B941BBD53DB4CD59D3EF349AAE10
        5B66125F6E1F80912C9AB31A789214667C136474196E9B3E9FD853CAE74BC0E0
        48B7E7083B940B3E970B3D950A3C930A399209378F09328B082B8407227A051C
        7205176A041465051162050F5F060D5D050D5A050C59040C58040B57040A5605
        0955040A55040953050A52040B53040954040A53050A51050952040852040850
        05095005085005095005084F141758269F9514175605084C05094C05094D0509
        4C05094E04094E04094E050A4F050A51040950050A52040B53040B54040B5505
        0C54050D56040E56040F5805105A050D5B0D2D73134F88349DC241B5D732A4C0
        1C849E2393B22CA9C937AFC636AFC52797B31C7D9B156C8C2694B53FB3D23FA2
        C750BEE83184C70C3F960B3F970A3D950A3B93093A920A399008358D09318A08
        288106207606196D051566051163051060050E5C050D5A060D5A050B58050B57
        040B56050A55040954040953050953050953040A54050953050A510509510509
        5004084F05084F05084F04084F04084E131757F825F715175604094C06094C05
        094D050A4C04094D050A4E04094E050A4E040950040A50050B51050B54050B54
        040C55050D57050E58040F58040F5A04115D04115C09196425639E40B1CA40AF
        CA187F9D2497B638B4DA26888D215E402759403383742589991B81A32797B92C
        9BBF35A3C63DA7D545A7E047A6DB0C40970A3E960B3C950B3B930A3A9209378F
        09328D082B8405227B061B71051668051264041161050F5D040D5B040D59050B
        58050A57040B55050A5505085504095404095305095204095304095304095205
        085105085005084F05084F04094F04084F04094E1317586C1AF3141756040A4C
        050A4D05094D040A4D04094D04094E05094F040A4F040950040A51050A51060B
        54050B54040B56050C58050D57050F5A04105B04115D0208571A4D8F41C0D629
        8E9D1E7E911E8CA836BBDD38B1D5175D56071D00091F001B532C1B6E6D218EAE
        2199C01D85A721819B3BA8CC5BD2F85BC5ED0D449B0A3F970B3E960B3C950A3B
        940A379009328E092D8706237A061C71041668051263051060050F5D040D5B05
        0C59040B58040B57040B56050A56050953040953040952040952040A53040A53
        04095204095004095004084F05084E05094F04084E05084E1316591835941317
        5604094D040A4D04094D05084E04094D040A4E05094F050A4E040A4F040A4F04
        0A52050A53050A54040A55050C56050D57050E5805105A04105C030C5A0F2D75
        27719E2975A32073A61E84A4259CBC2BA1BF145D690D3F32124B3613564B176F
        7A269FBF25A4CB1E87AD2E92BE3E9ED93EA4DD216EB6083A940A42990B3F970A
        3D95093B9309358F09318B092E8806247D051D7305186B051265051060050F5D
        040D5A050C59050B58050A57050A56040954050953040A53050952050952050A
        5204095204095204085004094F05084F04084E04084F05084E04084D13175728
        EA0E14185706094D05094D04094C04094E04094D040A4E040A4E05094E05094E
        040950050B52040B52050B54040C54040C56050E56050E57040E5A050F5B0512
        5E020C59091665266EAA2078A1247F9D208DA927A3C32188A314617010546317
        6B7C218EA9229ABC1C88A621839F207A9A2474B30B3F990737900B41970A4097
        0B3F970A3E950A3A930A368E08318B082D8506257D051E7505186C0513660510
        61050F5D050D5B050C59040B58040A56050A55050A54050953040A53040A5204
        0951050A51040A5205094F05095004084E05084F05084E04084E05084E05084D
        1317574B5EE5151757050A4C05094C05094D050A4E05094D05094D040A4E0409
        50050950050A50050952040A52040B53040B54050C55060D56050E57050E5905
        105905115C020956184B8D3299C6349AB53DAACB319EC8238FB0259DBC2091AD
        1E89A52193AE29A7CA1E8DA91D849F2A93AA298EB63296C23E9CD20E42990A41
        980C42990A40970B3F950A3B930A368E08318A082B8307247B061D7305176B05
        1466061061060F5E050D5C050B59040C58050B56040A56050A55040953040952
        040952050951040A5105085104095104094F05084D04084E05084F05084E0409
        4E05084E1416570717F514175605094C05094B05094D04094E05094E050A4D05
        094E040A4F05094F050A50040951050A52040B54040B54040C55050D55040E57
        050E57050F5806105C04115C030B5A26639E55C9E052C1EB3197C921768F298E
        AC2798BE299FC12599BD299EC2238CA41B7989258CB22B94B91B66B31C62AC0D
        45990B43990B449A0B42990B3F950A3C9309368E09318A082B8407237B061B72
        04166905126405105F060E5C050E5B050C59040A59050B57040A550409540409
        5305095304085205095205095104075004095004084F05094F05084F04084E05
        084F04084E05074D14175729549613185505084B04094B05094D040A4E05094E
        04094D04094E04094F040A4F040950050951050B53050B54050B54040A54060D
        55050D57050E57040F5905105C05115C05105C0713631026710C20721C60942A
        84982A88A92787B8217B9A3397C337A1C7278BA32586941F7BAC2480C11965AE
        0639920B459A0C459A0C469A0B43990A4097093C930A358D082F880829820722
        79061B6F061667061161050F5C050D5B050C59050C58030A57050A5504095304
        0954050A5304095204085204095205095005085104084F04074F05084F05084F
        04094F04084E04094E04094E131757B8DCC614175504084B04094C040A4D060A
        4F05094E050A4E040A4F050A4F040A50050951050A52040A53050953050B5404
        0A54050C55040D56040E58040F5905105B05105C05115D05115F020E5E041566
        318AB539A1C047B1DC3182C52E85A653C3E44BABE12987AB298EAC3CA6D1124C
        A20942980C459A0C469A0C459A0C459A0A41970A3E9509399108328B082C8507
        267E06207606196C06146406105E050D5B050C5A040B58050B58040A56050A54
        050954050954040A5204095104085203095104095104085004094F0408500408
        4F04084F04085005084E04084E04094E1417576E7E3B10135205094B05094C04
        094E050A4F05094E05094E040A4F050A4F040A50040A52040A53040A52050952
        050B53040C54040C54040D55040D56040D57050F5A04105B04105B05115E0612
        6104116113337E1E51981C48910E2E832A7AB3388ABE174898185EA81C66B110
        4A9C0A40950A41970B43980B449A0B42970A41960A3E94093A8F09348C082F87
        08298107237A061D72051667051160040F5D050E5A050C59050C58050B56050A
        56040A55050A5404095304095205095105095204095105095104095004084F04
        084F04094F04074F04084E04084E05084E04084D0F135592435322255E141756
        14175614175713175913185913185814175814175813175A14185A14175B1419
        5C13195B14195C13195E14195C131A5D141A5F131B5F131C62131D64141E6313
        1E66141F67141F68121C670F1A68102070122878173285112B82133587163C8F
        173D90174393174797184799174998184A99174898174697174395173F91153A
        8D163787142F82152A7B14267314206B141E67141B64141B62131A6113196113
        185E13185F14176014185F13185D14175D13175B13175A14175A13175A14175A
        141758141757131757131758131758121758131757121757212560000000}
      Spacing = 0
      OnClick = SBGuessStartClick
      OnMouseMove = SBGuessStartMouseMove
    end
    object GetFistUrl: TEdit
      Left = 83
      Top = 29
      Width = 486
      Height = 21
      Anchors = [akLeft, akTop, akRight, akBottom]
      Color = clSilver
      TabOrder = 1
      Text = #35831#22312#36825#37324#36755#20837#21442#32771#22320#22336#19968'('#23436#25972#30340')'
      OnClick = GetFistUrlClick
      OnExit = GetFistUrlExit
    end
    object GetLastUrl: TEdit
      Left = 83
      Top = 77
      Width = 486
      Height = 21
      Anchors = [akLeft, akTop, akRight, akBottom]
      Color = clSilver
      TabOrder = 0
      Text = #35831#22312#36825#37324#36755#20837#21442#32771#22320#22336#20108'('#23436#25972#30340')'
      OnClick = GetLastUrlClick
      OnExit = GetLastUrlExit
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 250
    Width = 656
    Height = 230
    Align = alClient
    Caption = 'Panel2'
    Color = 14088927
    TabOrder = 1
    OnMouseMove = Panel2MouseMove
    DesignSize = (
      656
      230)
    object Label4: TLabel
      Left = 7
      Top = 10
      Width = 112
      Height = 16
      Caption = #29468#27979#22320#22336#28165#21333#65306
      Color = 14088927
      Font.Charset = ANSI_CHARSET
      Font.Color = 16711808
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object UrlList: TListBox
      Left = 7
      Top = 32
      Width = 465
      Height = 173
      Anchors = [akLeft, akTop, akRight, akBottom]
      Color = 15204084
      Font.Charset = DEFAULT_CHARSET
      Font.Color = 16736511
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 13
      MultiSelect = True
      ParentFont = False
      TabOrder = 0
      OnMouseMove = UrlListMouseMove
    end
    object GroupBox1: TGroupBox
      Left = 480
      Top = 24
      Width = 169
      Height = 190
      Anchors = [akLeft, akTop, akRight, akBottom]
      Caption = #23545#29468#27979#32467#26524#30340#25805#20316
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnMouseMove = GroupBox1MouseMove
      DesignSize = (
        169
        190)
      object DelGUrl: TButton
        Left = 34
        Top = 119
        Width = 102
        Height = 20
        Cursor = crHandPoint
        Anchors = [akLeft, akTop, akRight]
        Caption = #21024'    '#38500
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = DelGUrlClick
        OnMouseMove = DelGUrlMouseMove
      end
      object Explore: TButton
        Left = 34
        Top = 148
        Width = 102
        Height = 20
        Cursor = crHandPoint
        Anchors = [akLeft, akTop, akRight]
        Caption = #33258#21160#21024#38500
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = ExploreClick
        OnMouseMove = ExploreMouseMove
      end
      object ExploreTheOne: TButton
        Left = 34
        Top = 33
        Width = 102
        Height = 20
        Cursor = crCross
        Anchors = [akLeft, akTop, akRight]
        Caption = #25506'    '#27979
        Font.Charset = GB2312_CHARSET
        Font.Color = clOlive
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = ExploreTheOneClick
        OnMouseMove = ExploreTheOneMouseMove
      end
      object ShowUrlWin: TButton
        Left = 34
        Top = 61
        Width = 102
        Height = 20
        Cursor = crMultiDrag
        Anchors = [akLeft, akTop, akRight]
        Caption = #26597'    '#30475
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = ShowUrlWinClick
        OnMouseMove = ShowUrlWinMouseMove
      end