unit1.dfm

Delphi编程实效百例的随书程序 这是其中的界面操作部分

object Form1: TForm1
  Left = 193
  Top = 120
  Width = 529
  Height = 407
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 521
    Height = 380
    Align = alClient
    AutoSize = True
    BevelInner = bvRaised
    BevelOuter = bvLowered
    BorderWidth = 4
    Caption = 'Panel1'
    TabOrder = 0
    object Label1: TLabel
      Left = 6
      Top = 6
      Width = 509
      Height = 368
      Cursor = crHandPoint
      Align = alClient
      Transparent = True
      OnMouseDown = Label1MouseDown
      OnMouseMove = Label1MouseMove
      OnMouseUp = Label1MouseUp
    end
    object Button1: TButton
      Left = 424
      Top = 336
      Width = 75
      Height = 25
      Caption = #36864#20986
      TabOrder = 0
      OnClick = Button1Click
    end
  end
  object Panel2: TPanel
    Left = 40
    Top = 40
    Width = 441
    Height = 281
    BevelInner = bvLowered
    BevelOuter = bvLowered
    BevelWidth = 5
    Caption = 'Panel1'
    TabOrder = 1
    object Image1: TImage
      Left = -16
      Top = -64
      Width = 640
      Height = 480
      AutoSize = True
      Picture.Data = {
        0A544A504547496D616765B0AE0100FFD8FFE000104A46494600010201004800
        480000FFED17A050686F746F73686F7020332E30003842494D03ED0000000000
        10004800000001000200480000000100023842494D03F3000000000008000000
        00000000003842494D040A00000000000100003842494D271000000000000A00
        0100000000000000023842494D03F5000000000048002F66660001006C666600
        06000000000001002F6666000100A1999A000600000000000100320000000100
        5A00000006000000000001003500000001002D00000006000000000001384249
        4D03F80000000000700000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FF03E800000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF03E800
        000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF03E800000000FF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF03E800003842494D040800
        0000000010000000010000024000000240000000003842494D04090000000016
        3000000001000000800000006000000180000090000000161400180001FFD8FF
        E000104A46494600010201004800480000FFFE002746696C6520777269747465
        6E2062792041646F62652050686F746F73686F70A820342E3000FFEE000E4164
        6F626500648000000001FFDB0084000C08080809080C09090C110B0A0B11150F
        0C0C0F1518131315131318110C0C0C0C0C0C110C0C0C0C0C0C0C0C0C0C0C0C0C
        0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C010D0B0B0D0E0D100E0E10140E0E0E1414
        0E0E0E0E14110C0C0C0C0C11110C0C0C0C0C0C110C0C0C0C0C0C0C0C0C0C0C0C
        0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0CFFC00011080060008003012200021101
        031101FFDD00040008FFC4013F00000105010101010101000000000000000300
        01020405060708090A0B01000105010101010101000000000000000100020304
        05060708090A0B1000010401030204020507060805030C330100021103042112
        31054151611322718132061491A1B14223241552C16233347282D14307259253
        F0E1F163733516A2B283264493546445C2A3743617D255E265F2B384C3D375E3
        F3462794A485B495C4D4E4F4A5B5C5D5E5F55666768696A6B6C6D6E6F6374757
        67778797A7B7C7D7E7F711000202010204040304050607070605350100021103
        213112044151617122130532819114A1B14223C152D1F0332462E17282924353
        15637334F1250616A2B283072635C2D2449354A317644555367465E2F2B384C3
        D375E3F34694A485B495C4D4E4F4A5B5C5D5E5F55666768696A6B6C6D6E6F627
        37475767778797A7B7C7FFDA000C03010002110311003F00E701AD94FB9CF961
        D1AE736C68EDEFFB436CFD1FF21EAD74AEB56615A3AB62B8B2CE9F77A4F639AE
        1B98EFD1DD47A5BFF49F4BD95FEAFF00A4656FF4FD454EBB2AFB7D2DF4ABB770
        1580F0E00173AAFD26C616FBEB6EEF7ADEFAAF76155D5ED73C58E6BF7D84360C
        BDBEA54CD9F9DEAE433D0ABFAFFA44E9E59704A20191E1DA47D32FEAF17E82BD
        A1A4B402EB4F9BFBCF4B7E567649F51F6386EF09669CFB9AD843A038583D497D
        6E3FA4693C81E6AFBCD39792FF0040124CE81AE021BA6ED46DDA9BECFAC47CBB
        AE6798C1930E63194B8E8D895D898FE5F3376138CA0081C3A6DD90595E3971B0
        52DA646AC049223F75A95B739D4FA2D02B6C40DA4F7E774FD2453418900C0E4F
        6FBD43D0931A288CA5AD7A6F74D0F3A68918B8E0E4657F3150DCF6B79747D1A9
        BFF1AFF62E6F2336A717DAE702F92F7ED0E7B5A5C7F9B90CF631BF42BDD7ADC7
        E4F4BEA370C0B1A5ECB1C05760300BC6ACF4F69F558EFDC5CFE4E00A73F22AC7
        B1DE8D4C6B9A5D1BDC1E0435E1C1AC7337BB6D8B57E1D8CE0E28CF1986590E3B
        90FF00247D30F57F7FF41AF98FB94626E234FF000BAB55F99549FA6479076B3F
        99FCEB7DDFF08A5F68A5CDDB69716BB4F735F1A8FDFDD7EDFF003151B1E0334D
        3F48D8F00091A2BD411BF510E3C01EE247EEB76AD58E490E8180E307ABDC7D5D
        FAC3877F4FADF9ADF57A9E09F41D7B86F758D03F4573AD77BDEF7D5FCE6FFF00
        0CB46EEB17E4347D9AB368326C601F9A3B1D560E0748C5C661B69AF6D9921AEB
        5C664E9EC1AFD16B777D15A1407D3B835EE607C6E2DD240581CC7364E7C821E8
        C449D87AB8BF4A5FCBF41B70C23863C5ACABE8D66D36DB793E8ED2FD1AD83235
        E7F79FED52CAC4C7C4700D6B721C410EDE0B608FDD67FE66AC3DCF1AB25B3CC9
        928165763C8DC498E27CD54328C4100714F7E265A24F61D909355ADAC9D98DE8
        8D0B43A499FA4369F720E6D74EF1E91DC5BF4CEDDA5DFCBD1CF6A39A263C940E
        3FDCA3390D511F548001DDFFD0E571C6507B6CFD11B1CE30E36ECF77F9F5ED72
        E93EAC3312EC9B5994D1537D26595E4B2C6BD9EDB2B63EB7CB6FF76D77D37FF3
        7E95AB22A16870DCD7C1F6DA00B44B4716B5D2FF00FA95A185919545D5DE1C7E
        D1538EDB4B5EE3C6DF518CB316D657EAB7DAEFD2FF00D73D4FE72E4B978989AD
        FA5ECD7192408B269EE3073B1C3DD6F4D634319596BCBA08977E91865AE77D3F
        E73FA8B570B3FED58CDBD8C6EF076DD5B342D7B7E982E3FBDFF50B9FE95934E4
        E0462D2CA47E92CB03AD13BDA77646EF49B77BD9FD6FA1E928F4ABF319D5AC6B
        365741A0BF27F485C4896FA0E6D7E957FA463DFF00F6DEF54B2E284B10B970E5
        1D623FE6FEEFA5963297B9B1303DFF00E93BF917D8F0000195F21A350573DF58
        FAAB68A3EC1516FDA2CD6D2D30F630FD11EC6B9CD75D1EDFE6BD9EFAD69BB32C
        C27D6CC83BA8B24DBB8096977D1B377D36ECFCE5E7BD673F20F55CDC5CC737F6
        8B2D20D45DBAB768D7B2BA2D7368F6B6AB1BB3F57A954C5C991CD7EB25C51038
        E20FE9F61FE0B2CB2FEAFD22B5A2B1C8B3D405A5D3A1046E9074DA776EDDF49A
        A9F5FEA173B229BEBDD4134B596581CE73AD70D5F7581C19E9EFF6FE8B67FDB8
        ABB322D7BA5D5341FCE10641FCE1F492EAD68FD9CD36B209B036B2DD21D0E24C
        3BF92CF7B3D9FF00A2D684BDB944EBEA1F2E87EC6202713B68776A32E65807A9
        6999044573A8FA3C2BB55AE9863C389D0B3D323FE9CB7FEA950658D15D409306
        D649F212B441B1EF2F702278F69F6B7FF3A431C388AA66BAFE7FF7CF53F56FAB
        DB666331332F3657910CA9EEF76DB3FC135AEF53D95DDFCDFD07FE93F71763FB
        23220C6D27F741FF0056AF2FA7739A5AE04B5C08734C911F9ED20B76FF00297A
        1FD58EAF7F51C235643ECFB56316B5C4083630FF00356EE717FE93F32DDFB3F4
        8A9FC4790C55EF88786411F40FEACD7E0CF2F92FCAF5FA31EA758C3F617B5D61
        0490D31B40FEB8DBEE593D3F28372DF8773A5B6B89A0B8C90FD7F45A6EFE736E
        E622DF7E5DF6585F8D654FF73DCDB5ED04069F4F696EEB1BEDDCCDBFA3DEFAED
        58D966D21DBD85AD1C10ED74DBEF6ED6D7FBBECFF8AA5325CA72F1E5BD93E994
        BD72955F0E4FD1F57F51747264964E21A81A0FEEBD49A3B449F04C715FBFD30C
        25E621B1A99F257F02EB6DE934DB915371B31F5B4DCF903DDCEE6ECF51BFA46F
        E93D348E358CC86E4FDAC3430439BC83B87D19FDC77D25423F0F8FB72948994A
        AE1C03D3A7CDF3331CC788014075B7FFD1E569B5EE89AAB0380455CB4CCB1DEE
        F7D7FC856DF9B56237D4B9EC657C0706D9A4FF008160AF26A75953BDDFF16A9E
        29ADBED70616727E96B1F02AC62FD9EEC5B5B7D3B89D8D7D85C49B1AE75A6CA4
        58DF6D6CAAAA6AFA35FD3528CF288D49364447F85E9E2920E18CB4143494B5BF
        D0F570C5EBBA1537DD465BDE48A5B4D85A407B883B1C1ED9C875EDA3F43FA4FD
        1DBBEDFEBAD4C7A4E131D709B2DB08364C33731A3D98FF00A2DADDACDDFF006E
        2CAE9A596E05D5372AFC77FA4D360ADC36BC38066BBDBEA37F96A6CCAB6BE8C1
        EE7DD75AEBAC9B5ED738B99FE02A63D8DFCFD8EF52D66FB59FA4F6251C90B266
        38EEF6FE5F3314E12D38498015F31EDFE17CADBCECD6E517D8C1B58DF198D3DC
        7E9FE76DFF00A6B95FAC36535F54CE25F50F599487B6CD8D334B0361F5DBEFDB
        FA36D8C7FF00845B8D61F407AD8CEDD0237D7EE3A6AF7FAC777B9FEE58DF5F5B
        897FD67C1C9C9F4EB6BD91944BDAE2D20DBE9597FA67776D95FF00A4AEA55E34
        652275EDFF004BFEE598D811AF22F2F666371AA69D2D065A4D6E023E7FCA44EA
        19390FC66517E3963EC7B6EAADF51AE6ED0CB2B7D6D656DD9B9CFB18EB3F49FE
        0D43A861D757AECA2E6E452C79F4B25AD8F500FA367A5F45BEA6EF67BD58CDC6
        C5C2C5C7AE97B8B6C6B5CF2756B9CE02C6DD4FA9FCD3FE9B1FE9FF00DB6A41C3
        B6BA8B1FFA12AA475EC68FD7F75581587006D64318EDCD049702478FF554725B
        938F735AD782C7926B3B19EE6FEEFD1DDED6EDAEDFDF56E87973039AD8635C19
        22CE0905CD1B767F2103AAE4D42BA2AB98773C0BABB37EEDA3FABE9FBF7B4FEF
        29AE031D0954B71F3317AB8ECEDB1BE16D63D39D654CB2AA9CF0E70AF70DA1C5
        F0E73195551B9EEF6ECDF67FD6D745D0AA7628FB692FAED355CDF690D860736B
        BABBAA6B37FA9EA7F36FAFDF5FA2B91C7CDA5B41A1B7595EFB0585F59735C1CD
        0F15ED731BEDD9EAB9EBA5C4B5A70ABF4EDBA5D86C1BA363839D6E57DA1FEA3F
        759B77B3736E7FE7A865297E9D98FEEFA8F17F7D93D1FA357D4FA74FEEBB1D3A
        EBF359539CEB6D7ECB6A7596087007ECF6D7BFD42EBBD4AAB67E9DAB37A952E6
        641A6BAEC78B5FB5BB76976B0DD4BBD3F77EE2BFD0EDACE23C5B61B722EB61C6
        C05CF9DA3E95A1ADDFEAB59EA5A9EFA9AEB1B6307BDAE6BD93591EE1B6EAF77E
        728A58F19C2350247E5D7E4FEAA63290C87731FCDEA337A6BEE73C35E363DA19
        E9C0310780EFCD43B703A811786DC1CD7066CDFB46D9DCDB236359FC857AAEA2
        1EDAECB5829166D24B9DA37D4AFD66FBA1ADFE73F46A85DF58B0195CBF268658
        468D6C39C0BAADE3E8FAFF004727D8ABE18D44004E9A7A57C8D9D5FFD2E431C6
        7380ADB85738BA74048740FA5B7DAAC5032DF90CC4AB1B7E4E538D35D01CD7BC
        9F76F69F4C7B366F7BAF7DBE9FA55FF38AFE331E46ADB1CE6C400006B8E9ED63
        9C574FF56B0A9ADB7665C1D65F738B2B7B4BA1B5FB4FA148F6B7DFB59F69B3FC
        3DDFF04A58004ACCBC518DD9FC1D1E91D3AAC2C06DB9B6B6BBDD4B5B985EE6FA
        6D702E739B53FD9EDDD62CDEABD57A4E0D156074DDB6D86D75B65A1A59532439
        9658F77F86BDD3B19FBFB3DEAE7D6466564FD5FCAAA965B3606B4430BB680E6D
        9BB6637E91FEE66DFD06FB170192ECBBD8E6FBDA2BFD25A5D5BD9A35C77FF3B4
        D5BFE931BE9B7D4B7F72B4326188D8FF00CE3D56629C8D9EBE5F63D60EB5D36C
        1EC61AEAD6190DDAD0E9739AD9FEBAC7FACD7E3F53BF2AFBB1DF4E46335B7D59