/Gedemin/Tax/gdc_dlgTaxName_unit.dfm

http://gedemin.googlecode.com/ · Unknown · 147 lines · 147 code · 0 blank · 0 comment · 0 complexity · 6efee98dd78405423951fafd3f3e1cf3 MD5 · raw file 

    

  1. inherited gdc_dlgTaxName: Tgdc_dlgTaxName

    2. 

  2.   Left = 338

    3. 

  3.   Top = 169

    4. 

  4.   HelpContext = 12

    5. 

  5.   BorderWidth = 5

    6. 

  6.   Caption = '????? ???????????'

    7. 

  7.   ClientHeight = 103

    8. 

  8.   ClientWidth = 377

    9. 

  9.   OnCreate = FormCreate

    10. 

  10.   PixelsPerInch = 96

    11. 

  11.   TextHeight = 13

    12. 

  12.   object Bevel1: TBevel [0]

    13. 

  13.     Left = 0

    14. 

  14.     Top = 74

    15. 

  15.     Width = 377

    16. 

  16.     Height = 2

    17. 

  17.     Align = alTop

    18. 

  18.   end

    19. 

  19.   inherited btnAccess: TButton

    20. 

  20.     Left = 0

    21. 

  21.     Top = 81

    22. 

  22.     Anchors = [akLeft, akBottom]

    23. 

  23.     TabOrder = 3

    24. 

  24.   end

    25. 

  25.   inherited btnNew: TButton

    26. 

  26.     Left = 72

    27. 

  27.     Top = 81

    28. 

  28.     Anchors = [akLeft, akBottom]

    29. 

  29.     TabOrder = 4

    30. 

  30.   end

    31. 

  31.   inherited btnOK: TButton

    32. 

  32.     Left = 237

    33. 

  33.     Top = 81

    34. 

  34.     Anchors = [akRight, akBottom]

    35. 

  35.     TabOrder = 1

    36. 

  36.   end

    37. 

  37.   inherited btnCancel: TButton

    38. 

  38.     Left = 309

    39. 

  39.     Top = 81

    40. 

  40.     Anchors = [akRight, akBottom]

    41. 

  41.     TabOrder = 2

    42. 

  42.   end

    43. 

  43.   inherited btnHelp: TButton

    44. 

  44.     Left = 144

    45. 

  45.     Top = 81

    46. 

  46.     Anchors = [akLeft, akBottom]

    47. 

  47.     TabOrder = 5

    48. 

  48.   end

    49. 

  49.   object Panel1: TPanel [6]

    50. 

  50.     Left = 0

    51. 

  51.     Top = 0

    52. 

  52.     Width = 377

    53. 

  53.     Height = 74

    54. 

  54.     Align = alTop

    55. 

  55.     Anchors = [akLeft, akTop, akRight, akBottom]

    56. 

  56.     BevelOuter = bvNone

    57. 

  57.     TabOrder = 0

    58. 

  58.     object lblTaxName: TLabel

    59. 

  59.       Left = 4

    60. 

  60.       Top = 5

    61. 

  61.       Width = 138

    62. 

  62.       Height = 13

    63. 

  63.       Caption = '???????????? ???.??????:'

    64. 

  64.     end

    65. 

  65.     object lAutoTransaction: TLabel

    66. 

  66.       Left = 4

    67. 

  67.       Top = 30

    68. 

  68.       Width = 131

    69. 

  69.       Height = 13

    70. 

  70.       Caption = '’??€????????€ ???????€:'

    71. 

  71.     end

    72. 

  72.     object Label3: TLabel

    73. 

  73.       Left = 4

    74. 

  74.       Top = 52

    75. 

  75.       Width = 67

    76. 

  76.       Height = 13

    77. 

  77.       Caption = '???? ??????:'

    78. 

  78.     end

    79. 

  79.     object dbeTaxName: TDBEdit

    80. 

  80.       Left = 156

    81. 

  81.       Top = 1

    82. 

  82.       Width = 220

    83. 

  83.       Height = 21

    84. 

  84.       DataField = 'name'

    85. 

  85.       DataSource = dsgdcBase

    86. 

  86.       TabOrder = 0

    87. 

  87.     end

    88. 

  88.     object iblAutoTransaction: TgsIBLookupComboBox

    89. 

  89.       Left = 156

    90. 

  90.       Top = 24

    91. 

  91.       Width = 220

    92. 

  92.       Height = 21

    93. 

  93.       HelpContext = 1

    94. 

  94.       Database = dmDatabase.ibdbGAdmin

    95. 

  95.       Transaction = IBTransaction

    96. 

  96.       DataSource = dsgdcBase

    97. 

  97.       DataField = 'TRANSACTIONKEY'

    98. 

  98.       ListTable = 'ac_transaction'

    99. 

  99.       ListField = 'name'

    100. 

  100.       KeyField = 'ID'

    101. 

  101.       gdClassName = 'TgdcAutoTransaction'

    102. 

  102.       ItemHeight = 13

    103. 

  103.       ParentShowHint = False

    104. 

  104.       ShowHint = True

    105. 

  105.       TabOrder = 1

    106. 

  106.     end

    107. 

  107.     object iblcAccountChart: TgsIBLookupComboBox

    108. 

  108.       Left = 156

    109. 

  109.       Top = 48

    110. 

  110.       Width = 220

    111. 

  111.       Height = 21

    112. 

  112.       HelpContext = 1

    113. 

  113.       Database = dmDatabase.ibdbGAdmin

    114. 

  114.       DataSource = dsgdcBase

    115. 

  115.       DataField = 'accountkey'

    116. 

  116.       ListTable = 'ac_account'

    117. 

  117.       ListField = 'alias'

    118. 

  118.       KeyField = 'ID'

    119. 

  119.       SortOrder = soAsc

    120. 

  120.       Condition = 

    121. 

  121.         'accounttype = '#39'C'#39' and EXISTS (SELECT * FROM ac_companyaccount c ' +

    122. 

  122.         'WHERE c.accountkey = ac_account.id)'

    123. 

  123.       gdClassName = 'TgdcAcctChart'

    124. 

  124.       ItemHeight = 13

    125. 

  125.       ParentShowHint = False

    126. 

  126.       ShowHint = True

    127. 

  127.       TabOrder = 2

    128. 

  128.     end

    129. 

  129.   end

    130. 

  130.   inherited alBase: TActionList

    131. 

  131.     Left = 62

    132. 

  132.     Top = 65535

    133. 

  133.   end

    134. 

  134.   inherited dsgdcBase: TDataSource

    135. 

  135.     Left = 24

    136. 

  136.     Top = 65535

    137. 

  137.   end

    138. 

  138.   inherited pm_dlgG: TPopupMenu

    139. 

  139.     Left = 96

    140. 

  140.     Top = 0

    141. 

  141.   end

    142. 

  142.   object IBTransaction: TIBTransaction

    143. 

  143.     Active = False

    144. 

  144.     AutoStopAction = saNone

    145. 

  145.     Left = 128

    146. 

  146.   end

    147. 

  147. end
    148.