Changeset 13 for trunk


Ignore:
Timestamp:
Nov 15, 2012, 8:32:45 AM (12 years ago)
Author:
chronos
Message:
  • Přidáno: Další ikony pro akce.
  • Přidáno: Nastavení zobrazení nástrojové lišty.
  • Přidáno: Akce pro odpojení od databáze.
Location:
trunk
Files:
8 added
6 edited

Legend:

Unmodified
Added
Removed
  • trunk/Forms/UFormMain.lfm

    r12 r13  
    3232    Visible = False
    3333    object ToolButton1: TToolButton
     34      Left = 47
     35      Top = 2
     36      Action = ASetting
     37    end
     38    object ToolButton2: TToolButton
     39      Left = 70
     40      Top = 2
     41      Action = AModuleList
     42    end
     43    object ToolButton3: TToolButton
    3444      Left = 1
    3545      Top = 2
    36       Action = ASetting
     46      Action = AConnectionSettings
     47    end
     48    object ToolButton4: TToolButton
     49      Left = 24
     50      Top = 2
     51      Action = ADisconnect
    3752    end
    3853  end
     
    4863  end
    4964  object MainMenu1: TMainMenu
     65    Images = ImageList1
    5066    left = 472
    5167    top = 61
     
    5672        object MenuItem4: TMenuItem
    5773          Action = AConnectionSettings
     74        end
     75        object MenuItem9: TMenuItem
     76          Action = ADisconnect
    5877        end
    5978      end
     
    6887      end
    6988    end
     89    object MenuItem6: TMenuItem
     90      Caption = 'View'
     91      object MenuItem8: TMenuItem
     92        Action = AShowToolBar
     93      end
     94    end
     95    object MenuItem7: TMenuItem
     96      Caption = 'Help'
     97    end
    7098  end
    7199  object ActionList1: TActionList
     
    76104      Caption = 'Exit'
    77105      Hint = 'Close application'
     106      ImageIndex = 3
    78107      OnExecute = AExitExecute
    79108    end
     
    81110      Caption = 'Setting'
    82111      Hint = 'Show global setting'
     112      ImageIndex = 13
    83113      OnExecute = ASettingExecute
    84114      ShortCut = 120
     
    86116    object AConnectionSettings: TAction
    87117      Caption = 'Connection settings'
     118      Hint = 'Connect to database'
     119      ImageIndex = 21
    88120      OnExecute = AConnectionSettingsExecute
    89121      ShortCut = 121
     
    92124      Caption = 'Modules'
    93125      Hint = 'Show module management'
     126      ImageIndex = 17
    94127      OnExecute = AModuleListExecute
     128    end
     129    object AShowToolBar: TAction
     130      Caption = 'Toolbar'
     131      Hint = 'Toggle toolbar visibility'
     132      OnExecute = AShowToolBarExecute
     133    end
     134    object ADisconnect: TAction
     135      Caption = 'Disconnect'
     136      Hint = 'Disconnet from database'
     137      ImageIndex = 24
     138      OnExecute = ADisconnectExecute
    95139    end
    96140  end
     
    99143    top = 168
    100144    Bitmap = {
    101       4C69140000001000000010000000000000000000000000000000000000000000
     145      4C691C0000001000000010000000000000000000000000000000000000000000
    102146      0000000000000000000000000000000000000000000000000000000000000000
    103147      000000000000000000000000000000000000000000008C8CBBFF000088FF8C8C
     
    739783      EAFF0164DDFF044DBDFC0345B87AFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
    740784      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF001D57C4780345B9DF0442
    741       BCFE0345B9E30345B87AFFFFFF00
     785      BCFE0345B9E30345B87AFFFFFF00000000000000000000000000000000000000
     786      0000000000000000000000000000000000000000000000000000000000000000
     787      0000000000000000000000000000000000000000000000000000000000000000
     788      0000000000000000000000000000000000000000000000000000000000000000
     789      0000000000000000000000000000000000000000000000000000000000000000
     790      0000C0C0C0FFC0C0C0FF808080FF808080FF808080FF808080FF808080FF8080
     791      80FF808080FF000000000000000000000000000000000000000000000000C0C0
     792      C0FFC0C0C0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8080
     793      80FF808080FF0000000000000000000000000000000000000000C0C0C0FFFFFF
     794      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF808080FFC0C0
     795      C0FF000000FF00000000000000000000000000000000808080FFFFFFFFFFFFFF
     796      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF808080FFC0C0C0FFC0C0
     797      C0FF000000FF00000000000000000000000000000000808080FF808080FF8080
     798      80FF808080FF808080FF808080FF808080FF808080FFC0C0C0FFC0C0C0FF8080
     799      80FF000000FF00000000000000000000000000000000808080FFFFFFFFFFFFFF
     800      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF808080FFC0C0C0FFC0C0C0FF8080
     801      80FF000000FF00000000000000000000000000000000808080FFFFFFFFFFFFFF
     802      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF808080FFC0C0C0FFC0C0C0FF8080
     803      80FF000000FF00000000000000000000000000000000808080FFFFFFFFFFFFFF
     804      FFFFFFFFFFFFFFFFFFFFFFFFFFFFC0C0C0FF000000FFC0C0C0FF808080FFC0C0
     805      C0FF000000FF00000000000000000000000000000000808080FFFFFFFFFFFFFF
     806      FFFFFFFFFFFFFFFFFFFFC0C0C0FFFFFFFFFF000000FFC0C0C0FF808080FF0000
     807      00FF808080FFC0C0C0FF000000000000000000000000808080FFFFFFFFFFFFFF
     808      FFFFFFFFFFFFC0C0C0FFFFFFFFFFC0C0C0FF000000FFC0C0C0FF000000FF8080
     809      80FFC0C0C0FFC0C0C0FF000000000000000000000000808080FFFFFFFFFFFFFF
     810      FFFFC0C0C0FFFFFFFFFFC0C0C0FFFFFFFFFF000000FF000000FF808080FFC0C0
     811      C0FFC0C0C0FF00000000000000000000000000000000808080FF808080FF8080
     812      80FF000000FF000000FF000000FF000000FF000000FF808080FFC0C0C0FF0000
     813      0000000000000000000000000000000000000000000000000000000000000000
     814      0000000000000000000000000000000000000000000000000000000000000000
     815      0000000000000000000000000000000000000000000000000000000000000000
     816      0000000000000000000000000000000000000000000000000000000000000000
     817      0000000000000000000000000000E9DDCDFF555555FFB98C5700B98C5700B98C
     818      5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C
     819      5700B98C5700B98C5700B98C57000C0C0CFFEADECDFF555555FFB98C5700B98C
     820      5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C
     821      5700B98C5700B98C5700B98C5700B98C57000C0C0CFFEADECDFF555555FFB98C
     822      5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C
     823      5700B98C5700B98C5700B98C5700B98C5700B98C57000C0C0CFFEADECDFF5555
     824      55FF555555FF555555FF555555FF555555FFB98C5700B98C5700B98C5700B98C
     825      5700B98C5700B98C5700B98C5700B98C5700B98C5700777777FF555555FFB98C
     826      57FFEADECDFFEADECDFFE9DDCDFFE9DDCDFF555555FFB98C5700B98C5700B98C
     827      5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C57000C0C0CFFE9DD
     828      CDFFB98C57FFB98C57FFB98C57FFB98C57FFB98C57FF0C0C0CFFB98C5700B98C
     829      5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C57000C0C0CFFE9DD
     830      CDFFB98C57FFB98C57FFB98C57FFB98C57FF0C0C0CFFEADECDFF555555FFB98C
     831      5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C57000C0C0CFFE9DD
     832      CDFFB98C57FFB98C57FFB98C57FF0C0C0CFFEADECDFFB98C57FFB98C57FF0C0C
     833      0CFFB98C5700B98C5700B98C5700B98C5700B98C5700B98C57000C0C0CFFE9DD
     834      CDFFB98C57FFB98C57FF0C0C0CFFEADECDFFB98C57FFB98C57FFB98C57FF0C0C
     835      0CFFB98C5700B98C5700B98C5700B98C5700B98C5700B98C5700969696FF0C0C
     836      0CFFB98C57FF0C0C0CFFEADECDFFB98C57FFB98C57FFB98C57FFB98C57FF0C0C
     837      0CFFB98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C57007777
     838      77FF0C0C0CFFEADECDFFB98C57FFB98C57FFB98C57FFB98C57FFB98C57FF0C0C
     839      0CFFB98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C
     840      5700777777FF0C0C0CFFB98C57FFB98C57FFB98C57FFB98C57FFB98C57FF0C0C
     841      0CFFB98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C
     842      5700B98C5700777777FF0C0C0CFF0C0C0CFF0C0C0CFF0C0C0CFF0C0C0CFFE9DD
     843      CDFF555555FFB98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C
     844      5700B98C5700B98C5700969696FF969696FF969696FF969696FF969696FF0C0C
     845      0CFFEADECDFF555555FFB98C5700B98C5700B98C5700B98C5700B98C5700B98C
     846      5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C
     847      57000C0C0CFFEADECDFF555555FFB98C5700B98C5700B98C5700B98C5700B98C
     848      5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C
     849      5700B98C57000C0C0CFFE9DDCDFF000000000000000000000000000000000000
     850      0000000000000000000000000000000000000000000000000000000000000000
     851      0000000000000000000000000000000000000000000000000000000000000000
     852      0000000000000000000000000000000000000000000000000000000000000000
     853      000000000000000000000000000000000000000000FF000000FF000000FF0000
     854      00FF000000FF000000FF00000000000000000000000000000000000000000000
     855      000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFF
     856      FFFFFFFFFFFF000000FF000000FF000000000000000000000000000000000000
     857      000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFF
     858      FFFFFFFFFFFF000000FFFFFFFFFF000000FF0000000000000000000000000000
     859      000000000000000000000000000000000000000000FFFFFFFFFF000000FF0000
     860      00FFFFFFFFFF000000FF840000FF840000FF840000FF840000FF840000FF8400
     861      00FF00000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFF
     862      FFFFFFFFFFFFFFFFFFFF840000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8400
     863      00FF840000FF000000000000000000000000000000FFFFFFFFFF000000FF0000
     864      00FF000000FF000000FF840000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8400
     865      00FFFFFFFFFF840000FF0000000000000000000000FFFFFFFFFFFFFFFFFFFFFF
     866      FFFFFFFFFFFFFFFFFFFF840000FFFFFFFFFF000000FF000000FFFFFFFFFF8400
     867      00FF840000FF840000FF840000FF00000000000000FFFFFFFFFF000000FF0000
     868      00FF000000FF000000FF840000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
     869      FFFFFFFFFFFFFFFFFFFF840000FF00000000000000FFFFFFFFFFFFFFFFFFFFFF
     870      FFFFFFFFFFFFFFFFFFFF840000FFFFFFFFFF000000FF000000FF000000FF0000
     871      00FF000000FFFFFFFFFF840000FF00000000000000FF000000FF000000FF0000
     872      00FF000000FF000000FF840000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
     873      FFFFFFFFFFFFFFFFFFFF840000FF000000000000000000000000000000000000
     874      00000000000000000000840000FFFFFFFFFF000000FF000000FF000000FF0000
     875      00FF000000FFFFFFFFFF840000FF000000000000000000000000000000000000
     876      00000000000000000000840000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
     877      FFFFFFFFFFFFFFFFFFFF840000FF000000000000000000000000000000000000
     878      00000000000000000000840000FF840000FF840000FF840000FF840000FF8400
     879      00FF840000FF840000FF840000FF000000000000000000000000000000000000
     880      0000000000000000000000000000000000000000000000000000000000000000
     881      0000000000000000000000000000000000000000000000000000000000000000
     882      0000000000000000000000000000000000000000000000000000000000000000
     883      0000000000000000000000000000000000000000000000000000000000000000
     884      0000000000000000000000000000000000000000000000000000000000000000
     885      000000000000000000000000000000000000000000001818C0FF1818C0FFC0C0
     886      C0FF000000000000000000000000000000000000000000000000000000000000
     887      00001818C0FF1818C0FFC0C0C0FF00000000000000002020C8FF2020C8FF2020
     888      C8FF2020C8FFC0C0C0FF00000000000000000000000000000000000000002020
     889      C8FF2020C8FFC0C0C0FF000000000000000000000000000000002626CEFF2626
     890      CEFF2626CEFF2626CEFFC0C0C0FF0000000000000000000000002626CEFF2626
     891      CEFFC0C0C0FF0000000000000000000000000000000000000000000000000000
     892      00002929D1FF2929D1FF2929D1FFC0C0C0FF000000002929D1FFC0C0C0FF0000
     893      0000000000000000000000000000000000000000000000000000000000000000
     894      0000000000002C2CD4FF2C2CD4FF2C2CD4FF2C2CD4FF2C2CD4FFC0C0C0FF0000
     895      0000000000000000000000000000000000000000000000000000000000000000
     896      000000000000000000002F2FD7FF2F2FD7FF2F2FD7FFC0C0C0FF000000000000
     897      0000000000000000000000000000000000000000000000000000000000000000
     898      0000000000003232DAFF3232DAFF3232DAFF3232DAFF3232DAFFC0C0C0FF0000
     899      0000000000000000000000000000000000000000000000000000000000000000
     900      00003535DDFF3535DDFF3535DDFFC0C0C0FF000000003535DDFF3535DDFFC0C0
     901      C0FF000000000000000000000000000000000000000000000000000000003838
     902      E0FF3838E0FF3838E0FFC0C0C0FF0000000000000000000000003838E0FF3838
     903      E0FFC0C0C0FF00000000000000000000000000000000000000003A3AE2FF3A3A
     904      E2FF3A3AE2FFC0C0C0FF00000000000000000000000000000000000000003A3A
     905      E2FFC0C0C0FF00000000000000000000000000000000000000003A3AE2FF3A3A
     906      E2FF3A3AE2FFC0C0C0FF00000000000000000000000000000000000000000000
     907      00003A3AE2FFC0C0C0FF00000000000000000000000000000000000000003A3A
     908      E2FFC0C0C0FF0000000000000000000000000000000000000000000000000000
     909      0000000000000000000000000000000000000000000000000000000000000000
     910      0000000000000000000000000000000000000000000000000000000000000000
     911      0000000000003A3AE2FFC0C0C0FF000000000000000000000000000000000000
     912      0000000000000000000000000000000000000000000000000000000000000000
     913      0000000000000000000000000000E8DCCCFF393939FFB98C5700B98C5700B98C
     914      5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C5700B98C
     915      5700B98C5700B98C5700B98C57000C0C0CFFE9DDCCFF555555FF555555FF5555
     916      55FF555555FF555555FFB98C5700B98C5700B98C5700B98C5700B98C5700B98C
     917      5700B98C5700B98C5700B98C5700777777FF393939FFB88C57FFE9DDCCFFE9DD
     918      CCFFE8DCCCFFE8DCCCFF555555FFB98C5700B98C5700B98C5700B98C5700B98C
     919      5700B98C5700B98C5700B98C5700B98C57000C0C0CFFE8DCCCFFB88C57FFB88C
     920      57FFB88C57FFB88C57FFB88C57FF0C0C0CFFB98C5700B98C5700B98C5700B98C
     921      5700B98C5700B98C5700B98C5700B98C57000C0C0CFFE8DCCCFFB88C57FFB88C
     922      57FFB88C57FFB88C57FF0C0C0CFF777777FFB98C5700B98C5700B98C5700B98C
     923      5700B98C5700B98C5700B98C5700B98C57000C0C0CFFE8DCCCFFB88C57FFB88C
     924      57FFB88C57FF0C0C0CFF777777FF969696FFB98C5700B98C5700B98C5700B98C
     925      5700B98C5700B98C5700B98C5700B98C57000C0C0CFFE8DCCCFFB88C57FFB88C
     926      57FF0C0C0CFF777777FF969696FFB98C5700B98C5700003366FFB98C5700B98C
     927      5700B98C5700B98C5700B98C5700B98C5700777777FF0C0C0CFFB88C57FF0C0C
     928      0CFF777777FF969696FFB98C5700B98C5700003366FFE9DDCCFF777777FF0C0C
     929      0CFFB98C5700B98C5700B98C5700B98C5700B98C5700777777FF0C0C0CFF7777
     930      77FF969696FFB98C5700B98C5700003366FFE9DDCCFFE9DDCCFF0C0C0CFFE9DD
     931      CCFF0C0C0CFFB98C5700B98C5700B98C5700B98C5700B98C5700777777FF9696
     932      96FFB98C5700B98C5700003366FFE9DDCCFFE9DDCCFF0C0C0CFFE9DDCCFFB88C
     933      57FFB88C57FF0C0C0CFFB98C5700B98C5700B98C5700B98C5700B98C5700B98C
     934      5700B98C5700003366FFE9DDCCFFE9DDCCFF0C0C0CFFE9DDCCFFB88C57FFB88C
     935      57FFB88C57FF0C0C0CFFB98C5700B98C5700B98C5700B98C5700B98C5700B98C
     936      5700B98C5700969696FF777777FF0C0C0CFFE9DDCCFFB88C57FFB88C57FFB88C
     937      57FFB88C57FF0C0C0CFFB98C5700B98C5700B98C5700B98C5700B98C5700B98C
     938      5700B98C5700B98C57000C0C0CFFE8DCCCFFB88C57FFB88C57FFB88C57FFB88C
     939      57FFB88C57FF0C0C0CFFB98C5700B98C5700B98C5700B98C5700B98C5700B98C
     940      5700B98C5700B98C5700777777FF0C0C0CFFB88C57FFB88C57FFB88C57FFB88C
     941      57FFB88C57FF0C0C0CFFB98C5700B98C5700B98C5700B98C5700B98C5700B98C
     942      5700B98C5700B98C5700B98C5700777777FF0C0C0CFF0C0C0CFF0C0C0CFF0C0C
     943      0CFF0C0C0CFFE9DDCCFF393939FFB98C5700B98C5700B98C5700B98C5700B98C
     944      5700B98C5700B98C5700B98C5700B98C5700969696FF969696FF969696FF9696
     945      96FF969696FF0C0C0CFFE8DCCCFFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     946      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     947      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     948      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     949      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     950      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     951      FF00FFFFFF00FFFFFF00FFFFFF000101010001010100000000000000000E0000
     952      004E00000094000000B6000000C8000000C8000000B6000000940000004E0000
     953      000E00000000010101000101010001010100010101010000004F070707B44D4D
     954      4DD8A9A9A9EE7E7E7EF9424242FF424242FF7E7E7EF9A9A9A9EE4D4D4DD80707
     955      07B40000004F01010101010101000101010801010171353535C6CACACAF0FBFB
     956      FBFFA6A6A6FF9B9B9BFF383737FF383737FF383838FFA6A6A6FFFBFBFBFFCACA
     957      CAF0353535C6010101710101010803030348464646BEE9E9E9F9F6F6F6FFF6F6
     958      F6FFBDBDBDFFFFFFFFFF9E9B9BFF413C3CFF4C4646FF5C5C5CFFF6F6F6FFF6F6
     959      F6FFE9E9E9F9464646BE03030348030303A07E7E7ED0F0F0F0FFF0F0F0FFF0F0
     960      F0FF434343FFBAB2B2FF352E2EFF352E2EFF6D5F5FFF434343FFF0F0F0FFF0F0
     961      F0FFF0F0F0FF7E7E7ED0030303A003030341484848B1E2E2E2F7EAEAEAFFEAEA
     962      EAFF646464FF816F6FFF7A6767FF7A6767FF816F6FFF646464FFEAEAEAFFEAEA
     963      EAFFE2E2E2F7484848B103030341030303070404045A3A3A3AA5C6C6C6E6E7E7
     964      E7FFA2A2A2FF645D5DFF9E8484FF9E8484FF645D5DFFA2A2A2FFE7E7E7FFC6C6
     965      C6E63A3A3AA50404045A030303070303030004040401040404390C0C0C805454
     966      54ACAAAAAAD88C8C8CF15E5E5EFE5E5E5EFE8C8C8CF1AAAAAAD8545454AC0C0C
     967      0C800404043904040401030303000303030004040400040404000404040A0404
     968      0435040404650404047B04040488040404880404047B04040465040404350404
     969      040A040404000404040003030300FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     970      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     971      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     972      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     973      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     974      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     975      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     976      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
     977      FF00FFFFFF00FFFFFF00FFFFFF00858A8899858A88FF858A88FF858A88FF858A
     978      88FF858A88FF858A88FF858A88FF858A88FF858A88FF858A88FF858A88FF858A
     979      88FF858A88FF858A88FF858A8899858A88FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
     980      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
     981      FFFFFFFFFFFFFFFFFFFF858A88FF858A88FFFFFFFFFFA46534FFA46534FFA465
     982      34FFA46534FFECEEEEFFECEEEEFFEEEFEFFFEDEFEFFFA46534FFA46534FFA465
     983      34FFA46534FFFFFFFFFF858A88FF858A88FFFFFFFFFFA46534FFA46534FFA567
     984      36FFECEEEEFFECEEEEFFECEEEFFFEEF0F0FFEEF0F0FFEEF0F0FFA56736FFA465
     985      34FFA46534FFFFFFFFFF858A88FF858A88FFFFFFFFFFA46534FFA56736FFAA70
     986      43FFB4845FFFEEEFEFFFEEEFEFFFF0F1F1FFF0F1F1FFAE784EFFA96E40FFA568
     987      38FFA46534FFFFFFFFFF858A88FF858A88FFFFFFFFFFA46635FFEDEFEFFFB382
     988      5CFFC39F83FFCFB6A2FFEEF0F0FFF0F2F1FFCCB099FFC0987AFFB27F57FFF1F3
     989      F3FFA56737FFFFFFFFFF858A88FF858A88FFFFFFFFFFEFF0F0FFEFF0F0FFEFF1
     990      F1FFCFB4A0FFD8C7B9FFE0D3C9FFE2D7CDFFDCCBBDFFCFB49FFFF2F4F4FFF3F4
     991      F3FFF2F4F4FFFFFFFFFF858A88FF858A88FFFFFFFFFFEFF1F1FFF0F1F1FFF0F1
     992      F2FFF0F2F1FFDFD2C7FFF0F2F2FFF2F3F4FFE2D7CEFFF3F4F5FFF3F4F5FFF3F5
     993      F5FFF4F5F4FFFFFFFFFF858A88FF858A88FFFFFFFFFFF3F5F5FFF3F5F5FFF4F5
     994      F5FFF4F5F6FFE3D7CCFFF5F5F6FFF6F7F7FFEAE1D9FFF7F8F8FFF8F9F8FFF7F9
     995      F9FFF8F8F9FFFFFFFFFF858A88FF858A88FFFFFFFFFFF5F6F6FFF4F6F6FFF6F6
     996      F7FFCAAA90FFDBC7B7FFE6DBD3FFEAE2DBFFE4D6CAFFD4BAA6FFF8F9F9FFF9FA
     997      FAFFF9F9F9FFFFFFFFFF858A88FF858A88FFFFFFFFFFA46635FFF6F7F7FFAE77
     998      4CFFB98B67FFC9A68BFFF7F8F8FFF9F9F9FFD1B59EFFBD916FFFAE764BFFF9FA
     999      FAFFA46534FFFFFFFFFF858A88FF858A88FFFFFFFFFFA46534FFA46636FFA76A
     1000      3BFFAB7246FFF8F9F8FFF8F9F9FFFAFAFAFFFAFAFBFFAA7043FFA56737FFA465
     1001      34FFA46534FFFFFFFFFF858A88FF858A88FFFFFFFFFFA46534FFA46534FFA465
     1002      34FFF9FAFAFFF9F9F9FFF9FAF9FFFBFBFBFFFBFBFCFFFBFBFCFFA46534FFA465
     1003      34FFA46534FFFFFFFFFF858A88FF858A88FFFFFFFFFFA46534FFA46534FFA465
     1004      34FFA46534FFFAFBFBFFFAFBFBFFFCFCFDFFFDFCFCFFA46534FFA46534FFA465
     1005      34FFA46534FFFFFFFFFF858A88FF858A88FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
     1006      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
     1007      FFFFFFFFFFFFFFFFFFFF858A88FF8186849D858A88FF858A88FF858A88FF858A
     1008      88FF858A88FF858A88FF858A88FF858A88FF858A88FF858A88FF858A88FF858A
     1009      88FF858A88FF858A88FF7F8382A0000000000000000000000000000000000000
     1010      0000000000000000000000000000000000000000000000000000000000000000
     1011      000000000000000000000000000000000000000000000000000000000000F4F9
     1012      FFFF4195EFFF2F8AF1FF2F8DF3FF2F8DF3FF2F8DF3FF2F8BF1FF2F8BEFFFE9F2
     1013      FEFF00000000000000000000000000000000000000000000000000000000F0F6
     1014      FEFF239AFCFF21CFFFFF24CCFFFF24CCFFFF24CCFFFF23D1FFFF1C9FFFFFE2EE
     1015      FDFF00000000000000000000000000000000000000000000000000000000F1F7
     1016      FEFF32A2FBFF36DBFFFF39D8FFFF39D8FFFF39D8FFFF3ADEFFFF26A5FFFFE3EE
     1017      FDFF00000000000000000000000000000000000000000000000000000000F0F6
     1018      FEFF3CABFCFF58F6FFFF59F1FFFF58F1FFFF59F1FFFF5CF9FFFF35B2FFFFE2ED
     1019      FDFF00000000000000000000000000000000000000000000000000000000F1F7
     1020      FFFF2F9AF6FF3ECBFFFF3BC7FFFF36C5FFFF3BC6FFFF40CEFFFF299EF9FFE4EF
     1021      FEFF00000000000000000000000000000000000000000000000000000000FEFE
     1022      FEFFB8D3F4FFA9BFEFFF9FC0EEFF567BACFF91B9EAFFA9BFEFFFADCCF3FFFCFC
     1023      FDFF000000000000000000000000000000000000000000000000FFFFFFFFFAFA
     1024      FAFFFDFDFDFFFDFDFDFFF5F5F6FF9F978EFFE9EAEAFFFDFDFDFFFDFDFDFFFAFA
     1025      FAFFFEFEFEFF0000000000000000000000000000000000000000EDF2F8FF7A7E
     1026      83FF979694FF9A9896FF8D8D8FFF7E7F80FF8F8E8AFF999796FF989795FF8282
     1027      7DFFE9EBE9FF000000000000000000000000FFF3DCFFFFEED0FFE7D2AEFFC0AB
     1028      88FFFAECD3FFFBEDD5FFFCFAF6FF00000000F9F9FBFFD8D7EDFFD5D4EBFF9492
     1029      B8FFA4A4C7FFD3D2EEFFDADAF1FF00000000FCB02CFFFFBC35FFFFB72BFFFFB8
     1030      2DFFFFC035FFFFB726FFFFE2A5FF00000000C2C2EBFF000FC6FF0013D6FF0005
     1031      CCFF0004C9FF0021D9FF0C20C0FF00000000FEB12FFFFFDA6AFFFFD862FFFFD8
     1032      64FFFFDA69FFFFC748FFFFD9A6FF00000000C3C3E7FF001CE2FF003AFFFF003F
     1033      FFFF003BFFFF0034FFFF1018CCFF00000000FFB93BFFFFEB89FFFFE782FFFFE7
     1034      82FFFFEB88FFFFD561FFFFDAA6FF00000000C3C3E7FF0029E2FF0B5DFFFF0E61
     1035      FFFF0B5CFFFF044CFFFF111CCDFF00000000FFC34CFFFFFFCEFFFFFFC3FFFFFF
     1036      C3FFFFFFCBFFFFF094FFFFD8A4FF00000000C2C2E7FF003EE9FF1E8CFFFF2190
     1037      FFFF1D88FFFF136FFFFF0D23CFFF00000000FBB73DFFFFCE5BFFFFCB58FFFFCB
     1038      58FFFFCD5AFFFFC044FFFFE0ACFF00000000C7C7EBFF1123C2FF1143D3FF1149
     1039      D6FF1143D1FF1133D2FF2121B5FF000000000000000000000000000000000000
     1040      0000000000000000000000000000000000000000000000000000000000000000
     1041      0000000000000000000000000000
    7421042    }
    7431043  end
  • trunk/Forms/UFormMain.lrt

    r12 r13  
    22TFORMMAIN.MENUITEMSYSTEM.CAPTION=System
    33TFORMMAIN.MENUITEM3.CAPTION=Database
     4TFORMMAIN.MENUITEM6.CAPTION=View
     5TFORMMAIN.MENUITEM7.CAPTION=Help
    46TFORMMAIN.AEXIT.CAPTION=Exit
    57TFORMMAIN.AEXIT.HINT=Close application
     
    79TFORMMAIN.ASETTING.HINT=Show global setting
    810TFORMMAIN.ACONNECTIONSETTINGS.CAPTION=Connection settings
     11TFORMMAIN.ACONNECTIONSETTINGS.HINT=Connect to database
    912TFORMMAIN.AMODULELIST.CAPTION=Modules
    1013TFORMMAIN.AMODULELIST.HINT=Show module management
     14TFORMMAIN.ASHOWTOOLBAR.CAPTION=Toolbar
     15TFORMMAIN.ASHOWTOOLBAR.HINT=Toggle toolbar visibility
     16TFORMMAIN.ADISCONNECT.CAPTION=Disconnect
     17TFORMMAIN.ADISCONNECT.HINT=Disconnet from database
  • trunk/Forms/UFormMain.pas

    r12 r13  
    77uses
    88  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ComCtrls,
    9   Menus, ActnList, UFormList, SpecializedList, UFormEdit, UFormModuleList;
     9  Menus, ActnList, UFormList, SpecializedList, UFormEdit, UFormModuleList,
     10  URegistry;
    1011
    1112type
     
    1516  TFormMain = class(TForm)
    1617    AConnectionSettings: TAction;
     18    ADisconnect: TAction;
     19    AShowToolBar: TAction;
    1720    AModuleList: TAction;
    1821    ASetting: TAction;
     
    2528    MenuItem4: TMenuItem;
    2629    MenuItem5: TMenuItem;
     30    MenuItem6: TMenuItem;
     31    MenuItem7: TMenuItem;
     32    MenuItem8: TMenuItem;
     33    MenuItem9: TMenuItem;
    2734    MenuItemSystem: TMenuItem;
    2835    MenuItem2: TMenuItem;
     
    3138    ToolBar1: TToolBar;
    3239    ToolButton1: TToolButton;
     40    ToolButton2: TToolButton;
     41    ToolButton3: TToolButton;
     42    ToolButton4: TToolButton;
    3343    procedure AConnectionSettingsExecute(Sender: TObject);
     44    procedure ADisconnectExecute(Sender: TObject);
    3445    procedure AExitExecute(Sender: TObject);
    3546    procedure AModuleListExecute(Sender: TObject);
    3647    procedure ASettingExecute(Sender: TObject);
     48    procedure AShowToolBarExecute(Sender: TObject);
    3749    procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
    3850    procedure FormCreate(Sender: TObject);
     
    4153    procedure TabSheetShow(Sender: TObject);
    4254  private
     55    ShowToolBar: Boolean;
    4356    procedure FormModuleListDestroy(Sender: TObject);
    4457    procedure InitModules;
     
    4760    DataViewLists: TListObject; // TListObject<TDataViewList>
    4861    DataViewForms: TListObject; // TListObject<TDataViewForm>
     62    procedure UpdateInterface;
     63    procedure LoadFromRegistry(AContext: TRegistryContext);
     64    procedure SaveToRegistry(AContext: TRegistryContext);
    4965  end;
    5066
     
    100116  DataViewLists := TListObject.Create;
    101117  DataViewForms := TListObject.Create;
     118  LoadFromRegistry(Core.RegistryContext);
    102119  Core.Init;
    103120  Core.PersistentForm.Load(Self);
     
    108125procedure TFormMain.FormDestroy(Sender: TObject);
    109126begin
     127  SaveToRegistry(Core.RegistryContext);
    110128  FreeAndNil(DataViewForms);
    111129  FreeAndNil(DataViewLists);
     
    125143    Core.FormModuleList.Manager := Core.ModuleManager;
    126144    Core.FormModuleList.AddHandlerOnBeforeDestruction(FormModuleListDestroy);
     145    Core.FormModuleList.Options := [mloAllowEnable, mloShowEnable,
     146      mloAllowInstall,  mloShowDescription, mloShowDependencies, mloShowInfoBar];
    127147    Core.CoolTranslator1.TranslateComponentRecursive(Core.FormModuleList)
    128148  end;
     
    136156    FormConnection.SaveToDatabase(Core.Database);
    137157    Core.Connect;
    138   end;
     158    UpdateInterface;
     159  end;
     160end;
     161
     162procedure TFormMain.ADisconnectExecute(Sender: TObject);
     163begin
     164  Core.Database.Disconnect;
     165  UpdateInterface;
    139166end;
    140167
     
    144171end;
    145172
     173procedure TFormMain.AShowToolBarExecute(Sender: TObject);
     174begin
     175  ShowToolBar := not ShowToolBar;
     176  UpdateInterface;
     177end;
     178
    146179procedure TFormMain.FormShow(Sender: TObject);
    147180begin
     181  UpdateInterface;
    148182end;
    149183
     
    339373end;
    340374
     375procedure TFormMain.UpdateInterface;
     376begin
     377  ToolBar1.Visible := ShowToolBar;
     378  AShowToolBar.Checked := ShowToolBar;
     379  ADisconnect.Enabled := Core.Database.Connected;
     380end;
     381
     382procedure TFormMain.LoadFromRegistry(AContext: TRegistryContext);
     383begin
     384  with TRegistryEx.Create do
     385  try
     386    Context := AContext;
     387    ShowToolBar := ReadBoolWithDefault('ShowToolBar', False);
     388  finally
     389    Free;
     390  end;
     391end;
     392
     393procedure TFormMain.SaveToRegistry(AContext: TRegistryContext);
     394begin
     395  with TRegistryEx.Create do
     396  try
     397    Context := AContext;
     398    WriteBool('ShowToolBar', ShowToolBar);
     399  finally
     400    Free;
     401  end;
     402end;
     403
    341404end.
    342405
  • trunk/Languages/Dochazka.cs.po

    r12 r13  
    171171msgstr "Nastavení připojení"
    172172
     173#: tformmain.aconnectionsettings.hint
     174msgid "Connect to database"
     175msgstr "Připojit k databázi"
     176
     177#: tformmain.adisconnect.caption
     178msgid "Disconnect"
     179msgstr "Odpojit"
     180
     181#: tformmain.adisconnect.hint
     182msgid "Disconnet from database"
     183msgstr "Odpojit od databáze"
     184
    173185#: tformmain.aexit.caption
    174186msgctxt "tformmain.aexit.caption"
     
    197209msgstr "Ukázat celkové nastavení"
    198210
     211#: tformmain.ashowtoolbar.caption
     212msgid "Toolbar"
     213msgstr "Nástrojová liÅ¡ta"
     214
     215#: tformmain.ashowtoolbar.hint
     216msgid "Toggle toolbar visibility"
     217msgstr "Přepnout viditelnost nástrojové liÅ¡ty"
     218
    199219#: tformmain.caption
    200220msgctxt "tformmain.caption"
     
    205225msgid "Database"
    206226msgstr "Databáze"
     227
     228#: tformmain.menuitem6.caption
     229msgid "View"
     230msgstr "Zobrazení"
     231
     232#: tformmain.menuitem7.caption
     233msgid "Help"
     234msgstr "Nápověda"
    207235
    208236#: tformmain.menuitemsystem.caption
  • trunk/Languages/Dochazka.po

    r12 r13  
    160160msgstr ""
    161161
     162#: tformmain.aconnectionsettings.hint
     163msgid "Connect to database"
     164msgstr ""
     165
     166#: tformmain.adisconnect.caption
     167msgid "Disconnect"
     168msgstr ""
     169
     170#: tformmain.adisconnect.hint
     171msgid "Disconnet from database"
     172msgstr ""
     173
    162174#: tformmain.aexit.caption
    163175msgctxt "TFORMMAIN.AEXIT.CAPTION"
     
    186198msgstr ""
    187199
     200#: tformmain.ashowtoolbar.caption
     201msgid "Toolbar"
     202msgstr ""
     203
     204#: tformmain.ashowtoolbar.hint
     205msgid "Toggle toolbar visibility"
     206msgstr ""
     207
    188208#: tformmain.caption
    189209msgctxt "TFORMMAIN.CAPTION"
     
    193213#: tformmain.menuitem3.caption
    194214msgid "Database"
     215msgstr ""
     216
     217#: tformmain.menuitem6.caption
     218msgid "View"
     219msgstr ""
     220
     221#: tformmain.menuitem7.caption
     222msgid "Help"
    195223msgstr ""
    196224
  • trunk/UCore.lfm

    r12 r13  
    44  OldCreateOrder = False
    55  Height = 323
    6   HorizontalOffset = 500
    7   VerticalOffset = 317
     6  HorizontalOffset = 456
     7  VerticalOffset = 174
    88  Width = 324
    99  object ApplicationInfo1: TApplicationInfo
Note: See TracChangeset for help on using the changeset viewer.