BUG 11/BUGCD1998_02.ISO/aplic/trade/_setup.1/main.exe/0/RCDATA/TSIFARNIKJEDINICA/TSIFARNIKJEDINICA.txt

Text File | 1998-01-05 | 6KB | 190 lines

object SifarnikJedinica: TSifarnikJedinica
  Tag = 1
  Left = 318
  Top = 195
  Width = 247
  Height = 147
  ActiveControl = gTable
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'Jedinice mjera'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Position = poScreenCenter
  OnClose = FormClose
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 135
    Top = 0
    Width = 104
    Height = 120
    Align = alRight
    BevelOuter = bvNone
    TabOrder = 1
    object Bevel1: TBevel
      Left = 4
      Top = 4
      Width = 93
      Height = 49
      Style = bsRaised
    end
    object Label1: TLabel
      Left = 12
      Top = 8
      Width = 48
      Height = 13
      Caption = 'Jedinica'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Bevel2: TBevel
      Left = 4
      Top = 56
      Width = 93
      Height = 61
      Shape = bsFrame
    end
    object ZapisiButton: TBitBtn
      Left = 8
      Top = 60
      Width = 85
      Height = 25
      Caption = 'Jedinica'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = ZapisiButtonClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
        333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
        0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
        0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
        33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
        B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
        3BB33773333773333773B333333B3333333B7333333733333337}
      NumGlyphs = 2
    end
    object IzlazButton: TBitBtn
      Left = 16
      Top = 88
      Width = 69
      Height = 25
      Cancel = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnClick = IzlazButtonClick
      Glyph.Data = {
        76020000424D7602000000000000760000002800000040000000100000000100
        0400000000000002000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333333333333333333333333C33333
        333333333333333333333333338F33333333333333333333333333333C0C3333
        3333333333333333333333333888F333333333333333333333333333C0F0C333
        33333333333333333333333388388F3333333333333FF3333333333C0FFF0C33
        33333333330033333333333888F388F33333333333883FF3333333CCC0FFF0C3
        333333333309003333333383388F388F33333333338F883FF3333CCCCC0FFF0C
        3333333333099900333338333388F388F3333FFFFF8F33883FF34CCCCCC0FFF0
        C33300000009999900338F3333388F388F33888888833333883FC4CCCCCC0FFF
        0C33099999999999990088F333F388F388F38FFFFFFF33333F883C4CC0CCC0FF
        F0C30000000999990033388F3833F88F38838888888F333F883333C4CCC0CC0F
        0C3333333309990033333388F338F38888333333338F3F883333333C4C00CCC0
        3333333333090033333333388F883338F3333333338F883333333333C4CCCCCC
        33333333330033333333333388F333F83333333333883333333333333C4CCCC3
        333333333333333333333333388F388333333333333333333333333333C4C333
        3333333333333333333333333388833333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
    end
    object eSifra: TDBKeyField
      Left = 12
      Top = 24
      Width = 77
      Height = 21
      AutoSize = False
      DataField = 'SIFRA'
      DataSource = sTable
      TabOrder = 0
      DisplayName = '�ifra jedinice mjere'
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 135
    Height = 120
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 4
    Caption = 'Panel2'
    TabOrder = 0
    object gTable: TMyDBGrid
      Left = 4
      Top = 4
      Width = 127
      Height = 112
      FindByName = True
      Align = alClient
      DataSource = sTable
      Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete]
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
  end
  object sTable: TDataSource
    DataSet = tTable
    Left = 48
    Top = 60
  end
  object tTable: TMyTable
    DatabaseName = 'Global'
    IndexFieldNames = 'SIFRA'
    TableName = 'JEDINICE.DB'
    AutoOpen = True
    AutoFlush = True
    FreeToModify = False
    FreeToDelete = True
    FreeToInsert = True
    Left = 20
    Top = 60
    object tTableCode: TAutoIncField
      FieldName = 'Code'
      Visible = False
    end
    object tTableSifra: TStringField
      DisplayLabel = 'Jedinica mjere'
      DisplayWidth = 15
      FieldName = 'Sifra'
      Size = 40
    end
  end
end