BUG 14/BUGCD1998_05.ISO/aplic/ipos/_setup.1/Knjigovodstvo.exe/0/RCDATA/TFM5000200VIRMANIKOORD/TFM5000200VIRMANIKOORD.txt

Text File | 1998-04-04 | 15KB | 577 lines

object fm5000200VirmaniKoord: Tfm5000200VirmaniKoord
  Left = 357
  Top = 200
  Width = 676
  Height = 475
  HelpContext = 500020000
  VertScrollBar.Tracking = True
  Caption = 'fm5000200VirmaniKoord'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial CE'
  Font.Style = []
  FormStyle = fsMDIChild
  KeyPreview = True
  Position = poDefaultPosOnly
  ShowHint = True
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 14
  object paTipke: TPanel
    Left = 0
    Top = 19
    Width = 668
    Height = 34
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    object Label1: TLabel
      Left = 316
      Top = 12
      Width = 207
      Height = 14
      Caption = 'ALT + strelice za promjenu koordinate polja'
    end
    object bbIzmjena: TBitBtn
      Left = 5
      Top = 6
      Width = 75
      Height = 22
      Hint = 'Izmjena koordinata polja'
      Caption = '&Izmjena'
      TabOrder = 0
      OnClick = bbIzmjenaClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
        000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
        00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
        F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
        0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
        FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
        FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
        0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
        00333377737FFFFF773333303300000003333337337777777333}
      NumGlyphs = 2
    end
    object bbSpremi: TBitBtn
      Left = 80
      Top = 6
      Width = 75
      Height = 22
      Hint = 'Spremi koordinate polja'
      Caption = '&Spremi'
      TabOrder = 1
      OnClick = bbSpremiClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
        7700333333337777777733333333008088003333333377F73377333333330088
        88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
        000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
        FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
        99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
        99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
        99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
        93337FFFF7737777733300000033333333337777773333333333}
      NumGlyphs = 2
    end
    object bbOdustani: TBitBtn
      Left = 156
      Top = 6
      Width = 75
      Height = 22
      Hint = 'Odustani od izvr�enih izmjena'
      Caption = '&Odustani'
      TabOrder = 2
      OnClick = bbOdustaniClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
        3333333777333777FF3333993333339993333377FF3333377FF3399993333339
        993337777FF3333377F3393999333333993337F777FF333337FF993399933333
        399377F3777FF333377F993339993333399377F33777FF33377F993333999333
        399377F333777FF3377F993333399933399377F3333777FF377F993333339993
        399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
        99333773FF3333777733339993333339933333773FFFFFF77333333999999999
        3333333777333777333333333999993333333333377777333333}
      NumGlyphs = 2
    end
    object bbIzlaz: TBitBtn
      Left = 233
      Top = 6
      Width = 75
      Height = 22
      Hint = 'Prekid rada i izlaz iz prozora'
      Caption = 'I&zlaz'
      TabOrder = 3
      OnClick = bbIzlazClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
        0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
        0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
        0333337F777FFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
    end
    object cbSvaPolja: TCheckBox
      Left = 532
      Top = 8
      Width = 131
      Height = 17
      Hint = 'Promjena koordinata svim poljima istovremeno'
      Caption = 'Sva polja istovremeno'
      TabOrder = 4
    end
  end
  object Panel4: TPanel
    Left = 0
    Top = 0
    Width = 668
    Height = 19
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    object lbAktivno: TLabel
      Left = 10
      Top = 2
      Width = 44
      Height = 14
      Caption = 'lbAktivno'
    end
  end
  object sb: TStatusBar
    Left = 0
    Top = 429
    Width = 668
    Height = 19
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial CE'
    Font.Style = [fsBold]
    Panels = <
      item
        Text = 'Horiz'
        Width = 100
      end
      item
        Text = 'Vert'
        Width = 100
      end
      item
        Width = 50
      end>
    ParentFont = False
    SimplePanel = False
  end
  object paVirman: TScrollBox
    Left = 0
    Top = 53
    Width = 668
    Height = 376
    HorzScrollBar.Margin = 20
    HorzScrollBar.Range = 649
    HorzScrollBar.Tracking = True
    VertScrollBar.Margin = 20
    VertScrollBar.Range = 311
    VertScrollBar.Tracking = True
    Align = alClient
    AutoScroll = False
    ParentShowHint = False
    ShowHint = False
    TabOrder = 3
    object nateret3: TBitBtn
      Tag = 100
      Left = 24
      Top = 96
      Width = 233
      Height = 17
      Caption = 'Na teret 3'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      OnMouseMove = jedinicaMouseMove
    end
    object ukorist2: TButton
      Tag = 100
      Left = 29
      Top = 238
      Width = 224
      Height = 17
      Caption = 'U korist 2'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 8
      OnMouseMove = jedinicaMouseMove
    end
    object zironateret: TButton
      Tag = 100
      Left = 337
      Top = 78
      Width = 217
      Height = 17
      Caption = '�iro ra�un na teret'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 10
      OnMouseMove = jedinicaMouseMove
    end
    object ukorist3: TButton
      Tag = 100
      Left = 29
      Top = 255
      Width = 224
      Height = 17
      Caption = 'U korist 3'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 9
      OnMouseMove = jedinicaMouseMove
    end
    object iznos: TBitBtn
      Tag = 100
      Left = 422
      Top = 186
      Width = 187
      Height = 17
      Caption = 'Iznos'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 17
      OnMouseMove = jedinicaMouseMove
    end
    object nacinizvr: TButton
      Tag = 100
      Left = 583
      Top = 78
      Width = 21
      Height = 17
      Hint = 'Na�in izvr�enja'
      Caption = 'Izv'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 11
      OnMouseMove = jedinicaMouseMove
    end
    object pozbrojzad2: TButton
      Tag = 100
      Left = 410
      Top = 111
      Width = 193
      Height = 17
      Hint = 'Poziv na broj zadu�enja'
      Caption = 'Poziv na broj zadu�enja'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 13
      OnMouseMove = jedinicaMouseMove
    end
    object pozbrojzad1: TButton
      Tag = 100
      Left = 370
      Top = 111
      Width = 29
      Height = 17
      Hint = 'Poziv na broj zadu�enja model'
      Caption = 'Zad'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 12
      OnMouseMove = jedinicaMouseMove
    end
    object sif1: TBitBtn
      Tag = 100
      Left = 516
      Top = 152
      Width = 23
      Height = 17
      Hint = '�ifra 1'
      Caption = '�if1'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 14
      OnMouseMove = jedinicaMouseMove
    end
    object svrha1: TButton
      Tag = 100
      Left = 89
      Top = 140
      Width = 166
      Height = 17
      Caption = 'Svrha doznake 1'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      OnMouseMove = jedinicaMouseMove
    end
    object svrha3: TButton
      Tag = 100
      Left = 26
      Top = 177
      Width = 229
      Height = 17
      Caption = 'Svrha doznake 3'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 6
      OnMouseMove = jedinicaMouseMove
    end
    object svrha2: TButton
      Tag = 100
      Left = 26
      Top = 159
      Width = 229
      Height = 17
      Caption = 'Svrha doznake 2'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      OnMouseMove = jedinicaMouseMove
    end
    object ukorist1: TBitBtn
      Tag = 100
      Left = 88
      Top = 220
      Width = 165
      Height = 17
      Caption = 'U korist 1'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 7
      OnMouseMove = jedinicaMouseMove
    end
    object ziroukorist: TButton
      Tag = 100
      Left = 338
      Top = 237
      Width = 227
      Height = 17
      Caption = '�iro ra�un u korist'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 18
      OnMouseMove = jedinicaMouseMove
    end
    object pozbrojodo2: TButton
      Tag = 100
      Left = 419
      Top = 267
      Width = 188
      Height = 17
      Caption = 'Poziv na broj odobrenja'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 20
      OnMouseMove = jedinicaMouseMove
    end
    object pozbrojodo1: TButton
      Tag = 100
      Left = 379
      Top = 268
      Width = 27
      Height = 17
      Hint = 'Poziv na broj odobrenja model'
      Caption = 'Odo'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 19
      OnMouseMove = jedinicaMouseMove
    end
    object mjestodatum: TBitBtn
      Tag = 100
      Left = 395
      Top = 313
      Width = 180
      Height = 17
      Caption = 'Mjesto i datum'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 21
      OnMouseMove = jedinicaMouseMove
    end
    object sif2: TButton
      Tag = 100
      Left = 552
      Top = 152
      Width = 27
      Height = 17
      Hint = '�ifra 2'
      Caption = '�if2'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 15
      OnMouseMove = jedinicaMouseMove
    end
    object sif3: TButton
      Tag = 100
      Left = 586
      Top = 151
      Width = 22
      Height = 17
      Hint = '�ifra 3'
      Caption = '�if3'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 16
      OnMouseMove = jedinicaMouseMove
    end
    object nateret2: TButton
      Tag = 100
      Left = 24
      Top = 76
      Width = 233
      Height = 17
      Caption = 'Na teret 2'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnMouseMove = jedinicaMouseMove
    end
    object nateret1: TButton
      Tag = 100
      Left = 176
      Top = 56
      Width = 81
      Height = 17
      Caption = 'Na teret 1'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnMouseMove = jedinicaMouseMove
    end
    object jedinica: TButton
      Tag = 100
      Left = 39
      Top = 32
      Width = 166
      Height = 17
      Caption = 'Jedinica'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnMouseMove = jedinicaMouseMove
    end
  end
  object ta1Prekid: TTable
    Tag = 2
    DatabaseName = 'skupne'
    TableName = 'prekid.db'
    Left = 981
    Top = 100
    object ta1PrekidPrekidac: TStringField
      FieldName = 'Prekidac'
      Size = 40
    end
    object ta1PrekidSifra: TSmallintField
      FieldName = 'Sifra'
    end
    object ta1PrekidOpis_prekidaca: TStringField
      DisplayLabel = 'Opis prekida�a'
      FieldName = 'Opis_prekidaca'
      Size = 80
    end
    object ta1PrekidGrupa: TStringField
      FieldName = 'Grupa'
    end
    object ta1PrekidSkupina: TStringField
      FieldName = 'Skupina'
      Size = 10
    end
    object ta1PrekidcfVri_prekidVrijednost2: TStringField
      FieldName = 'cfVri_prekidVrijednost'
      Size = 30
      Calculated = True
    end
  end
  object ta1Obrasci: TTable
    Tag = 2
    DatabaseName = 'c:\knjigovodstvo\data\skupne'
    TableName = 'obrasci.db'
    Left = 981
    Top = 174
    object ta1ObrasciSifra: TStringField
      FieldName = 'Sifra'
      Size = 30
    end
    object ta1ObrasciPolje: TStringField
      FieldName = 'Polje'
      Size = 30
    end
    object ta1ObrasciTop: TIntegerField
      FieldName = 'Top'
    end
    object ta1ObrasciLeft: TIntegerField
      FieldName = 'Left'
    end
  end
  object ta1LockSkupne: TTable
    DatabaseName = 'skupne'
    TableName = '_lockSkupne'
    Left = 983
    Top = 249
  end
  object ta2Obrasci: TTable
    Tag = 2
    DatabaseName = 'c:\knjigovodstvo\data\skupne'
    TableName = 'obrasci.db'
    Left = 909
    Top = 174
    object StringField1: TStringField
      FieldName = 'Sifra'
      Size = 30
    end
    object StringField2: TStringField
      FieldName = 'Polje'
      Size = 30
    end
    object IntegerField1: TIntegerField
      FieldName = 'Top'
    end
    object IntegerField2: TIntegerField
      FieldName = 'Left'
    end
  end
  object ta3Obrasci: TTable
    Tag = 2
    DatabaseName = 'c:\knjigovodstvo\data\skupne'
    TableName = 'obrasci.db'
    Left = 845
    Top = 178
    object StringField3: TStringField
      FieldName = 'Sifra'
      Size = 30
    end
    object StringField4: TStringField
      FieldName = 'Polje'
      Size = 30
    end
    object IntegerField3: TIntegerField
      FieldName = 'Top'
    end
    object IntegerField4: TIntegerField
      FieldName = 'Left'
    end
  end
end