home *** CD-ROM | disk | FTP | other *** search
/ ftp.sanbilgisayar.com / ftp.sanbilgisayar.com.tar / ftp.sanbilgisayar.com / SHOP / ShopImportP.exe / 0 / RCDATA / TMALFORM / TMALFORM.txt
Text File  |  2015-03-03  |  7KB  |  217 lines
  1. object MalForm: TMalForm
  2.   Left = 226
  3.   Top = 168
  4.   Width = 598
  5.   Height = 475
  6.   ActiveControl = MalGrid
  7.   BorderIcons = [biSystemMenu]
  8.   Caption = 'Mal Tan'#305'mlar'#305
  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 = False
  17.   Position = poScreenCenter
  18.   OnCreate = FormCreate
  19.   OnDestroy = FormDestroy
  20.   OnKeyDown = FormKeyDown
  21.   OnKeyPress = FormKeyPress
  22.   PixelsPerInch = 96
  23.   TextHeight = 13
  24.   object Panel2: TPanel
  25.     Left = 497
  26.     Top = 0
  27.     Width = 93
  28.     Height = 445
  29.     Align = alRight
  30.     BevelInner = bvLowered
  31.     Font.Charset = TURKISH_CHARSET
  32.     Font.Color = clWindowText
  33.     Font.Height = -11
  34.     Font.Name = 'MS Sans Serif'
  35.     Font.Style = []
  36.     ParentFont = False
  37.     TabOrder = 0
  38.     object Yeni: TBitBtn
  39.       Left = 9
  40.       Top = 68
  41.       Width = 75
  42.       Height = 25
  43.       Caption = '&Yeni'
  44.       TabOrder = 0
  45.       OnClick = YeniClick
  46.       Glyph.Data = {
  47.         76010000424D7601000000000000760000002800000020000000100000000100
  48.         0400000000000001000000000000000000001000000010000000000000000000
  49.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  50.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
  51.         333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
  52.         0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
  53.         07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
  54.         07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
  55.         0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
  56.         33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
  57.         B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
  58.         3BB33773333773333773B333333B3333333B7333333733333337}
  59.       NumGlyphs = 2
  60.     end
  61.     object Sil: TBitBtn
  62.       Left = 9
  63.       Top = 116
  64.       Width = 75
  65.       Height = 25
  66.       Caption = '&Sil'
  67.       TabOrder = 1
  68.       OnClick = SilClick
  69.       Glyph.Data = {
  70.         DE010000424DDE01000000000000760000002800000024000000120000000100
  71.         0400000000006801000000000000000000001000000010000000000000000000
  72.         80000080000000808000800000008000800080800000C0C0C000808080000000
  73.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  74.         333333333333333333333333000033338833333333333333333F333333333333
  75.         0000333911833333983333333388F333333F3333000033391118333911833333
  76.         38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
  77.         911118111118333338F3338F833338F3000033333911111111833333338F3338
  78.         3333F8330000333333911111183333333338F333333F83330000333333311111
  79.         8333333333338F3333383333000033333339111183333333333338F333833333
  80.         00003333339111118333333333333833338F3333000033333911181118333333
  81.         33338333338F333300003333911183911183333333383338F338F33300003333
  82.         9118333911183333338F33838F338F33000033333913333391113333338FF833
  83.         38F338F300003333333333333919333333388333338FFF830000333333333333
  84.         3333333333333333333888330000333333333333333333333333333333333333
  85.         0000}
  86.       NumGlyphs = 2
  87.     end
  88.     object Cikis: TBitBtn
  89.       Left = 9
  90.       Top = 165
  91.       Width = 75
  92.       Height = 25
  93.       Caption = '&'#199#305'k'#305#351
  94.       ModalResult = 2
  95.       TabOrder = 2
  96.       OnClick = CikisClick
  97.       Glyph.Data = {
  98.         DE010000424DDE01000000000000760000002800000024000000120000000100
  99.         0400000000006801000000000000000000001000000010000000000000000000
  100.         80000080000000808000800000008000800080800000C0C0C000808080000000
  101.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
  102.         F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
  103.         000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
  104.         338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
  105.         45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
  106.         3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
  107.         F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
  108.         000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
  109.         338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
  110.         4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
  111.         8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
  112.         333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
  113.         0000}
  114.       NumGlyphs = 2
  115.     end
  116.   end
  117.   object MalGrid: TDBGridEh
  118.     Left = 0
  119.     Top = 0
  120.     Width = 497
  121.     Height = 445
  122.     Align = alClient
  123.     AllowedOperations = [alopInsertEh, alopUpdateEh, alopAppendEh]
  124.     AutoFitColWidths = True
  125.     DataSource = ShopMal_DS
  126.     Flat = True
  127.     Font.Charset = TURKISH_CHARSET
  128.     Font.Color = clWindowText
  129.     Font.Height = -11
  130.     Font.Name = 'MS Sans Serif'
  131.     Font.Style = []
  132.     FooterColor = clWindow
  133.     FooterFont.Charset = TURKISH_CHARSET
  134.     FooterFont.Color = clWindowText
  135.     FooterFont.Height = -11
  136.     FooterFont.Name = 'MS Sans Serif'
  137.     FooterFont.Style = []
  138.     Options = [dgEditing, dgAlwaysShowEditor, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
  139.     OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghEnterAsTab]
  140.     ParentFont = False
  141.     TabOrder = 1
  142.     TitleFont.Charset = TURKISH_CHARSET
  143.     TitleFont.Color = clMaroon
  144.     TitleFont.Height = -11
  145.     TitleFont.Name = 'MS Sans Serif'
  146.     TitleFont.Style = []
  147.     UseMultiTitle = True
  148.     Columns = <
  149.       item
  150.         AutoFitColWidth = False
  151.         EditButtons = <>
  152.         FieldName = 'Kodu'
  153.         Footers = <>
  154.         Width = 177
  155.       end
  156.       item
  157.         EditButtons = <>
  158.         FieldName = 'Tanimi'
  159.         Footers = <>
  160.         Title.Caption = 'A'#231#305'klama'
  161.         Width = 243
  162.       end>
  163.   end
  164.   object ShopMal: TMSQuery
  165.     SQLInsert.Strings = (
  166.       'insert into ShopMal'
  167.       '  (Kodu, Tanimi)'
  168.       'values'
  169.       '  (:Kodu, :Tanimi)')
  170.     SQLDelete.Strings = (
  171.       'delete from ShopMal'
  172.       'where'
  173.       '  Kodu = :OLD_Kodu')
  174.     SQLUpdate.Strings = (
  175.       'update ShopMal'
  176.       'set'
  177.       '  Kodu = :Kodu,'
  178.       '  Tanimi = :Tanimi'
  179.       'where'
  180.       '  Kodu = :OLD_Kodu')
  181.     Connection = mDM.MSConnection
  182.     SQL.Strings = (
  183.       'Select * from ShopMal')
  184.     FetchRows = 1
  185.     BeforeInsert = ShopMalBeforeInsert
  186.     BeforeEdit = ShopMalBeforeEdit
  187.     BeforePost = ShopMalBeforePost
  188.     OnDeleteError = UpdateError
  189.     OnEditError = UpdateError
  190.     OnPostError = UpdateError
  191.     Left = 321
  192.     Top = 320
  193.     object ShopMalKodu: TStringField
  194.       DisplayLabel = ' Kodu '
  195.       FieldName = 'Kodu'
  196.       Required = True
  197.       Size = 15
  198.     end
  199.     object ShopMalTanimi: TStringField
  200.       FieldName = 'Tanimi'
  201.       Size = 30
  202.     end
  203.   end
  204.   object ShopMal_DS: TDataSource
  205.     DataSet = ShopMal
  206.     Left = 320
  207.     Top = 264
  208.   end
  209.   object KontrolQry: TMSQuery
  210.     Connection = mDM.MSConnection
  211.     SQL.Strings = (
  212.       'Select MalGrubu from MagKontMal')
  213.     Left = 392
  214.     Top = 320
  215.   end
  216. end
  217.