home *** CD-ROM | disk | FTP | other *** search
/ ftp.sanbilgisayar.com / ftp.sanbilgisayar.com.tar / ftp.sanbilgisayar.com / SHOP / ShopImportP.exe / 0 / RCDATA / TBANKAFORM / TBANKAFORM.txt
Text File  |  2015-03-03  |  8KB  |  236 lines
  1. object BankaForm: TBankaForm
  2.   Left = 522
  3.   Top = 197
  4.   Width = 333
  5.   Height = 375
  6.   ActiveControl = BankGrid
  7.   BorderIcons = [biSystemMenu]
  8.   Caption = 'Bankalar'
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   KeyPreview = True
  16.   OldCreateOrder = True
  17.   Position = poScreenCenter
  18.   OnClose = FormClose
  19.   OnCreate = FormCreate
  20.   OnKeyDown = FormKeyDown
  21.   OnKeyPress = FormKeyPress
  22.   PixelsPerInch = 96
  23.   TextHeight = 13
  24.   object ButPanel: TPanel
  25.     Left = 238
  26.     Top = 0
  27.     Width = 87
  28.     Height = 345
  29.     Align = alRight
  30.     BevelInner = bvLowered
  31.     TabOrder = 0
  32.     object Yeni: TBitBtn
  33.       Left = 6
  34.       Top = 35
  35.       Width = 75
  36.       Height = 25
  37.       Caption = '&Yeni'
  38.       TabOrder = 0
  39.       OnClick = YeniClick
  40.       Glyph.Data = {
  41.         76010000424D7601000000000000760000002800000020000000100000000100
  42.         04000000000000010000130B0000130B00001000000000000000000000000000
  43.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  44.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
  45.         333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
  46.         0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
  47.         07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
  48.         07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
  49.         0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
  50.         33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
  51.         B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
  52.         3BB33773333773333773B333333B3333333B7333333733333337}
  53.       NumGlyphs = 2
  54.     end
  55.     object Kaydet: TBitBtn
  56.       Left = 6
  57.       Top = 76
  58.       Width = 75
  59.       Height = 25
  60.       Caption = '&Kaydet'
  61.       TabOrder = 1
  62.       OnClick = KaydetClick
  63.       Glyph.Data = {
  64.         DE010000424DDE01000000000000760000002800000024000000120000000100
  65.         0400000000006801000000000000000000001000000000000000000000000000
  66.         80000080000000808000800000008000800080800000C0C0C000808080000000
  67.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  68.         3333333333333333333333330000333333333333333333333333F33333333333
  69.         00003333344333333333333333388F3333333333000033334224333333333333
  70.         338338F3333333330000333422224333333333333833338F3333333300003342
  71.         222224333333333383333338F3333333000034222A22224333333338F338F333
  72.         8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
  73.         33333338F83338F338F33333000033A33333A222433333338333338F338F3333
  74.         0000333333333A222433333333333338F338F33300003333333333A222433333
  75.         333333338F338F33000033333333333A222433333333333338F338F300003333
  76.         33333333A222433333333333338F338F00003333333333333A22433333333333
  77.         3338F38F000033333333333333A223333333333333338F830000333333333333
  78.         333A333333333333333338330000333333333333333333333333333333333333
  79.         0000}
  80.       NumGlyphs = 2
  81.     end
  82.     object Sil: TBitBtn
  83.       Left = 6
  84.       Top = 117
  85.       Width = 75
  86.       Height = 25
  87.       Caption = '&Sil'
  88.       TabOrder = 2
  89.       OnClick = SilClick
  90.       Glyph.Data = {
  91.         DE010000424DDE01000000000000760000002800000024000000120000000100
  92.         0400000000006801000000000000000000001000000000000000000000000000
  93.         80000080000000808000800000008000800080800000C0C0C000808080000000
  94.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  95.         333333333333333333333333000033338833333333333333333F333333333333
  96.         0000333911833333983333333388F333333F3333000033391118333911833333
  97.         38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
  98.         911118111118333338F3338F833338F3000033333911111111833333338F3338
  99.         3333F8330000333333911111183333333338F333333F83330000333333311111
  100.         8333333333338F3333383333000033333339111183333333333338F333833333
  101.         00003333339111118333333333333833338F3333000033333911181118333333
  102.         33338333338F333300003333911183911183333333383338F338F33300003333
  103.         9118333911183333338F33838F338F33000033333913333391113333338FF833
  104.         38F338F300003333333333333919333333388333338FFF830000333333333333
  105.         3333333333333333333888330000333333333333333333333333333333333333
  106.         0000}
  107.       NumGlyphs = 2
  108.     end
  109.     object Cikis: TBitBtn
  110.       Left = 6
  111.       Top = 158
  112.       Width = 75
  113.       Height = 25
  114.       Cancel = True
  115.       Caption = '&'#199#305'k'#305#351
  116.       TabOrder = 3
  117.       OnClick = CikisClick
  118.       Glyph.Data = {
  119.         DE010000424DDE01000000000000760000002800000024000000120000000100
  120.         0400000000006801000000000000000000001000000000000000000000000000
  121.         80000080000000808000800000008000800080800000C0C0C000808080000000
  122.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
  123.         F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
  124.         000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
  125.         338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
  126.         45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
  127.         3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
  128.         F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
  129.         000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
  130.         338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
  131.         4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
  132.         8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
  133.         333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
  134.         0000}
  135.       NumGlyphs = 2
  136.     end
  137.   end
  138.   object BankGrid: TDBGridEh
  139.     Left = 0
  140.     Top = 0
  141.     Width = 238
  142.     Height = 345
  143.     Align = alClient
  144.     AllowedOperations = [alopUpdateEh, alopAppendEh]
  145.     AutoFitColWidths = True
  146.     DataSource = Banka_DS
  147.     Flat = True
  148.     Font.Charset = DEFAULT_CHARSET
  149.     Font.Color = clWindowText
  150.     Font.Height = -11
  151.     Font.Name = 'MS Sans Serif'
  152.     Font.Style = []
  153.     FooterColor = clWindow
  154.     FooterFont.Charset = DEFAULT_CHARSET
  155.     FooterFont.Color = clWindowText
  156.     FooterFont.Height = -11
  157.     FooterFont.Name = 'MS Sans Serif'
  158.     FooterFont.Style = []
  159.     Options = [dgEditing, dgAlwaysShowEditor, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
  160.     OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghEnterAsTab]
  161.     ParentFont = False
  162.     TabOrder = 1
  163.     TitleFont.Charset = DEFAULT_CHARSET
  164.     TitleFont.Color = clMaroon
  165.     TitleFont.Height = -11
  166.     TitleFont.Name = 'MS Sans Serif'
  167.     TitleFont.Style = []
  168.     UseMultiTitle = True
  169.     Columns = <
  170.       item
  171.         EditButtons = <>
  172.         FieldName = 'Kodu'
  173.         Footers = <>
  174.       end
  175.       item
  176.         EditButtons = <>
  177.         FieldName = 'Adi'
  178.         Footers = <>
  179.       end>
  180.   end
  181.   object Banka: TMSQuery
  182.     SQLInsert.Strings = (
  183.       'insert into Banka'
  184.       '  (Kodu, Adi)'
  185.       'values'
  186.       '  (:Kodu, :Adi)'
  187.       '')
  188.     SQLDelete.Strings = (
  189.       'delete from Banka'
  190.       'where'
  191.       '  Kodu = :OLD_Kodu'
  192.       '')
  193.     SQLUpdate.Strings = (
  194.       'update Banka'
  195.       'set'
  196.       '  Kodu = :Kodu,'
  197.       '  Adi = :Adi'
  198.       'where'
  199.       '  Kodu = :OLD_Kodu'
  200.       '')
  201.     Connection = mDM.MSConnection
  202.     SQL.Strings = (
  203.       'Select * From Banka'
  204.       'Order by Kodu')
  205.     BeforeInsert = BankaBeforeInsert
  206.     BeforeEdit = BankaBeforeEdit
  207.     BeforePost = BankaBeforePost
  208.     BeforeDelete = BankaBeforeDelete
  209.     OnDeleteError = UpdateError
  210.     OnEditError = UpdateError
  211.     OnPostError = UpdateError
  212.     Left = 79
  213.     Top = 224
  214.     object BankaKodu: TSmallintField
  215.       DisplayLabel = 'No'
  216.       DisplayWidth = 3
  217.       FieldName = 'Kodu'
  218.     end
  219.     object BankaAdi: TStringField
  220.       DisplayLabel = 'Ad'#305
  221.       FieldName = 'Adi'
  222.       Size = 30
  223.     end
  224.   end
  225.   object Banka_DS: TDataSource
  226.     DataSet = Banka
  227.     Left = 80
  228.     Top = 167
  229.   end
  230.   object TmpQry: TMSQuery
  231.     Connection = mDM.MSConnection
  232.     Left = 88
  233.     Top = 104
  234.   end
  235. end
  236.