object RealizacijaProizvodnje: TRealizacijaProizvodnje Tag = 1 Left = 121 Top = 95 ActiveControl = gTable BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'Realizacija proizvodnje' ClientHeight = 453 ClientWidth = 632 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True Position = poScreenCenter OnCloseQuery = FormCloseQuery OnHide = FormHide OnKeyDown = FormKeyDown OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Book: TNotebook Tag = 1 Left = 0 Top = 0 Width = 632 Height = 453 Align = alClient TabOrder = 0 object TPage Tag = 1 Left = 0 Top = 0 Caption = 'Zaglavlje' object Bevel12: TBevel Left = 314 Top = 400 Width = 5 Height = 49 Shape = bsLeftLine end object Bevel2: TBevel Left = 96 Top = 400 Width = 5 Height = 49 Shape = bsLeftLine end object Bevel15: TBevel Left = 192 Top = 400 Width = 5 Height = 49 Shape = bsLeftLine end object Bevel6: TBevel Left = 4 Top = 400 Width = 625 Height = 49 Shape = bsFrame end object Bojano: TShape Left = 7 Top = 403 Width = 88 Height = 44 Brush.Color = clRed Pen.Style = psClear end object Label44: TLabel Left = 10 Top = 405 Width = 82 Height = 13 Caption = 'Realizacija br.' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label1: TLabel Left = 9 Top = 404 Width = 82 Height = 13 Caption = 'Realizacija br.' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label2: TLabel Left = 106 Top = 404 Width = 80 Height = 13 Caption = 'Datum zavr�etka' FocusControl = EditDatumKnj Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label5: TLabel Left = 200 Top = 404 Width = 77 Height = 13 Caption = 'Radni nalog broj' end object Label3: TLabel Left = 272 Top = 36 Width = 109 Height = 13 Caption = 'Sadr�aj dokumenta' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Bevel1: TBevel Left = 252 Top = 32 Width = 349 Height = 337 Style = bsRaised end object Knjizeno: TDBEdit Left = 72 Top = 424 Width = 13 Height = 13 TabStop = False AutoSize = False DataField = 'Knjizeno' DataSource = DataReal.sCodes Enabled = False TabOrder = 4 OnChange = KnjizenoChange end object gTable: TMyDBGrid Tag = 1 Left = 6 Top = 2 Width = 211 Height = 395 FindByName = False DataSource = DataReal.sGlava 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 = [] OnSpace = KnjiziUFUClick OnCtrlSpace = KnjiziSveUfeClick end object eSifra: TDBKeyField Left = 12 Top = 420 Width = 77 Height = 20 AutoSize = False Ctl3D = True DataField = 'BROJUFE' DataSource = DataReal.sGlava Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentCtl3D = False ParentFont = False TabOrder = 1 DisplayName = 'Broj Ulazne fakture' OnNew = eSifraNew OnRename = eSifraRename end object EditDatumKnj: TDBVar Left = 108 Top = 420 Width = 73 Height = 20 AutoSize = False DataField = 'DatumDVO' DataSource = DataReal.sGlava TabOrder = 2 end object eRacun: TDBLookup Left = 200 Top = 420 Width = 109 Height = 21 DataField = 'UFABR' DataSource = DataReal.sGlava LookupSource = DataReal.sGlava2 LookupDisplay = 'BROJIFE' LookupField = 'CODE' TabOrder = 3 OnEnter = eRacunEnter Required = True DisplayName = 'Ra�un dobavlja�a (UFA)' OnExitChanged = eRacunExitChanged end object StavkeButton: TBitBtn Left = 320 Top = 409 Width = 85 Height = 33 Caption = 'Stavke' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = StavkeButtonClick Glyph.Data = { 76020000424D7602000000000000760000002800000040000000100000000100 0400000000000002000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333333333393333333333333333333333333333333FF333333333333333333 333333333339093333333333333333333333333333F888F33333333333333333 333333333990F0933333333333333333333333333888388F3333333333333333 33333333990F0F0933333333333FF333333333338F838388F333333333003333 3333333900FFF0F09333333333883FF3333333F8883338388F333333330A0033 33333990FFFFFF0F09333333338F883FF33338883F33338388F33333330AAA00 3333990F0FFFFFF0F0933FFFFF8F33883FF38F8383F33338388F0000000AAAAA 003390FFF0FFFFFF0F09888888833333883F8833383F333383880AAAAAAAAAAA AA030FFFFF0FFFFFF0F08FFFFFFF33333F8883F33383F33338380000000AAAAA 003330FFFFF0FFFFFF038888888F333F8833383F33383F333F833333330AAA00 3333330FFFFF0FFF00333333338F3F8833333383F33383FF88333333330A0033 33333330FFFFF00033333333338F8833333333383F3338883333333333003333 333333330FFF033333333333338833333333333383FF83333333333333333333 3333333330003333333333333333333333333333388833333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 end object PrintBtn: TBitBtn Left = 404 Top = 409 Width = 41 Height = 33 TabOrder = 6 OnClick = PrintBtnClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888 8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F 8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F 8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0 33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033 33333337FFFF7733333333300000033333333337777773333333} NumGlyphs = 2 end object CalcBtn: TBitBtn Left = 444 Top = 409 Width = 41 Height = 33 TabOrder = 7 OnClick = KnjiziUFUClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000 73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998 0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008 0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008 0333337F777777737F333308888888880333337F333333337F33330888888888 03333373FFFFFFFF733333700000000073333337777777773333} NumGlyphs = 2 end object ZapisiButton: TBitBtn Left = 484 Top = 409 Width = 97 Height = 33 Caption = 'Realizacija' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 8 OnClick = ZapisiButtonClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333 3BB33773333773333773B333333B3333333B7333333733333337} NumGlyphs = 2 end object CalcBtnX: TBitBtn Left = 580 Top = 409 Width = 41 Height = 33 TabOrder = 9 OnClick = KnjiziSveUfeClick Glyph.Data = { F6010000424DF601000000000000760000002800000030000000100000000100 0400000000008001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00380000000008 333330333333338888888883F333338F333330777777777033333033333338F3 F3F3FFF8F3333383F33330707079997033330903333338F838388838F33338F8 F33330777777777033330903333338F3F3F3F3F8F33338383F33307070707070 33309990333338F838383838F3338F338F3330777777777033309990333338F3 F3F3F3F8F333833383F330707070707033099999033338F838383838F338F333 38F330777777777033099999033338F3F3F3F3F8F3383333383F307070707070 30999999903338F838383838F38FFFF3FF8F30777777777030000900003338F3 FFFFFFF8F38888F8888330700000007033330903333338F8888888F8F33338F8 F333307000E0E07033330903333338F8FFFFF8F8F33338F8F333307000000070 33330903333338F888888838F33338F8F33330777777777033330903333338F3 33333338F33338F8F333307777777770333309033333383FFFFFFFF8333338F8 F333380000000008333300033333338888888883333338883333} NumGlyphs = 2 end object gStavkeA: TMyDBGrid Left = 257 Top = 50 Width = 339 Height = 315 TabStop = False FindByName = False Color = clBtnFace DataSource = DataReal.sStavke1 Enabled = False Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit] TabOrder = 10 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -12 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] OnDblClick = gStavke1Return OnEnter = gStavke1Enter OnReturn = gStavke1Return end end object TPage Tag = 1 Left = 0 Top = 0 Caption = 'Stavke' object Bevel64: TBevel Left = 296 Top = 1 Width = 333 Height = 21 Shape = bsFrame end object Bevel18: TBevel Left = 4 Top = 1 Width = 285 Height = 21 Shape = bsFrame end object BrojUfe: TMyDBText Left = 93 Top = 5 Width = 65 Height = 13 DataField = 'BrojIFE' DataSource = DataReal.sGlava2 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label52: TLabel Left = 8 Top = 5 Width = 80 Height = 13 Caption = 'Radni nalog broj:' end object Bevel8: TBevel Left = 88 Top = 340 Width = 409 Height = 105 end object Label8: TLabel Left = 300 Top = 5 Width = 131 Height = 13 Caption = 'Realizacija proizvodnje broj:' end object DBText1: TMyDBText Left = 436 Top = 5 Width = 81 Height = 13 DataField = 'BrojUFE' DataSource = DataReal.sGlava Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Bevel14: TBevel Left = 340 Top = 396 Width = 73 Height = 21 Style = bsRaised end object Bevel11: TBevel Left = 328 Top = 368 Width = 161 Height = 21 Style = bsRaised end object Bevel26: TBevel Left = 92 Top = 344 Width = 197 Height = 97 Style = bsRaised end object Bevel10: TBevel Left = 128 Top = 416 Width = 157 Height = 21 Style = bsRaised end object Label28: TLabel Left = 300 Top = 424 Width = 37 Height = 13 Alignment = taRightJustify Caption = 'Koli�ina' end object JedMjere: TMyDBText Left = 444 Top = 424 Width = 49 Height = 17 DataField = 'Naziv' DataSource = DataReal.sMjere end object Label100: TLabel Left = 300 Top = 400 Width = 37 Height = 13 Caption = 'Min.kol.' end object Min_Kol: TMyDBText Left = 416 Top = 400 Width = 77 Height = 17 DataField = 'MinKol' DataSource = DataReal.sStavke end object Bevel60: TBevel Left = 296 Top = 344 Width = 197 Height = 21 Shape = bsFrame Style = bsRaised end object Bevel27: TBevel Left = 296 Top = 344 Width = 197 Height = 49 Style = bsRaised end object DBText13: TMyDBText Left = 300 Top = 348 Width = 189 Height = 13 DataField = 'Naziv' DataSource = DataReal.sImeBoje end object Label119: TLabel Left = 300 Top = 372 Width = 24 Height = 13 Caption = 'Boja:' end object Bevel59: TBevel Left = 92 Top = 344 Width = 197 Height = 69 Shape = bsFrame Style = bsRaised end object DBText7: TMyDBText Left = 96 Top = 348 Width = 189 Height = 61 DataField = 'Naziv' DataSource = DataReal.sImeRobe WordWrap = True end object Label26: TLabel Left = 96 Top = 420 Width = 26 Height = 13 Caption = 'Artikl:' end object DBText3: TMyDBText Left = 132 Top = 420 Width = 149 Height = 13 DataField = 'Sifra' DataSource = DataReal.sArtikl end object DBText6: TMyDBText Left = 332 Top = 372 Width = 153 Height = 13 DataField = 'Sifra' DataSource = DataReal.sBoje end object DBText9: TMyDBText Left = 344 Top = 400 Width = 65 Height = 13 DataField = 'Atom' DataSource = DataReal.sStavke end object IzlazButton20: TBitBtn Left = 508 Top = 390 Width = 77 Height = 45 Caption = 'Zaglavlje' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = IzlazButton20Click Glyph.Data = { 76020000424D7602000000000000760000002800000040000000100000000100 0400000000000002000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333933333333333333333333333333333338F33333333333333333333 3333333339093333333333333333FF33333333333888F3333333333333300333 3333333390F093333333333333F88F333333333388388F3333333333300C0333 333333390FFF093333333333F8838F333333333888F388F3333333300CCC0333 3333339990FFF093333333F883338FFFFF333383388F388F3333300CCCCC0000 00033999990FFF093333F88333338888883338333388F388F3330CCCCCCCCCCC CC0319999990FFF0933383FF33333FFFFF338F3333388F388F33300CCCCC0000 0003919999990FFF09333883FF338888883388F333F388F388F333300CCC0333 33333919909990FFF093333883FF8F333333388F3833F88F38833333300C0333 333333919990990F0933333338838F3333333388F338F3888833333333300333 33333339190099903333333333388333333333388F883338F333333333333333 333333339199999933333333333333333333333388F333F83333333333333333 3333333339199993333333333333333333333333388F38833333333333333333 3333333333919333333333333333333333333333338883333333333333333333 3333333333333333333333333333333333333333333333333333} Layout = blGlyphBottom NumGlyphs = 2 end object gStavke0: TMyDBGrid Left = 0 Top = 22 Width = 292 Height = 315 FindByName = False DataSource = DataReal.sStavke2 Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgCancelOnExit] TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -12 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] OnDblClick = gStavke0Return OnEnter = gStavke0Enter OnReturn = gStavke0Return end object ZapisiButton20: TBitBtn Left = 508 Top = 354 Width = 77 Height = 33 Caption = 'Stavka' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = ZapisiButton20Click OnEnter = ZapisiButton20Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333 3BB33773333773333773B333333B3333333B7333333733333337} NumGlyphs = 2 end object gStavke1: TMyDBGrid Left = 293 Top = 22 Width = 339 Height = 315 FindByName = False DataSource = DataReal.sStavke1 Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit] TabOrder = 1 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -12 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] OnDblClick = gStavke1Return OnEnter = gStavke1Enter OnReturn = gStavke1Return end object DBEdit1: TDBEdit Left = 368 Top = 424 Width = 17 Height = 13 TabStop = False AutoSize = False DataField = 'Naziv' DataSource = DataReal.sMjere Enabled = False TabOrder = 5 end object XKolicina2: TDBEdit Left = 392 Top = 424 Width = 17 Height = 13 TabStop = False AutoSize = False DataField = 'KolicinaX' DataSource = DataReal.sStavke Enabled = False TabOrder = 6 end object XKolicina: TDBEdit Left = 416 Top = 424 Width = 17 Height = 13 TabStop = False AutoSize = False DataField = 'KolicinaX' DataSource = DataReal.sStavke2 Enabled = False TabOrder = 7 end object eKolicina: TDBVar Left = 340 Top = 420 Width = 101 Height = 21 AutoSize = False Color = clBtnFace DataField = 'KolicinaX' DataSource = DataReal.sStavke Enabled = False TabOrder = 2 OnEnter = eKolicinaEnter OnExitChanged = eKolicinaExitChanged end end end end