- Timestamp:
- Nov 15, 2012, 8:32:45 AM (12 years ago)
- Location:
- trunk
- Files:
-
- 8 added
- 6 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Forms/UFormMain.lfm
r12 r13 32 32 Visible = False 33 33 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 34 44 Left = 1 35 45 Top = 2 36 Action = ASetting 46 Action = AConnectionSettings 47 end 48 object ToolButton4: TToolButton 49 Left = 24 50 Top = 2 51 Action = ADisconnect 37 52 end 38 53 end … … 48 63 end 49 64 object MainMenu1: TMainMenu 65 Images = ImageList1 50 66 left = 472 51 67 top = 61 … … 56 72 object MenuItem4: TMenuItem 57 73 Action = AConnectionSettings 74 end 75 object MenuItem9: TMenuItem 76 Action = ADisconnect 58 77 end 59 78 end … … 68 87 end 69 88 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 70 98 end 71 99 object ActionList1: TActionList … … 76 104 Caption = 'Exit' 77 105 Hint = 'Close application' 106 ImageIndex = 3 78 107 OnExecute = AExitExecute 79 108 end … … 81 110 Caption = 'Setting' 82 111 Hint = 'Show global setting' 112 ImageIndex = 13 83 113 OnExecute = ASettingExecute 84 114 ShortCut = 120 … … 86 116 object AConnectionSettings: TAction 87 117 Caption = 'Connection settings' 118 Hint = 'Connect to database' 119 ImageIndex = 21 88 120 OnExecute = AConnectionSettingsExecute 89 121 ShortCut = 121 … … 92 124 Caption = 'Modules' 93 125 Hint = 'Show module management' 126 ImageIndex = 17 94 127 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 95 139 end 96 140 end … … 99 143 top = 168 100 144 Bitmap = { 101 4C691 40000001000000010000000000000000000000000000000000000000000145 4C691C0000001000000010000000000000000000000000000000000000000000 102 146 0000000000000000000000000000000000000000000000000000000000000000 103 147 000000000000000000000000000000000000000000008C8CBBFF000088FF8C8C … … 739 783 EAFF0164DDFF044DBDFC0345B87AFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 740 784 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 742 1042 } 743 1043 end -
trunk/Forms/UFormMain.lrt
r12 r13 2 2 TFORMMAIN.MENUITEMSYSTEM.CAPTION=System 3 3 TFORMMAIN.MENUITEM3.CAPTION=Database 4 TFORMMAIN.MENUITEM6.CAPTION=View 5 TFORMMAIN.MENUITEM7.CAPTION=Help 4 6 TFORMMAIN.AEXIT.CAPTION=Exit 5 7 TFORMMAIN.AEXIT.HINT=Close application … … 7 9 TFORMMAIN.ASETTING.HINT=Show global setting 8 10 TFORMMAIN.ACONNECTIONSETTINGS.CAPTION=Connection settings 11 TFORMMAIN.ACONNECTIONSETTINGS.HINT=Connect to database 9 12 TFORMMAIN.AMODULELIST.CAPTION=Modules 10 13 TFORMMAIN.AMODULELIST.HINT=Show module management 14 TFORMMAIN.ASHOWTOOLBAR.CAPTION=Toolbar 15 TFORMMAIN.ASHOWTOOLBAR.HINT=Toggle toolbar visibility 16 TFORMMAIN.ADISCONNECT.CAPTION=Disconnect 17 TFORMMAIN.ADISCONNECT.HINT=Disconnet from database -
trunk/Forms/UFormMain.pas
r12 r13 7 7 uses 8 8 Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ComCtrls, 9 Menus, ActnList, UFormList, SpecializedList, UFormEdit, UFormModuleList; 9 Menus, ActnList, UFormList, SpecializedList, UFormEdit, UFormModuleList, 10 URegistry; 10 11 11 12 type … … 15 16 TFormMain = class(TForm) 16 17 AConnectionSettings: TAction; 18 ADisconnect: TAction; 19 AShowToolBar: TAction; 17 20 AModuleList: TAction; 18 21 ASetting: TAction; … … 25 28 MenuItem4: TMenuItem; 26 29 MenuItem5: TMenuItem; 30 MenuItem6: TMenuItem; 31 MenuItem7: TMenuItem; 32 MenuItem8: TMenuItem; 33 MenuItem9: TMenuItem; 27 34 MenuItemSystem: TMenuItem; 28 35 MenuItem2: TMenuItem; … … 31 38 ToolBar1: TToolBar; 32 39 ToolButton1: TToolButton; 40 ToolButton2: TToolButton; 41 ToolButton3: TToolButton; 42 ToolButton4: TToolButton; 33 43 procedure AConnectionSettingsExecute(Sender: TObject); 44 procedure ADisconnectExecute(Sender: TObject); 34 45 procedure AExitExecute(Sender: TObject); 35 46 procedure AModuleListExecute(Sender: TObject); 36 47 procedure ASettingExecute(Sender: TObject); 48 procedure AShowToolBarExecute(Sender: TObject); 37 49 procedure FormClose(Sender: TObject; var CloseAction: TCloseAction); 38 50 procedure FormCreate(Sender: TObject); … … 41 53 procedure TabSheetShow(Sender: TObject); 42 54 private 55 ShowToolBar: Boolean; 43 56 procedure FormModuleListDestroy(Sender: TObject); 44 57 procedure InitModules; … … 47 60 DataViewLists: TListObject; // TListObject<TDataViewList> 48 61 DataViewForms: TListObject; // TListObject<TDataViewForm> 62 procedure UpdateInterface; 63 procedure LoadFromRegistry(AContext: TRegistryContext); 64 procedure SaveToRegistry(AContext: TRegistryContext); 49 65 end; 50 66 … … 100 116 DataViewLists := TListObject.Create; 101 117 DataViewForms := TListObject.Create; 118 LoadFromRegistry(Core.RegistryContext); 102 119 Core.Init; 103 120 Core.PersistentForm.Load(Self); … … 108 125 procedure TFormMain.FormDestroy(Sender: TObject); 109 126 begin 127 SaveToRegistry(Core.RegistryContext); 110 128 FreeAndNil(DataViewForms); 111 129 FreeAndNil(DataViewLists); … … 125 143 Core.FormModuleList.Manager := Core.ModuleManager; 126 144 Core.FormModuleList.AddHandlerOnBeforeDestruction(FormModuleListDestroy); 145 Core.FormModuleList.Options := [mloAllowEnable, mloShowEnable, 146 mloAllowInstall, mloShowDescription, mloShowDependencies, mloShowInfoBar]; 127 147 Core.CoolTranslator1.TranslateComponentRecursive(Core.FormModuleList) 128 148 end; … … 136 156 FormConnection.SaveToDatabase(Core.Database); 137 157 Core.Connect; 138 end; 158 UpdateInterface; 159 end; 160 end; 161 162 procedure TFormMain.ADisconnectExecute(Sender: TObject); 163 begin 164 Core.Database.Disconnect; 165 UpdateInterface; 139 166 end; 140 167 … … 144 171 end; 145 172 173 procedure TFormMain.AShowToolBarExecute(Sender: TObject); 174 begin 175 ShowToolBar := not ShowToolBar; 176 UpdateInterface; 177 end; 178 146 179 procedure TFormMain.FormShow(Sender: TObject); 147 180 begin 181 UpdateInterface; 148 182 end; 149 183 … … 339 373 end; 340 374 375 procedure TFormMain.UpdateInterface; 376 begin 377 ToolBar1.Visible := ShowToolBar; 378 AShowToolBar.Checked := ShowToolBar; 379 ADisconnect.Enabled := Core.Database.Connected; 380 end; 381 382 procedure TFormMain.LoadFromRegistry(AContext: TRegistryContext); 383 begin 384 with TRegistryEx.Create do 385 try 386 Context := AContext; 387 ShowToolBar := ReadBoolWithDefault('ShowToolBar', False); 388 finally 389 Free; 390 end; 391 end; 392 393 procedure TFormMain.SaveToRegistry(AContext: TRegistryContext); 394 begin 395 with TRegistryEx.Create do 396 try 397 Context := AContext; 398 WriteBool('ShowToolBar', ShowToolBar); 399 finally 400 Free; 401 end; 402 end; 403 341 404 end. 342 405 -
trunk/Languages/Dochazka.cs.po
r12 r13 171 171 msgstr "Nastavenà pÅipojenÃ" 172 172 173 #: tformmain.aconnectionsettings.hint 174 msgid "Connect to database" 175 msgstr "PÅipojit k databázi" 176 177 #: tformmain.adisconnect.caption 178 msgid "Disconnect" 179 msgstr "Odpojit" 180 181 #: tformmain.adisconnect.hint 182 msgid "Disconnet from database" 183 msgstr "Odpojit od databáze" 184 173 185 #: tformmain.aexit.caption 174 186 msgctxt "tformmain.aexit.caption" … … 197 209 msgstr "Ukázat celkové nastavenÃ" 198 210 211 #: tformmain.ashowtoolbar.caption 212 msgid "Toolbar" 213 msgstr "Nástrojová liÅ¡ta" 214 215 #: tformmain.ashowtoolbar.hint 216 msgid "Toggle toolbar visibility" 217 msgstr "PÅepnout viditelnost nástrojové liÅ¡ty" 218 199 219 #: tformmain.caption 200 220 msgctxt "tformmain.caption" … … 205 225 msgid "Database" 206 226 msgstr "Databáze" 227 228 #: tformmain.menuitem6.caption 229 msgid "View" 230 msgstr "ZobrazenÃ" 231 232 #: tformmain.menuitem7.caption 233 msgid "Help" 234 msgstr "NápovÄda" 207 235 208 236 #: tformmain.menuitemsystem.caption -
trunk/Languages/Dochazka.po
r12 r13 160 160 msgstr "" 161 161 162 #: tformmain.aconnectionsettings.hint 163 msgid "Connect to database" 164 msgstr "" 165 166 #: tformmain.adisconnect.caption 167 msgid "Disconnect" 168 msgstr "" 169 170 #: tformmain.adisconnect.hint 171 msgid "Disconnet from database" 172 msgstr "" 173 162 174 #: tformmain.aexit.caption 163 175 msgctxt "TFORMMAIN.AEXIT.CAPTION" … … 186 198 msgstr "" 187 199 200 #: tformmain.ashowtoolbar.caption 201 msgid "Toolbar" 202 msgstr "" 203 204 #: tformmain.ashowtoolbar.hint 205 msgid "Toggle toolbar visibility" 206 msgstr "" 207 188 208 #: tformmain.caption 189 209 msgctxt "TFORMMAIN.CAPTION" … … 193 213 #: tformmain.menuitem3.caption 194 214 msgid "Database" 215 msgstr "" 216 217 #: tformmain.menuitem6.caption 218 msgid "View" 219 msgstr "" 220 221 #: tformmain.menuitem7.caption 222 msgid "Help" 195 223 msgstr "" 196 224 -
trunk/UCore.lfm
r12 r13 4 4 OldCreateOrder = False 5 5 Height = 323 6 HorizontalOffset = 5007 VerticalOffset = 3176 HorizontalOffset = 456 7 VerticalOffset = 174 8 8 Width = 324 9 9 object ApplicationInfo1: TApplicationInfo
Note:
See TracChangeset
for help on using the changeset viewer.