home *** CD-ROM | disk | FTP | other *** search
/ ftp.sanbilgisayar.com / ftp.sanbilgisayar.com.tar / ftp.sanbilgisayar.com / SHOP / ShopImportP.exe / 0 / RCDATA / TKISAKFORM / TKISAKFORM.txt
Text File  |  2015-03-03  |  9KB  |  254 lines

  1. object KisakForm: TKisakForm
  2.   Left = 386
  3.   Top = 104
  4.   HorzScrollBar.Tracking = True
  5.   ActiveControl = KisGrid
  6.   BorderIcons = [biSystemMenu]
  7.   BorderStyle = bsSingle
  8.   Caption = 'K'#305'saltmalar'
  9.   ClientHeight = 446
  10.   ClientWidth = 436
  11.   Color = clBtnFace
  12.   Font.Charset = TURKISH_CHARSET
  13.   Font.Color = clWindowText
  14.   Font.Height = -11
  15.   Font.Name = 'MS Sans Serif'
  16.   Font.Style = []
  17.   KeyPreview = True
  18.   OldCreateOrder = True
  19.   Position = poScreenCenter
  20.   Scaled = False
  21.   OnClose = FormClose
  22.   OnCreate = FormCreate
  23.   OnKeyDown = FormKeyDown
  24.   OnKeyPress = FormKeyPress
  25.   PixelsPerInch = 96
  26.   TextHeight = 13
  27.   object Panel2: TPanel
  28.     Left = 0
  29.     Top = 400
  30.     Width = 436
  31.     Height = 46
  32.     Align = alBottom
  33.     BevelInner = bvLowered
  34.     TabOrder = 1
  35.     object Yeni: TBitBtn
  36.       Left = 9
  37.       Top = 11
  38.       Width = 75
  39.       Height = 25
  40.       Caption = '&Yeni'
  41.       TabOrder = 0
  42.       OnClick = YeniClick
  43.       Glyph.Data = {
  44.         76010000424D7601000000000000760000002800000020000000100000000100
  45.         0400000000000001000000000000000000001000000010000000000000000000
  46.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  47.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
  48.         333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
  49.         0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
  50.         07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
  51.         07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
  52.         0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
  53.         33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
  54.         B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
  55.         3BB33773333773333773B333333B3333333B7333333733333337}
  56.       NumGlyphs = 2
  57.     end
  58.     object Kaydet: TBitBtn
  59.       Left = 95
  60.       Top = 11
  61.       Width = 75
  62.       Height = 25
  63.       Caption = '&Kaydet'
  64.       TabOrder = 1
  65.       OnClick = KaydetClick
  66.       Glyph.Data = {
  67.         DE010000424DDE01000000000000760000002800000024000000120000000100
  68.         0400000000006801000000000000000000001000000010000000000000000000
  69.         80000080000000808000800000008000800080800000C0C0C000808080000000
  70.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  71.         3333333333333333333333330000333333333333333333333333F33333333333
  72.         00003333344333333333333333388F3333333333000033334224333333333333
  73.         338338F3333333330000333422224333333333333833338F3333333300003342
  74.         222224333333333383333338F3333333000034222A22224333333338F338F333
  75.         8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
  76.         33333338F83338F338F33333000033A33333A222433333338333338F338F3333
  77.         0000333333333A222433333333333338F338F33300003333333333A222433333
  78.         333333338F338F33000033333333333A222433333333333338F338F300003333
  79.         33333333A222433333333333338F338F00003333333333333A22433333333333
  80.         3338F38F000033333333333333A223333333333333338F830000333333333333
  81.         333A333333333333333338330000333333333333333333333333333333333333
  82.         0000}
  83.       NumGlyphs = 2
  84.     end
  85.     object Sil: TBitBtn
  86.       Left = 181
  87.       Top = 11
  88.       Width = 75
  89.       Height = 25
  90.       Caption = '&Sil'
  91.       TabOrder = 2
  92.       OnClick = SilClick
  93.       Glyph.Data = {
  94.         DE010000424DDE01000000000000760000002800000024000000120000000100
  95.         0400000000006801000000000000000000001000000010000000000000000000
  96.         80000080000000808000800000008000800080800000C0C0C000808080000000
  97.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  98.         333333333333333333333333000033338833333333333333333F333333333333
  99.         0000333911833333983333333388F333333F3333000033391118333911833333
  100.         38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
  101.         911118111118333338F3338F833338F3000033333911111111833333338F3338
  102.         3333F8330000333333911111183333333338F333333F83330000333333311111
  103.         8333333333338F3333383333000033333339111183333333333338F333833333
  104.         00003333339111118333333333333833338F3333000033333911181118333333
  105.         33338333338F333300003333911183911183333333383338F338F33300003333
  106.         9118333911183333338F33838F338F33000033333913333391113333338FF833
  107.         38F338F300003333333333333919333333388333338FFF830000333333333333
  108.         3333333333333333333888330000333333333333333333333333333333333333
  109.         0000}
  110.       NumGlyphs = 2
  111.     end
  112.     object Yazici: TBitBtn
  113.       Left = 266
  114.       Top = 11
  115.       Width = 75
  116.       Height = 25
  117.       Caption = 'Y&az'#305'c'#305
  118.       TabOrder = 3
  119.       OnClick = YaziciClick
  120.       Glyph.Data = {
  121.         76010000424D7601000000000000760000002800000020000000100000000100
  122.         0400000000000001000000000000000000001000000010000000000000000000
  123.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  124.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
  125.         0003377777777777777308888888888888807F33333333333337088888888888
  126.         88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
  127.         8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
  128.         8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
  129.         03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
  130.         03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
  131.         33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
  132.         33333337FFFF7733333333300000033333333337777773333333}
  133.       NumGlyphs = 2
  134.     end
  135.     object Cikis: TBitBtn
  136.       Left = 352
  137.       Top = 11
  138.       Width = 75
  139.       Height = 25
  140.       Cancel = True
  141.       Caption = '&'#199#305'k'#305#351
  142.       TabOrder = 4
  143.       OnClick = CikisClick
  144.       Glyph.Data = {
  145.         DE010000424DDE01000000000000760000002800000024000000120000000100
  146.         0400000000006801000000000000000000001000000010000000000000000000
  147.         80000080000000808000800000008000800080800000C0C0C000808080000000
  148.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
  149.         F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
  150.         000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
  151.         338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
  152.         45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
  153.         3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
  154.         F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
  155.         000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
  156.         338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
  157.         4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
  158.         8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
  159.         333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
  160.         0000}
  161.       NumGlyphs = 2
  162.     end
  163.   end
  164.   object KisGrid: TDBGridEh
  165.     Left = 0
  166.     Top = 0
  167.     Width = 436
  168.     Height = 400
  169.     Align = alClient
  170.     AutoFitColWidths = True
  171.     DataSource = Kisak_DS
  172.     Flat = True
  173.     Font.Charset = TURKISH_CHARSET
  174.     Font.Color = clWindowText
  175.     Font.Height = -11
  176.     Font.Name = 'MS Sans Serif'
  177.     Font.Style = []
  178.     FooterColor = clWindow
  179.     FooterFont.Charset = TURKISH_CHARSET
  180.     FooterFont.Color = clWindowText
  181.     FooterFont.Height = -11
  182.     FooterFont.Name = 'MS Sans Serif'
  183.     FooterFont.Style = []
  184.     Options = [dgEditing, dgAlwaysShowEditor, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
  185.     OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghEnterAsTab]
  186.     ParentFont = False
  187.     TabOrder = 0
  188.     TitleFont.Charset = TURKISH_CHARSET
  189.     TitleFont.Color = clMaroon
  190.     TitleFont.Height = -11
  191.     TitleFont.Name = 'MS Sans Serif'
  192.     TitleFont.Style = []
  193.     UseMultiTitle = True
  194.     Columns = <
  195.       item
  196.         AutoFitColWidth = False
  197.         EditButtons = <>
  198.         FieldName = 'KOD'
  199.         Footers = <>
  200.       end
  201.       item
  202.         EditButtons = <>
  203.         FieldName = 'ACIKLAMA'
  204.         Footers = <>
  205.       end>
  206.   end
  207.   object Kisak_DS: TDataSource
  208.     DataSet = Kisak
  209.     Left = 163
  210.     Top = 96
  211.   end
  212.   object Kisak: TMSQuery
  213.     SQLInsert.Strings = (
  214.       'insert into Kisak'
  215.       '  (KOD, ACIKLAMA)'
  216.       'values'
  217.       '  (:KOD, :ACIKLAMA)')
  218.     SQLDelete.Strings = (
  219.       'delete from Kisak'
  220.       'where'
  221.       '  KOD = :OLD_KOD'
  222.       '')
  223.     SQLUpdate.Strings = (
  224.       'update Kisak'
  225.       'set'
  226.       '  KOD = :KOD,'
  227.       '  ACIKLAMA = :ACIKLAMA'
  228.       'where'
  229.       '  KOD = :OLD_KOD')
  230.     Connection = mDM.MSConnection
  231.     SQL.Strings = (
  232.       'Select * From Kisak')
  233.     BeforePost = KisakBeforePost
  234.     OnDeleteError = UpdateError
  235.     OnEditError = UpdateError
  236.     OnPostError = UpdateError
  237.     Left = 164
  238.     Top = 147
  239.     object KisakKOD: TStringField
  240.       DisplayLabel = 'K'#305'sa Kod'
  241.       DisplayWidth = 5
  242.       FieldName = 'KOD'
  243.       Required = True
  244.       Size = 3
  245.     end
  246.     object KisakACIKLAMA: TStringField
  247.       DisplayLabel = 'A'#231#305'klamas'#305
  248.       DisplayWidth = 50
  249.       FieldName = 'ACIKLAMA'
  250.       Size = 30
  251.     end
  252.   end
  253. end
  254.