Delphi控件源码

开发平台：
Delphi

dblabelu.dfm：源码内容
							object JustifyLabelDemoForm: TJustifyLabelDemoForm
  Left = 238
  Top = 131
  Width = 501
  Height = 464
  Caption = 'Database Label Demo w/Full Justification Support'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object fcImager1: TfcImager
    Left = 0
    Top = 25
    Width = 493
    Height = 412
    Align = alClient
    AutoSize = False
    BitmapOptions.AlphaBlend.Amount = 0
    BitmapOptions.AlphaBlend.Transparent = False
    BitmapOptions.Color = clNone
    BitmapOptions.Contrast = 0
    BitmapOptions.Embossed = False
    BitmapOptions.TintColor = clNone
    BitmapOptions.GaussianBlur = 0
    BitmapOptions.GrayScale = False
    BitmapOptions.HorizontallyFlipped = False
    BitmapOptions.Inverted = False
    BitmapOptions.Lightness = 0
    BitmapOptions.Rotation.CenterX = -1
    BitmapOptions.Rotation.CenterY = -1
    BitmapOptions.Rotation.Angle = 0
    BitmapOptions.Saturation = -1
    BitmapOptions.Sharpen = 0
    BitmapOptions.Sponge = 0
    BitmapOptions.VerticallyFlipped = False
    BitmapOptions.Wave.XDiv = 0
    BitmapOptions.Wave.YDiv = 0
    BitmapOptions.Wave.Ratio = 0
    BitmapOptions.Wave.Wrap = False
    DrawStyle = dsTile
    Picture.Data = {
      07544269746D617076120000424D761200000000000076000000280000006000
      0000600000000100040000000000001200000000000000000000100000000000
      00007C808B008B959B008F9AA900979AA1009AA0A900A7B0B800AFBAC600B6BC
      C700AFC4CC00BFC9D200C8D6E100D1DDE600DAE8EF00FBF4EF00000000000000
      0000865556526AA7BB95CCB999B9C759C9599745997499515CB95355551BBC74
      55511CA6868625965999855555155119CCCC8655662126667731599558755335
      5145551575755751155954555559764465225666666656655699996953559339
      766586668A946996972579955779955555557959A99559999999959997BA9775
      999AAA696AAAAA9977A9999A997995999885AA99ACAAAAA79969A97579C99999
      9767CC5BB9979CC6BCCB77A99999CB97BCA9AAA7ABCBCCAAA9CCA99B99B9CB99
      A9999626AAA6AAB7CC69BBB99BCCCB99B549CC5555515CB57795399955777514
      BB95566429645664259A9955515CC77A99996425664446627922799359CAA957
      9315973555534751555517551565554556457AA6A6766976A797555551575135
      998197697654466466256551156797599455545799555651959559B975999959
      76669A777AA77AA9AA997759959759999995CAAABA975AA7AA66777599957959
      A59BB95999999A97C9C95779519CCC549A546645665266655699997CA5999999
      CB96C946AA766CC9AA76BBC799CCB959C5596557BB5155414554155521557512
      7666466766646666676511557459951599957525665427967A64ACB559995515
      73155515595155259755555959999965966AA767AA77A7776797457955575535
      996566567764466246124451355555597557995799559859999569A957B99977
      A7AACA79AC76A997699957979679989996999A7A7A66AA769759997599575599
      995CCB9B9995BA997BB75CCC75BBB957BA669966A755AA666CC959CCA99CC99B
      9998A746A9666A96BB69B99559BCC99B954BC956955579159791575511454335
      57479767A6666A65625511555565555599516666774646626722655115987535
      5335551799969999A9C7999955579999996CCA7AAA767CB79997555997995555
      9555676997666A646625865115555536957755599999C999CCC799BB97CCCB99
      9549966667666AA599999559979979599979CA7AABA7ABA6A66599959BC9755A
      C799999CCC579515999555553199965452162525642216625555335585565758
      9C75A76669656B96A966CCB59999655954555345555555569955795545555545
      5569996696656964655413555355555575514545551216556511696559CA9545
      11513357775959999955999659855559965AAA79BCA9ACA69995559553577957
      55537967895659855555855599999569159576999779BA99CB999BA955999759
      AA598546B966899599B9599999CCC999A955C999CCA9CB99CC6AC995599CC69C
      75B95367754CB7179545699555595415991451555545552115555357159C9119
      9995545999759A97BC599A955999955534655155510555155511554555555112
      6525558999556555569554551155511555155155655355415511555155555144
      3555537951575656555597669999955857559559999799599995534775955517
      554596999756785555155958998551999B999579B89999699969BBA999CA999C
      C957B979995699599999757CC9999559AB59C59C99679998A9569999999955B9
      99999699959B975BCC59CAA98899955999579955574597577A99756CC99B959C
      CC79A599B995CA99B989BCA9AB9999C979955599541655159745665415885155
      5113554345135556755511155155314A99555155551055555115585155511555
      5575599955155559951155555665555551455543553555557555555553535347
      9754555555215555524155115552557565799999555596999715559959996599
      5579975555577555765559775554555975549559955999999798858596969999
      599B79A9995B969C99959CAA999A999C969CBB95CB9B99959969799979CB79C9
      9999C9ACC959C999C99A9995CCC599967CCB99CC957CB59B9985999956C9959A
      9599B955B9599BB9BBCB999B99CC999BCB99235897559959C99BB965AAA56965
      399779552115514795525555115511555255531375155755599A569977BC969C
      B979155565255111544552115551155114555555114551455556795555354156
      5515555586555555566555751355435751315795665555556565855599555565
      7955599955957555679CB9956598559965198789595568599965577955555555
      95755997996976996696965999785A9699999999979999999C9A999965999599
      98599A5999689C89A99779995997795596A999BCB99CCA9C999ACA9A9A965CC9
      AB9999CB97999999B999C999999C959A995CCC89B999CC699CCB99AC5BB9999B
      C99C55899559C9599999C9999B95599579751599715755595545999511995557
      5519991555159919AC9959995997515CA9192155511155255459595799555555
      7553555755155577751555513555557511555755541655315751559969995555
      9515959AC999995999C9B9599A759C999BCB9AA9977C999999799B99999C95BB
      799C9957C97999759B99AB9999CC99B998995555958996899699C9579C969995
      9CCB79C9995CC99A99999B9999CC99CCC99CC979C999B9979B959CAC59CC999B
      B99A989555555115515551155553555125411585335975999955755555551155
      51455314555579555951555525765259715559A9955995697599656999755999
      9A77559935555599999995553555559541557555551359999555555559655555
      62565599C599C99C9699959BAB955A9999995799399965999599999959B95999
      5559A9799755999C9759559979976599A59A5555511751595157911577245751
      155115BB559A95999155999957C95559979CC9679959C957999A79CC5999559C
      C579546515985515125655567555955315513577515515355415955314654315
      1135511351155354595355561553115965595599969956595999995559379975
      5695559955555597753999553755555515555114555555555541455545552555
      9545969BB99995596AC999599A57795559955799855B59999559999959995999
      59999559975999756557997557695579795798CCC99CB95C599B9759CC599975
      9BC95999959C79C9959BCAB959999BCC5999998C9979A9977B977999599999B9
      9A9955999599955C25997559CB4799959BB999A9959C95997499C9CC589959CC
      55995559979999979B9799999CCC99C9C99A5565555515591454511555155965
      595555555516115355555599145115551155545555355535575579994BCB579A
      958C9AB995979999555596599955697599975799575855779599999515555995
      55556559655589589955676516675699522679CC99CA999C759C957C99999A95
      9B9759996898599A979A9995599959995969975996559B99AA76997999965576
      589A1555135943591599B569B96599559AC955997589859B9599A9C559C95799
      55ACA69CA989C99CBB99BCC99CC999AA66AA4555555551151156945585115551
      5554455551551156515555111353155111555155541551469841589569951599
      259A555955555555599795555555978556545998855515556555555115551531
      1555641551156555551556956754125552565999999755599999955599999965
      5974599885585998769999955575555555858555659999689959A96669665998
      66585ACB6999959B999999999CC99795999999A99599899996CB999599995999
      99A995AB999999A99A9999999CCB99A9996B9CCC9AC996BC9CBBB99CCC9A9996
      CCC9999995CC8899A99CBB9599997BBC999995CCB58CA99ACC99CCC9BCCB999A
      998C9BCC999999CC9BBBA79CCA999995CCCC99BB99CC599B999BCAC599997CCC
      569955AC95598149C9556971689959BC555A0477445523995755311699477651
      ACB9559511591598515555935551156515855176555565595511556196555588
      5966554441551155559553555567755147651545455414865599755116559965
      5569589976599599965589969985569A98999797559977999999995797599995
      597756995999559955999995599999B9999C999A999CA99CAA79ACC9AC96799A
      869C55551459555747B9953554199751555115581241115AA965454155931555
      3555514515567558554556554511256555555755135555551555544441355541
      331355551255255ACABA76515965457999755579999995589959995599555566
      69995979559955599996767955999654455559585989899A9CBC99979957599B
      9C99959999999859998999899997899968A97BBB7797999BA999999B99999965
      7556999959A99AA99A9C9C95AB9759CC999995CC9699999CB999A9A9ACC989AA
      99CB7BCB99CA5BCC9BCB979CC99BA979BCC999A96AC999B999BCBC95AB9759CC
      599851BA95565319955999959C95556555BA1465515517953696546CB5599515
      9A93575516955555119965915550455555555455555555765953565115551551
      1142555451551555555544454355550155455555155535451555555145545555
      5579957975595599955269959885565495999965555959779957597754577757
      95543445585537764999997577B59999999B9999759995999555999999985995
      5799999999CC6B99CBAC999B97999B9999555ABC69967BBB7BBC9999CCB59999
      B99C99BC97BCB5999966CCCAC9999BC989C9599955CC7B99BCCC97BC996BCC59
      99955CCC59755BC9599A99539975997556999555159C957995559BA999855BA7
      6999555415551555596541575116651155505565575115551535551155435565
      3555555514553155555596655551457555997797559657959997657765676745
      776159575995595559555757999597AA9B975699599755599799998556769999
      799C9BBA59977977C99797A997AC99599995A99979979B9557979959BB7579BB
      9CA99BCB69B9959CC99A99979A99999999CD9CC959C95BC59ACB57CCA67BA957
      BBC59BBB9CC59B9999CC99759B955AC9777557CC5579979CC5999955CCB989B5
      56CA555515534551555101565546652475515854397149511555555555425555
      9975115513555147551524315555555512519759555455555675157775547756
      9955655555544553599977555555995557775555357955977555555195555559
      5595A99999B96999999967AA7777BB79B97996A9997959959BA997579CB9BCB9
      9CCB99BA99CC99C99799C99596956BC999999BCB99DCACC9CCC977AA769BCC67
      9974ACC9CBB95CC559BA97259C55697559CA579959CB57A9C89CCCC9C9C95CC9
      99A9569555997995999954654169995577416999679419911575541154355515
      35553555115533555569B99599515AC955667995255155529677546644754545
      6451555535635555557797559755555579553356599753595859555655511551
      35569A9967956997B99779ABA77A7759A9A59A986CC59C9959BBB97999959CCC
      997999CB9BA99599999998599C958996599BBB9959C95BC99CBA69BCA6AA799B
      BBB7A9C99CC59CB989CCB95599759CCC7BB99BDC559C959B95999989CC999BA9
      89BA6555315118955552159AA4554447AAA15555155155511299755555315565
      5553155711551156556965559951455525A99A95776555655565246664665224
      6551455355844865896675557956956556545955545659995556651585515552
      5542BCC99BC99A99ACB969AA97A7AA7AAA65ACB99B997CC569CCC9799C559995
      7B95799B95CC77AC999CCB88996699A566A9697511751551599A566677BBBA66
      7652699699551551469752115755455144521444115611456156965285115995
      556559931554355157962266642A966664215555555155552555543559755775
      6565455512562246525555555511255222666997799655959996566442566456
      566699755855985989995679AB5555977976666A6A9665698696667597559688
      6666BB9B99995B99997669A6627AA74977999999A99599999999C999B996ACB6
      AAAA7ACC6AAA66AB69BBAB9BBB89999969BACCC999B99CC999999AAAA699A96A
      AAA9A999CBC599997CCCCB99B776CCC6BABA8ACC6CAC66AA86BCBBAACC99CC99
      8ACA9AB959975BC9CCCA6ACCA7BBBA6BCCA6AA95CCC59AA75CCCC979A959CA95
      6A66566626662166515555219855995159A55795455115515552257A66AAB626
      976156515551555115956557951155556665668A626656686555455558515952
      4662999657637975556256766566642776657654655425555666555555597965
      76666666626869A996656656895489958686CCB77BC699A999957AA97677767A
      A77699969AB75BB79BCAA9779C5CCC99BCB68A9866A669A9669BC9599995AC99
      A9A96551155179957995599A969AB9ABCA99CCC99B959CC59AAC95579A599995
      AA925AA859A98AAA66CCC95996559C96CACA5541355415515757569A645AA959
      A951679655513752575951045215552156615452115225961166654595115925
      6962}
    PreProcess = True
    SmoothStretching = False
    Transparent = False
    TransparentColor = clNone
    TabOrder = 0
  end
  object DBNavigator1: TDBNavigator
    Left = 0
    Top = 0
    Width = 493
    Height = 25
    DataSource = DataSource1
    VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh]
    Align = alTop
    TabOrder = 0
  end
  object fcGroupBox1: TfcGroupBox
    Left = 215
    Top = 60
    Width = 272
    Height = 372
    Anchors = [akLeft, akTop, akRight, akBottom]
    BorderAroundLabel = True
    Caption = ' Description '
    CaptionIndent = 3
    Frame.Enabled = True
    FullBorder = True
    TabOrder = 1
    object Panel1: TPanel
      Left = 2
      Top = 15
      Width = 268
      Height = 355
      Align = alClient
      BevelOuter = bvLowered
      BorderWidth = 4
      Color = clSilver
      TabOrder = 0
      object Panel2: TPanel
        Left = 5
        Top = 5
        Width = 258
        Height = 345
        Align = alClient
        BevelOuter = bvNone
        Color = clSilver
        TabOrder = 0
        object fcLabel1: TfcLabel
          Left = 0
          Top = 0
          Width = 258
          Height = 345
          Align = alClient
          AutoSize = False
          Caption = 
            'Also known as the turkeyfish.  Inhabits reef caves and crevices.' +
            '  The firefish is usually stationary during the day, but feeds a' +
            'ctively at night.  Favorite foods are crustaceans.'#10#10'The dorsal s' +
            'pines of the firefish are needle-like and contain venom.  They c' +
            'an inflict an extremely painful wound.'#10#10'Edibility is poor.'#10#10'Rang' +
            'e is from Western Australia to Malaysia.'#10#10
          Color = clSilver
          DataField = 'Notes'
          DataSource = DataSource1
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentColor = False
          ParentFont = False
          TextOptions.Alignment = taLeftJustify
          TextOptions.Options = [toShowAccel, toFullJustify]
          TextOptions.ShadeColor = clNone
          TextOptions.Style = fclsLowered
          TextOptions.VAlignment = vaTop
          TextOptions.WordWrap = True
          TextOptions.DoubleBuffered = True
        end
      end
    end
  end
  object fcPanel3: TfcPanel
    Left = 214
    Top = 29
    Width = 273
    Height = 27
    Anchors = [akLeft, akTop, akRight]
    BevelInner = bvLowered
    Color = clSilver
    TabOrder = 2
    object fcLabel2: TfcLabel
      Left = 2
      Top = 2
      Width = 269
      Height = 23
      Align = alClient
      AutoSize = False
      Caption = 'Firefish'
      DataField = 'Common_Name'
      DataSource = DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TextOptions.Alignment = taCenter
      TextOptions.Style = fclsLowered
      TextOptions.VAlignment = vaVCenter
      Transparent = True
    end
  end
  object fcDemoRichEdit1: TfcDemoRichEdit
    Left = 3
    Top = 28
    Width = 206
    Height = 404
    TabOrder = 3
    RichEditLines = {
      7B5C727466315C6662696469735C616E73695C616E7369637067313235325C64
      656666305C6465666C616E67313033337B5C666F6E7474626C7B5C66305C666E
      696C5C666368617273657430204D532053616E732053657269663B7D7B5C6631
      5C666E696C5C6663686172736574322057696E6764696E67733B7D7D0D0A7B5C
      636F6C6F7274626C203B5C7265643235355C677265656E3235355C626C756530
      3B7D0D0A5C766965776B696E64345C7563315C706172645C6C74727061725C71
      635C756C5C625C66305C66733136204E45572120496E20317374436C61737320
      333030302121210D0A5C706172205C706172645C6C7472706172200D0A5C7061
      72205C706172645C6C74727061725C66692D3138305C6C693138305C74783138
      305C756C6E6F6E655C62305C66315C667332305C2739665C625C66305C667331
      365C7461625C623020546865205466636C6162656C20636F6E74726F6C206861
      73206265656E205C6220656E68616E636564205C623020746F20616C6C6F7720
      697420746F206265205C6220626F756E64205C623020746F2061206461746162
      617365206669656C642E0D0A5C706172205C706172645C6C74727061725C7478
      313830200D0A5C706172205C706172645C6C74727061725C66692D3138305C6C
      693138305C74783138305C66315C667332305C2739665C625C66305C66733136
      5C7461625C62302041206E65772054657874204F7074696F6E2068617320616C
      736F206265656E20616464656420746F20616C6C6F7720796F7520746F206372
      656174655C6220205C686967686C69676874312066756C6C2D6A757374696669
      65645C686967686C69676874305C623020206C6162656C7320776974686F7574
      20726571756972696E6720616E79207370656369666963207269636865646974
      202E646C6C20617320736F6D65206F746865722033726420706172747920636F
      6E74726F6C7320726571756972652E0D0A5C706172205C706172645C6C747270
      61725C7478313830200D0A5C706172205C706172645C6C74727061725C66692D
      3138305C6C693138305C74783138305C66315C667332305C2739665C625C6630
      5C667331365C7461625C62302055736520616E79206F6620746865206F746865
      72206D616E7920646966666572656E74204C6162656C20656666656374732062
      75696C742D696E20746F2074686520546578744F7074696F6E732070726F7065
      72747920746F206675727468657220656E68616E636520746865206C6F6F6B20
      6F6620746865206C6162656C20636F6E74726F6C2E20204120446F75626C6542
      756666657265642070726F70657274792068617320616C736F206265656E2061
      6464656420666F7220626574746572207061696E74696E6720706572666F726D
      616E63652077697468206365727461696E20656666656374732E0D0A5C706172
      205C706172645C6C74727061725C7478313830200D0A5C706172207D0D0A00}
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 31
    Top = 72
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'FirstClass'
    TableName = 'biolife.db'
    Left = 72
    Top = 64
  end
end

						