object fm2500400Predracuni: Tfm2500400Predracuni Left = 332 Top = 216 Width = 670 Height = 580 HelpContext = 250040000 VertScrollBar.Tracking = True Caption = 'fm2500400Predracuni' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] FormStyle = fsMDIChild Position = poDefaultPosOnly ShowHint = True Visible = True OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 14 object paTipke: TPanel Left = 0 Top = 27 Width = 662 Height = 66 Align = alTop ParentShowHint = False ShowHint = True TabOrder = 0 object Label10: TLabel Left = 306 Top = 12 Width = 71 Height = 14 Caption = 'U&klju�i u prikaz' FocusControl = cbStatus_pred end object Label11: TLabel Left = 294 Top = 38 Width = 83 Height = 14 Caption = 'Promjena statusa' FocusControl = cbPromjenaStatus_pred end object bbUnos: TBitBtn Left = 5 Top = 3 Width = 70 Height = 20 Hint = 'Unos novog dokumenta' Caption = '&Unos' Default = True ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = bbUnosClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3 333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0 C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0 F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF 00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333 3333333373FF7333333333333000333333333333377733333333333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 Spacing = 2 end object bbIzmjena: TBitBtn Left = 5 Top = 23 Width = 70 Height = 20 Hint = 'Izmjena teku�eg dokumenta (trenutno pozicioniranog u tabeli)' Caption = '&Izmjena' TabOrder = 1 OnClick = bbIzmjenaClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000 000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F 00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B 0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F 0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF 00333377737FFFFF773333303300000003333337337777777333} NumGlyphs = 2 Spacing = 2 end object bbBrisanje: TBitBtn Left = 75 Top = 23 Width = 70 Height = 20 Hint = 'Brisanje dokumenta sa stavkama' Caption = '&Brisanje' TabOrder = 3 OnClick = bbBrisanjeClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555 555557777F777555F55500000000555055557777777755F75555005500055055 555577F5777F57555555005550055555555577FF577F5FF55555500550050055 5555577FF77577FF555555005050110555555577F757777FF555555505099910 555555FF75777777FF555005550999910555577F5F77777775F5500505509990 3055577F75F77777575F55005055090B030555775755777575755555555550B0 B03055555F555757575755550555550B0B335555755555757555555555555550 BBB35555F55555575F555550555555550BBB55575555555575F5555555555555 50BB555555555555575F555555555555550B5555555555555575} NumGlyphs = 2 Spacing = 2 end object bbIspis: TBitBtn Left = 145 Top = 23 Width = 70 Height = 20 Hint = 'Poziv prozora sa popisom izvje�taja' Caption = 'Iz&vje�taji' TabOrder = 4 OnClick = bbIspisClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 0003377777777777777308888888888888807F33333333333337088888888888 88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F 8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F 8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0 33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033 33333337FFFF7733333333300000033333333337777773333333} NumGlyphs = 2 Spacing = 2 end object bbIzlaz: TBitBtn Left = 75 Top = 3 Width = 70 Height = 20 Hint = 'Prekid rada i izlaz iz prozora' Caption = 'I&zlaz' TabOrder = 2 OnClick = bbIzlazClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB 0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB 0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB 0333337F777FFFFF7F3333000000000003333377777777777333} NumGlyphs = 2 Spacing = 2 end object bbPrijenos: TBitBtn Left = 216 Top = 3 Width = 70 Height = 20 Hint = 'Prijenos podataka | Prijenos podatka iz teku�eg reda tabele u ek' + 'ran za unos i izmjenu iz kojeg je pozvan izbornik' Caption = 'Prijenos' Default = True TabOrder = 5 OnClick = bbPrijenosClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303 333333333333337FF3333333333333903333333333333377FF33333333333399 03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999 99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999 99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099 03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003 33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333 33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333 3333777777333333333333333333333333333333333333333333} NumGlyphs = 2 Spacing = 2 end object cbVidljivaMarza: TCheckBox Left = 5 Top = 47 Width = 173 Height = 17 Caption = 'Vidljiva nabavna cijena i mar�a' State = cbChecked TabOrder = 6 OnClick = cbVidljivaMarzaClick end object bbPrijenosURacun: TBitBtn Left = 145 Top = 3 Width = 70 Height = 20 Hint = 'Iz teku�eg predra�una napravi ra�un' Caption = 'Prijenos u &Rn' TabOrder = 7 OnClick = bbPrijenosURacunClick NumGlyphs = 2 Spacing = 2 end object cbStatus_pred: TComboBox Left = 380 Top = 8 Width = 209 Height = 22 Hint = 'Filtriranje prikaza predra�una' Style = csDropDownList Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ItemHeight = 14 Items.Strings = ( 'sve predra�une' 'samo aktivne predra�une' 'samo neaktivne predra�une') ParentFont = False TabOrder = 8 OnChange = cbStatus_predChange end object cbPromjenaStatus_pred: TComboBox Left = 380 Top = 34 Width = 209 Height = 22 Hint = 'Promjena statusa predra�una' Style = csDropDownList Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ItemHeight = 14 Items.Strings = ( 'aktivan' 'neaktivan') ParentFont = False TabOrder = 9 OnClick = cbPromjenaStatus_predClick end end object Panel4: TPanel Left = 0 Top = 0 Width = 662 Height = 27 Align = alTop ParentShowHint = False ShowHint = True TabOrder = 1 object Label4: TLabel Left = 157 Top = 7 Width = 27 Height = 14 Caption = '&Tra�i:' FocusControl = edTrazi end object NavigatorGlava: TDBNavigator Left = 1 Top = 1 Width = 139 Height = 25 VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh] Align = alLeft Hints.Strings = ( 'Prvi red' 'Prethodni red' 'Sljede�i red' 'Posljednji red' '' '' '' '' '' 'Obnovi, osvje�i podatke sa diska') TabOrder = 0 end object edTrazi: TEdit Left = 336 Top = 3 Width = 140 Height = 22 Hint = 'Upisivanjem pojedinih znakova �e se pretra�ivati podaci' TabOrder = 2 OnChange = edTraziChange end object cbTrazi: TComboBox Left = 188 Top = 4 Width = 141 Height = 22 Style = csDropDownList ItemHeight = 14 Items.Strings = ( 'broj ra�una' 'datum ra�una') TabOrder = 1 end end object sb: TStatusBar Left = 0 Top = 534 Width = 662 Height = 19 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] Panels = < item Text = 'Status' Width = 150 end item Text = 'Metoda zaliha' Width = 200 end item Bevel = pbNone Width = 50 end> ParentFont = False SimplePanel = False end object PageControl: TPageControl Left = 0 Top = 93 Width = 662 Height = 441 ActivePage = pgEkran Align = alClient TabOrder = 3 object pgTabela: TTabSheet Caption = 'T&abelarni prikaz' object Splitter3: TSplitter Left = 0 Top = 182 Width = 654 Height = 3 Cursor = crVSplit Align = alBottom end object grdGlava: TDBGrid Left = 0 Top = 0 Width = 654 Height = 182 Align = alClient Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgCancelOnExit] ReadOnly = True TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'Arial CE' TitleFont.Style = [] OnDrawColumnCell = grdGlavaDrawColumnCell OnDblClick = bbPrijenosClick Columns = < item FieldName = 'godina' Title.Alignment = taRightJustify Title.Caption = 'God' Width = 38 end item Alignment = taRightJustify FieldName = 'broj' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] Title.Alignment = taRightJustify Title.Caption = 'Broj' Width = 43 end item FieldName = 'datum' Title.Caption = 'Datum' Width = 67 end item FieldName = 'dospjece' Title.Caption = 'Dospje�e' Width = 68 end item FieldName = 'cfPartner' Title.Caption = 'Kupac' Width = 262 end item FieldName = 'cfSkladiste' Title.Caption = 'Skladi�te' Width = 200 end> end object paDonjiPregled: TPanel Left = 0 Top = 185 Width = 654 Height = 227 Align = alBottom BevelOuter = bvNone TabOrder = 1 object Splitter1: TSplitter Left = 0 Top = 131 Width = 654 Height = 3 Cursor = crVSplit Align = alBottom end object paTekstoviPregled: TPanel Left = 0 Top = 134 Width = 654 Height = 93 Align = alBottom TabOrder = 0 object Panel3: TPanel Left = 1 Top = 1 Width = 298 Height = 91 Align = alClient Caption = 'Panel3' TabOrder = 0 object Splitter2: TSplitter Left = 294 Top = 1 Width = 3 Height = 89 Cursor = crHSplit Align = alRight end object deTekstPrijePre: TDBRichEdit Left = 1 Top = 1 Width = 293 Height = 89 Align = alClient DataField = 'tekstPrije' ReadOnly = True ScrollBars = ssVertical TabOrder = 0 end end object Panel5: TPanel Left = 299 Top = 1 Width = 354 Height = 91 Align = alRight Caption = 'Panel5' TabOrder = 1 object deTekstIzaPre: TDBRichEdit Left = 1 Top = 1 Width = 352 Height = 89 Align = alClient DataField = 'tekstIza' ReadOnly = True ScrollBars = ssVertical TabOrder = 0 end end end object grdStavke: TDBGrid Left = 0 Top = 24 Width = 654 Height = 107 Align = alClient Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit] ReadOnly = True TabOrder = 1 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'Arial CE' TitleFont.Style = [] Columns = < item FieldName = 'redbr' Title.Caption = 'Rbr' Width = 30 end item FieldName = 'cfSifra' Title.Caption = 'Artikl' Width = 201 end item FieldName = 'cfJedmj' Title.Caption = 'Jed.mj.' Width = 46 end item Alignment = taRightJustify FieldName = 'kolicina' Title.Alignment = taRightJustify Title.Caption = 'Koli�ina' Width = 73 end item Alignment = taRightJustify FieldName = 'cfPC1' Title.Alignment = taRightJustify Title.Caption = 'Cijena bez poreza' Width = 109 end item Alignment = taRightJustify FieldName = 'cfIznos' Title.Alignment = taRightJustify Title.Caption = 'Iznos s porezom' Width = 127 end> end object Panel2: TPanel Left = 0 Top = 0 Width = 654 Height = 24 Align = alTop TabOrder = 2 object Label2: TLabel Left = 5 Top = 6 Width = 124 Height = 14 Caption = 'Ukupan iznos predra�una' end object NavigatorStavke: TDBNavigator Left = 456 Top = 1 Width = 197 Height = 22 VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh] Align = alRight Hints.Strings = ( 'Prvi red' 'Prethodni red' 'Sljede�i red' 'Posljednji red' '' '' '' '' '' 'Obnovi, osvje�i podatke sa diska') TabOrder = 0 end object lbIznosGlavePre1: TStaticText Left = 133 Top = 3 Width = 125 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbIznosGlavePre1' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 1 end object lbIznosGlavePre2: TStaticText Left = 267 Top = 3 Width = 125 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbIznosGlavePre2' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 2 end end end end object pgEkran: TTabSheet Cursor = crArrow Caption = '&Ekranski prikaz' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] ParentFont = False object scrollBox: TScrollBox Left = 0 Top = 0 Width = 654 Height = 412 HorzScrollBar.Tracking = True VertScrollBar.Margin = 20 VertScrollBar.Position = 84 VertScrollBar.Tracking = True Align = alClient Color = clBtnFace ParentColor = False TabOrder = 0 object bevTopStavke: TBevel Left = 614 Top = 228 Width = 35 Height = 3 Shape = bsBottomLine Visible = False end object paUnos: TPanel Left = 5 Top = -81 Width = 607 Height = 702 TabOrder = 0 object lbGlava: TLabel Left = 14 Top = 5 Width = 95 Height = 14 Caption = 'Glava predra�una' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False end object paTipkeGlava: TPanel Left = 524 Top = 18 Width = 75 Height = 59 BevelOuter = bvNone TabOrder = 1 object bbOdustani: TBitBtn Left = 4 Top = 6 Width = 67 Height = 22 Hint = 'Odustanak od unosa/izmjene glave' Caption = '&Odustani' TabOrder = 0 OnClick = bbOdustaniClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999 3333333777333777FF3333993333339993333377FF3333377FF3399993333339 993337777FF3333377F3393999333333993337F777FF333337FF993399933333 399377F3777FF333377F993339993333399377F33777FF33377F993333999333 399377F333777FF3377F993333399933399377F3333777FF377F993333339993 399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399 99333773FF3333777733339993333339933333773FFFFFF77333333999999999 3333333777333777333333333999993333333333377777333333} NumGlyphs = 2 Spacing = 2 end object bbSpremiGlavu: TBitBtn Left = 4 Top = 27 Width = 67 Height = 22 Hint = 'Spremi glavu' Caption = '&Spremi' Default = True TabOrder = 1 OnClick = bbSpremiGlavuClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070 7700333333337777777733333333008088003333333377F73377333333330088 88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000 000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039 99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999 93337FFFF7737777733300000033333333337777773333333333} NumGlyphs = 2 Spacing = 2 end end object paStavke: TPanel Left = 13 Top = 313 Width = 508 Height = 241 BevelOuter = bvLowered TabOrder = 2 object lbArtiklUsluga: TLabel Left = 56 Top = 17 Width = 60 Height = 14 Caption = 'Artikl-usluga' end object label01: TLabel Left = 13 Top = 60 Width = 42 Height = 14 Caption = 'Koli�ina' FocusControl = deKolicina Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 14 Top = 17 Width = 35 Height = 14 Caption = 'Red br.' end object lbStavke: TLabel Left = 3 Top = 2 Width = 103 Height = 14 Caption = 'Stavke predra�una' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False end object lbStanjeZalihe: TLabel Left = 190 Top = 60 Width = 67 Height = 14 Caption = 'lbStanjeZalihe' end object deKolicina: TDBEdit Left = 61 Top = 57 Width = 79 Height = 22 DataField = 'kolicina' TabOrder = 4 OnChange = deKolicinaChange OnKeyPress = deKolicinaKeyPress end object deSifra: TDBEdit Left = 55 Top = 30 Width = 58 Height = 22 DataField = 'sifra' TabOrder = 1 OnChange = deSifraChange OnKeyPress = deSifraKeyPress end object edSifra: TEdit Left = 137 Top = 30 Width = 334 Height = 22 TabStop = False ReadOnly = True TabOrder = 3 Text = 'edSifra' end object deRedbr: TDBEdit Left = 13 Top = 30 Width = 37 Height = 22 TabStop = False DataField = 'redbr' TabOrder = 0 end object btSifra: TButton Left = 118 Top = 34 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 2 TabStop = False OnClick = btSifraClick end object edJedmj: TEdit Left = 143 Top = 57 Width = 41 Height = 22 TabStop = False Color = clInactiveBorder TabOrder = 5 Text = 'edJedmj' end object paNcMarza: TPanel Left = 1 Top = 81 Width = 506 Height = 52 Align = alBottom BevelOuter = bvNone TabOrder = 6 object lbCijena: TLabel Left = 10 Top = 7 Width = 80 Height = 14 Alignment = taRightJustify Caption = 'Nabavna cijena' FocusControl = deNc Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False end object Label24: TLabel Left = 10 Top = 30 Width = 33 Height = 14 Alignment = taRightJustify Caption = 'Mar�a' FocusControl = deMarza Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False end object Label32: TLabel Left = 157 Top = 31 Width = 10 Height = 14 Caption = '%' end object deNc: TDBEdit Left = 171 Top = 1 Width = 108 Height = 22 DataField = 'nc' TabOrder = 0 OnExit = deNcExit OnKeyPress = KeyPressSvi end object deMarza: TDBEdit Left = 171 Top = 27 Width = 108 Height = 22 DataField = 'marza' TabOrder = 2 OnExit = deMarzaExit OnKeyPress = KeyPressSvi end object edMarzaStopa: TEdit Left = 102 Top = 27 Width = 53 Height = 22 TabOrder = 1 Text = 'edMarzaStopa' OnExit = edMarzaStopaExit OnKeyPress = KeyPressSvi end end object Panel6: TPanel Left = 1 Top = 133 Width = 506 Height = 107 Align = alBottom BevelOuter = bvNone TabOrder = 7 object Label1: TLabel Left = 351 Top = 65 Width = 61 Height = 14 Caption = 'Iznos stavke' end object Label19: TLabel Left = 10 Top = 30 Width = 30 Height = 14 Alignment = taRightJustify Caption = 'Rabat' FocusControl = deRabat Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False end object Label25: TLabel Left = 10 Top = 56 Width = 49 Height = 14 Alignment = taRightJustify Caption = 'Porez TB' FocusControl = dePorezStopa Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False end object Label26: TLabel Left = 10 Top = 80 Width = 146 Height = 14 Caption = 'Prodajna cijena s porezom' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False end object Label27: TLabel Left = 10 Top = 6 Width = 83 Height = 14 Caption = 'Prodajna cijena' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False end object Label30: TLabel Left = 157 Top = 57 Width = 10 Height = 14 Caption = '%' end object Label31: TLabel Left = 157 Top = 31 Width = 10 Height = 14 Caption = '%' end object lbIznosStavke: TStaticText Left = 287 Top = 81 Width = 125 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbIznosStavke' TabOrder = 7 end object deRabat: TDBEdit Left = 170 Top = 27 Width = 108 Height = 22 DataField = 'rabat' TabOrder = 2 OnExit = deRabatExit OnKeyPress = KeyPressSvi end object dePorezStopa: TDBEdit Left = 103 Top = 53 Width = 53 Height = 22 TabStop = False Color = clBtnFace DataField = 'porezStopa' ReadOnly = True TabOrder = 4 OnKeyPress = KeyPressSvi end object edPc2: TEdit Left = 169 Top = 77 Width = 109 Height = 22 TabOrder = 6 Text = 'edPc2' OnChange = deKolicinaChange OnExit = edPc2Exit OnKeyPress = KeyPressSvi end object edPc1: TEdit Left = 170 Top = 1 Width = 108 Height = 22 TabOrder = 0 Text = 'edPc1' OnExit = edPc1Exit OnKeyPress = KeyPressSvi end object dePorezTb: TDBEdit Left = 62 Top = 53 Width = 37 Height = 22 DataField = 'porezTb' TabOrder = 3 OnChange = dePorezTbChange OnExit = dePorezTbExit OnKeyPress = KeyPressSvi end object lbPorez: TStaticText Left = 170 Top = 55 Width = 108 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbPorez' TabOrder = 5 end object edRabatStopa: TEdit Left = 102 Top = 27 Width = 53 Height = 22 TabOrder = 1 Text = 'edRabatStopa' OnExit = edRabatStopaExit OnKeyPress = KeyPressSvi end object cbFiksnaStopaRabata: TCheckBox Left = 85 Top = 30 Width = 15 Height = 17 Hint = 'Oznaka da li je fiksna stopa rabata kod kalkuliranja' State = cbChecked TabOrder = 8 end end object btPorezTb: TButton Left = 284 Top = 189 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 8 TabStop = False OnClick = btPorezTbClick end end object scrollBoxGlava: TScrollBox Left = 13 Top = 20 Width = 512 Height = 285 HorzScrollBar.Range = 489 VertScrollBar.Margin = 20 VertScrollBar.Range = 615 VertScrollBar.Tracking = True AutoScroll = False Ctl3D = True ParentCtl3D = False TabOrder = 0 object paGlava: TPanel Left = 4 Top = 2 Width = 481 Height = 605 TabOrder = 0 object Label6: TLabel Left = 12 Top = 4 Width = 60 Height = 14 Caption = 'Godina i broj' end object Label7: TLabel Left = 119 Top = 4 Width = 30 Height = 14 Caption = 'Datum' end object lbPartner: TLabel Left = 14 Top = 44 Width = 31 Height = 14 Caption = 'Kupac' end object Label14: TLabel Left = 9 Top = 273 Width = 90 Height = 14 Caption = 'Tekst prije stavaka' end object Label15: TLabel Left = 10 Top = 413 Width = 84 Height = 14 Caption = 'Tekst iza stavaka' end object Label5: TLabel Left = 14 Top = 80 Width = 43 Height = 14 Caption = 'Skladi�te' end object Label9: TLabel Left = 14 Top = 116 Width = 28 Height = 14 Caption = 'Cjenik' end object Label18: TLabel Left = 12 Top = 190 Width = 71 Height = 14 Caption = 'Model pla�anja' end object Label20: TLabel Left = 151 Top = 189 Width = 70 Height = 14 Caption = 'Na�in pla�anja' FocusControl = deNacinPlac end object Label21: TLabel Left = 351 Top = 191 Width = 77 Height = 14 Caption = 'Datum dospje�a' end object Label22: TLabel Left = 13 Top = 227 Width = 48 Height = 14 Caption = 'Fakturirao' FocusControl = deFakturirao end object Label23: TLabel Left = 241 Top = 228 Width = 38 Height = 14 Caption = 'Odobrio' FocusControl = deOdobrio end object Label8: TLabel Left = 386 Top = 43 Width = 41 Height = 14 Caption = 'Rabat %' end object lbTip_ira_unos: TLabel Left = 253 Top = 151 Width = 80 Height = 14 Caption = 'Tip unosa u I-RA' FocusControl = deTip_ira_unos end object lbTip_ira: TLabel Left = 15 Top = 151 Width = 68 Height = 14 Caption = 'Tip knjige I-RA' FocusControl = deTip_ira end object deGodina: TDBEdit Left = 13 Top = 19 Width = 40 Height = 22 TabStop = False DataField = 'godina' MaxLength = 4 TabOrder = 0 end object deDatum: TDBEdit Left = 117 Top = 19 Width = 70 Height = 22 AutoSelect = False DataField = 'datum' TabOrder = 2 end object deBroj: TDBEdit Left = 52 Top = 18 Width = 60 Height = 22 DataField = 'broj' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnChange = deBrojChange end object btDatum: TButton Left = 189 Top = 23 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 4 TabStop = False OnClick = btDatumClick end object dePartner: TDBEdit Left = 13 Top = 56 Width = 53 Height = 22 DataField = 'partner' TabOrder = 5 OnChange = dePartnerChange OnKeyPress = dePartnerKeyPress end object btPartner: TButton Left = 71 Top = 60 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 6 TabStop = False OnClick = btPartnerClick end object edPartner: TEdit Left = 90 Top = 56 Width = 292 Height = 22 TabStop = False ReadOnly = True TabOrder = 7 Text = 'edPartner' end object deTekstPrije: TDBRichEdit Left = 10 Top = 286 Width = 451 Height = 120 DataField = 'tekstPrije' ScrollBars = ssVertical TabOrder = 34 end object deTekstIza: TDBRichEdit Left = 9 Top = 428 Width = 454 Height = 136 DataField = 'tekstIza' ScrollBars = ssVertical TabOrder = 36 end object btTekstPrije: TButton Left = 105 Top = 270 Width = 15 Height = 15 Hint = 'Poziv �ifrarnika tekstova' Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 33 TabStop = False OnClick = btTekstPrijeClick end object btTekstIza: TButton Left = 104 Top = 411 Width = 15 Height = 15 Hint = 'Poziv �ifrarnika tekstova' Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 35 TabStop = False OnClick = btTekstIzaClick end object deSkladiste: TDBEdit Left = 13 Top = 92 Width = 53 Height = 22 DataField = 'skladiste' TabOrder = 9 OnChange = deSkladisteChange OnKeyPress = deSkladisteKeyPress end object btSkladiste: TButton Left = 70 Top = 96 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 10 TabStop = False OnClick = btSkladisteClick end object edSkladiste: TEdit Left = 90 Top = 92 Width = 291 Height = 22 TabStop = False ReadOnly = True TabOrder = 11 Text = 'edSkladiste' end object deCjenik: TDBEdit Left = 12 Top = 128 Width = 53 Height = 22 DataField = 'cjenik' TabOrder = 12 OnChange = deCjenikChange OnKeyPress = deCjenikKeyPress end object btCjenik: TButton Left = 70 Top = 132 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 13 TabStop = False OnClick = btCjenikClick end object edCjenik: TEdit Left = 90 Top = 128 Width = 291 Height = 22 TabStop = False ReadOnly = True TabOrder = 14 Text = 'edCjenik' end object deModelPlac: TDBEdit Left = 12 Top = 203 Width = 121 Height = 22 Hint = '00 KKKK-BBBB-GGGG (OznakaModela �ifraKupca-BrojRa�una-GodinaRa�u' + 'na)' DataField = 'modelPlac' TabOrder = 21 OnEnter = deModelPlacEnter end object deNacinPlac: TDBEdit Left = 150 Top = 204 Width = 40 Height = 22 DataField = 'nacinPlac' TabOrder = 22 OnChange = deNacinPlacChange OnKeyPress = deNacinPlacKeyPress end object edNacinPlac: TEdit Left = 214 Top = 205 Width = 125 Height = 22 TabStop = False ReadOnly = True TabOrder = 24 Text = 'edNacinPlac' end object btNacinPlac: TButton Left = 194 Top = 208 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 23 TabStop = False OnClick = btNacinPlacClick end object deDospjece: TDBEdit Left = 351 Top = 205 Width = 86 Height = 22 DataField = 'dospjece' TabOrder = 25 end object deFakturirao: TDBEdit Left = 13 Top = 242 Width = 40 Height = 22 DataField = 'fakturirao' TabOrder = 27 OnChange = deFakturiraoChange OnKeyPress = deFakturiraoKeyPress end object edFakturirao: TEdit Left = 76 Top = 243 Width = 153 Height = 22 TabStop = False ReadOnly = True TabOrder = 29 Text = 'edFakturirao' end object btFakturirao: TButton Left = 56 Top = 246 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 28 TabStop = False OnClick = btFakturiraoClick end object btDospjece: TButton Left = 440 Top = 208 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 26 TabStop = False OnClick = btDospjeceClick end object deOdobrio: TDBEdit Left = 241 Top = 243 Width = 40 Height = 22 DataField = 'odobrio' TabOrder = 30 OnChange = deOdobrioChange OnKeyPress = deOdobrioKeyPress end object edOdobrio: TEdit Left = 303 Top = 244 Width = 157 Height = 22 TabStop = False ReadOnly = True TabOrder = 32 Text = 'edOdobrio' end object btOdobrio: TButton Left = 284 Top = 247 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 31 TabStop = False OnClick = btOdobrioClick end object paJedinica: TPanel Left = 1 Top = 564 Width = 479 Height = 40 Align = alBottom BevelOuter = bvNone TabOrder = 37 object lbJedinica: TLabel Left = 15 Top = 0 Width = 83 Height = 14 Caption = 'Poslovna jedinica' end object deJedinica: TDBEdit Left = 15 Top = 13 Width = 53 Height = 22 DataField = 'jedinica' TabOrder = 0 OnChange = deJedinicaChange OnKeyPress = deJedinicaKeyPress end object btJedinica: TButton Left = 74 Top = 20 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 1 TabStop = False OnClick = btJedinicaClick end object edJedinica: TEdit Left = 94 Top = 13 Width = 367 Height = 22 TabStop = False ReadOnly = True TabOrder = 2 Text = 'edJedinica' end end object edRabatStopaKupac: TEdit Left = 386 Top = 56 Width = 84 Height = 22 TabOrder = 8 Text = 'edRabatStopaKupac' OnKeyPress = KeyPressSvi end object deTipirnv: TDBRadioGroup Left = 275 Top = 10 Width = 195 Height = 31 Hint = 'Tip prihoda za kontiranje u kupcima' Caption = 'Tip prihoda (ra�una)' Columns = 2 DataField = 'tipirnv' Items.Strings = ( 'proizvodi' 'trgova�ka roba') ParentShowHint = False ShowHint = True TabOrder = 3 Values.Strings = ( '1' '2') end object deTip_ira_unos: TDBEdit Left = 252 Top = 166 Width = 27 Height = 22 DataField = 'tip_ira_unos' TabOrder = 18 OnChange = deTip_ira_unosChange OnKeyPress = deTip_ira_unosKeyPress end object edTip_ira_unos: TEdit Left = 300 Top = 166 Width = 171 Height = 22 TabStop = False ReadOnly = True TabOrder = 20 Text = 'edTip_ira_unos' end object btTip_ira_unos: TButton Left = 282 Top = 170 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 19 TabStop = False OnClick = btTip_ira_unosClick end object deTip_ira: TDBEdit Left = 12 Top = 166 Width = 29 Height = 22 DataField = 'tip_ira' TabOrder = 15 OnChange = deTip_iraChange OnKeyPress = deTip_iraKeyPress end object edTip_ira: TEdit Left = 62 Top = 166 Width = 181 Height = 22 TabStop = False ReadOnly = True TabOrder = 17 Text = 'edTip_ira' end object btTip_ira: TButton Left = 44 Top = 168 Width = 15 Height = 15 Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 16 TabStop = False OnClick = btTip_iraClick end end end object Panel7: TPanel Left = 1 Top = 555 Width = 605 Height = 25 Align = alBottom BevelOuter = bvNone TabOrder = 3 object Label3: TLabel Left = 5 Top = 6 Width = 124 Height = 14 Caption = 'Ukupan iznos predra�una' end object lbIznosGlaveEkr1: TStaticText Left = 134 Top = 4 Width = 127 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbIznosGlaveEkr1' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object NavigatorStavkeEkran: TDBNavigator Left = 466 Top = 3 Width = 135 Height = 19 VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh] Hints.Strings = ( 'Prvi red' 'Prethodni red' 'Sljede�i red' 'Posljednji red' '' '' '' '' '' 'Obnovi, osvje�i podatke sa diska') TabOrder = 1 end object lbIznosGlaveEkr2: TStaticText Left = 270 Top = 4 Width = 127 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbIznosGlaveEkr2' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 2 end end object paTipkeStavke: TPanel Left = 528 Top = 314 Width = 75 Height = 187 BevelOuter = bvNone TabOrder = 4 object bbIzlazStavke: TBitBtn Left = 2 Top = 122 Width = 67 Height = 20 Hint = 'Kraj unosa/izmjene stavaka' Caption = 'I&zlaz' TabOrder = 6 OnClick = bbIzlazStavkeClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB 0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB 0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB 0333337F777FFFFF7F3333000000000003333377777777777333} NumGlyphs = 2 Spacing = 2 end object bbUnosStavke: TBitBtn Left = 2 Top = 1 Width = 67 Height = 20 Hint = 'Unos nove stavke' Caption = '&Unos' ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = bbUnosStavkeClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3 333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0 C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0 F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF 00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333 3333333373FF7333333333333000333333333333377733333333333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 Spacing = 2 end object bbIzmjenaStavke: TBitBtn Left = 2 Top = 21 Width = 67 Height = 20 Hint = 'Izmjena teku�e stavke' Caption = '&Izmjena' TabOrder = 1 OnClick = bbIzmjenaStavkeClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000 000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F 00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B 0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F 0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF 00333377737FFFFF773333303300000003333337337777777333} NumGlyphs = 2 Spacing = 2 end object bbBrisanjeStavke: TBitBtn Left = 2 Top = 41 Width = 67 Height = 20 Hint = 'Brisanje teku�e stavke' Caption = '&Brisanje' TabOrder = 2 OnClick = bbBrisanjeStavkeClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555 555557777F777555F55500000000555055557777777755F75555005500055055 555577F5777F57555555005550055555555577FF577F5FF55555500550050055 5555577FF77577FF555555005050110555555577F757777FF555555505099910 555555FF75777777FF555005550999910555577F5F77777775F5500505509990 3055577F75F77777575F55005055090B030555775755777575755555555550B0 B03055555F555757575755550555550B0B335555755555757555555555555550 BBB35555F55555575F555550555555550BBB55575555555575F5555555555555 50BB555555555555575F555555555555550B5555555555555575} NumGlyphs = 2 Spacing = 2 end object bbSljedeciStavke: TBitBtn Left = 2 Top = 61 Width = 67 Height = 20 Hint = 'Spremi teku�u stavku i unos/izmjena sljede�e' Caption = 'Sljede�i' Default = True TabOrder = 3 OnClick = bbSljedeciStavkeClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070 7700333333337777777733333333008088003333333377F73377333333330088 88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000 000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039 99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999 93337FFFF7737777733300000033333333337777773333333333} NumGlyphs = 2 Spacing = 2 end object bbSpremiStavke: TBitBtn Left = 2 Top = 82 Width = 67 Height = 20 Hint = 'Spremi teku�u stavku' Caption = '&Spremi' TabOrder = 4 OnClick = bbSpremiStavkeClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070 7700333333337777777733333333008088003333333377F73377333333330088 88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000 000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039 99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999 93337FFFF7737777733300000033333333337777773333333333} NumGlyphs = 2 Spacing = 2 end object bbOdustaniStavke: TBitBtn Left = 2 Top = 102 Width = 67 Height = 20 Hint = 'Odustani od unosa/izmjene teku�e stavke' Caption = '&Odustani' TabOrder = 5 OnClick = bbOdustaniStavkeClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999 3333333777333777FF3333993333339993333377FF3333377FF3399993333339 993337777FF3333377F3393999333333993337F777FF333337FF993399933333 399377F3777FF333377F993339993333399377F33777FF33377F993333999333 399377F333777FF3377F993333399933399377F3333777FF377F993333339993 399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399 99333773FF3333777733339993333339933333773FFFFFF77333333999999999 3333333777333777333333333999993333333333377777333333} NumGlyphs = 2 Spacing = 2 end object bbRenumStavaka: TBitBtn Left = 2 Top = 142 Width = 67 Height = 20 Hint = 'Renumeriraj redne brojeve stavaka' Caption = '&Renumeriraj' TabOrder = 7 OnClick = bbRenumStavakaClick NumGlyphs = 2 Spacing = 2 end object bbRabat: TBitBtn Left = 2 Top = 162 Width = 67 Height = 20 Hint = 'Izra�un rabata za cijeli predra�un' Caption = 'Rabat' TabOrder = 8 OnClick = bbRabatClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000 73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998 0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008 0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008 0333337F777777737F333308888888880333337F333333337F33330888888888 03333373FFFFFFFF733333700000000073333337777777773333} NumGlyphs = 2 Spacing = 2 end end object grdStavkeEkran: TDBGrid Left = 1 Top = 580 Width = 605 Height = 121 TabStop = False Align = alBottom Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit] ReadOnly = True TabOrder = 5 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'Arial CE' TitleFont.Style = [] Columns = < item FieldName = 'redbr' Title.Caption = 'Rbr' Width = 30 end item FieldName = 'cfSifra' Title.Caption = 'Artikl' Width = 197 end item FieldName = 'cfJedmj' Title.Caption = 'Jed.mj.' Width = 46 end item Alignment = taRightJustify FieldName = 'kolicina' Title.Alignment = taRightJustify Title.Caption = 'Koli�ina' Width = 88 end item Alignment = taRightJustify FieldName = 'cfPc1' Title.Alignment = taRightJustify Title.Caption = 'Cijena bez poreza' Width = 96 end item Alignment = taRightJustify FieldName = 'cfIznos' Title.Alignment = taRightJustify Title.Caption = 'Iznos s porezom' Width = 106 end> end end end end end object ta1Pred: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'pred' Left = 871 Top = 152 object AutoIncField3: TAutoIncField FieldName = 'Record' end object SmallintField17: TSmallintField FieldName = 'Godina' end object IntegerField13: TIntegerField FieldName = 'Broj' end object DateField3: TDateField FieldName = 'Datum' EditMask = '00/00/0000' end object IntegerField14: TIntegerField FieldName = 'Partner' end object SmallintField18: TSmallintField FieldName = 'TipIrnv' end object IntegerField15: TIntegerField FieldName = 'Skladiste' end object IntegerField16: TIntegerField FieldName = 'Cjenik' end object StringField23: TStringField FieldName = 'ModelPlac' Size = 30 end object SmallintField20: TSmallintField FieldName = 'NacinPlac' end object DateField5: TDateField FieldName = 'Dospjece' EditMask = '00/00/0000' end object BlobField1: TBlobField FieldName = 'TekstPrije' BlobType = ftFmtMemo end object BlobField2: TBlobField FieldName = 'TekstIza' BlobType = ftFmtMemo end object SmallintField21: TSmallintField FieldName = 'Fakturirao' end object SmallintField22: TSmallintField FieldName = 'Odobrio' end object IntegerField18: TIntegerField FieldName = 'Jedinica' end object ta1PredTip_ira: TIntegerField FieldName = 'Tip_ira' end object ta1PredTip_ira_unos: TIntegerField FieldName = 'Tip_ira_unos' end object ta1PredStatus_pred: TSmallintField FieldName = 'Status_pred' end object StringField24: TStringField FieldName = 'cfPartner' Size = 60 Calculated = True end object StringField25: TStringField FieldName = 'cfSkladiste' Size = 60 Calculated = True end end object ds1Pred: TDataSource DataSet = ta1Pred Left = 923 Top = 153 end object ta1PredSt: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'PredSt' Left = 991 Top = 151 object AutoIncField4: TAutoIncField FieldName = 'Record' end object SmallintField23: TSmallintField FieldName = 'Godina' end object IntegerField19: TIntegerField FieldName = 'Broj' end object SmallintField24: TSmallintField FieldName = 'Redbr' end object IntegerField20: TIntegerField FieldName = 'Sifra' end object FloatField8: TFloatField FieldName = 'Kolicina' DisplayFormat = ',0.000' EditFormat = '0.000' end object FloatField9: TFloatField FieldName = 'Nc' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object FloatField10: TFloatField FieldName = 'Marza' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object FloatField11: TFloatField FieldName = 'Rabat' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object SmallintField25: TSmallintField FieldName = 'PorezTb' end object FloatField12: TFloatField FieldName = 'PorezStopa' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object StringField27: TStringField FieldName = 'cfSifra' Size = 60 Calculated = True end object StringField28: TStringField FieldName = 'cfJedmj' Calculated = True end object ta1PredStcfPc1: TStringField FieldName = 'cfPc1' Calculated = True end object StringField29: TStringField FieldName = 'cfPc2' Calculated = True end object StringField30: TStringField FieldName = 'cfIznos' Calculated = True end end object ds1PredSt: TDataSource DataSet = ta1PredSt Left = 1043 Top = 152 end object ta2Pred: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'pred' Left = 867 Top = 208 object AutoIncField1: TAutoIncField FieldName = 'Record' end object SmallintField1: TSmallintField FieldName = 'Godina' end object IntegerField1: TIntegerField FieldName = 'Broj' end object DateField1: TDateField FieldName = 'Datum' EditMask = '00/00/0000' end object IntegerField2: TIntegerField FieldName = 'Partner' end object SmallintField2: TSmallintField FieldName = 'TipIrnv' end object IntegerField3: TIntegerField FieldName = 'Skladiste' end object IntegerField4: TIntegerField FieldName = 'Cjenik' end object StringField1: TStringField FieldName = 'ModelPlac' Size = 30 end object SmallintField3: TSmallintField FieldName = 'NacinPlac' end object DateField2: TDateField FieldName = 'Dospjece' EditMask = '00/00/0000' end object BlobField3: TBlobField FieldName = 'TekstPrije' BlobType = ftFmtMemo end object BlobField4: TBlobField FieldName = 'TekstIza' BlobType = ftFmtMemo end object SmallintField4: TSmallintField FieldName = 'Fakturirao' end object SmallintField5: TSmallintField FieldName = 'Odobrio' end object IntegerField5: TIntegerField FieldName = 'Jedinica' end object ta2PredTip_ira: TIntegerField FieldName = 'Tip_ira' end object ta2PredTip_ira_unos: TIntegerField FieldName = 'Tip_ira_unos' end object ta2PredStatus_pred: TSmallintField FieldName = 'Status_pred' end object StringField2: TStringField FieldName = 'cfPartner' Size = 60 Calculated = True end object StringField3: TStringField FieldName = 'cfSkladiste' Size = 60 Calculated = True end end object ds2Pred: TDataSource DataSet = ta2Pred Left = 919 Top = 211 end object ta3Pred: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'pred' Left = 865 Top = 266 object AutoIncField2: TAutoIncField FieldName = 'Record' end object SmallintField6: TSmallintField FieldName = 'Godina' end object IntegerField6: TIntegerField FieldName = 'Broj' end object DateField4: TDateField FieldName = 'Datum' EditMask = '00/00/0000' end object IntegerField7: TIntegerField FieldName = 'Partner' end object SmallintField7: TSmallintField FieldName = 'TipIrnv' end object IntegerField8: TIntegerField FieldName = 'Skladiste' end object IntegerField9: TIntegerField FieldName = 'Cjenik' end object StringField4: TStringField FieldName = 'ModelPlac' Size = 30 end object SmallintField8: TSmallintField FieldName = 'NacinPlac' end object DateField6: TDateField FieldName = 'Dospjece' EditMask = '00/00/0000' end object BlobField5: TBlobField FieldName = 'TekstPrije' BlobType = ftFmtMemo end object BlobField6: TBlobField FieldName = 'TekstIza' BlobType = ftFmtMemo end object SmallintField9: TSmallintField FieldName = 'Fakturirao' end object SmallintField10: TSmallintField FieldName = 'Odobrio' end object IntegerField10: TIntegerField FieldName = 'Jedinica' end object ta3PredTip_ira: TIntegerField FieldName = 'Tip_ira' end object ta3PredTip_ira_unos: TIntegerField FieldName = 'Tip_ira_unos' end object ta3PredStatus_pred: TSmallintField FieldName = 'Status_pred' end object StringField5: TStringField FieldName = 'cfPartner' Size = 60 Calculated = True end object StringField6: TStringField FieldName = 'cfSkladiste' Size = 60 Calculated = True end end object ta2PredSt: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'PredSt' Left = 991 Top = 209 object AutoIncField5: TAutoIncField FieldName = 'Record' end object SmallintField11: TSmallintField FieldName = 'Godina' end object IntegerField11: TIntegerField FieldName = 'Broj' end object SmallintField12: TSmallintField FieldName = 'Redbr' end object IntegerField12: TIntegerField FieldName = 'Sifra' end object FloatField1: TFloatField FieldName = 'Kolicina' DisplayFormat = ',0.000' EditFormat = '0.000' end object FloatField2: TFloatField FieldName = 'Nc' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object FloatField3: TFloatField FieldName = 'Marza' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object FloatField4: TFloatField FieldName = 'Rabat' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object SmallintField13: TSmallintField FieldName = 'PorezTb' end object FloatField5: TFloatField FieldName = 'PorezStopa' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object StringField7: TStringField FieldName = 'cfSifra' Size = 60 Calculated = True end object StringField8: TStringField FieldName = 'cfJedmj' Calculated = True end object ta2PredStcfPc1: TStringField FieldName = 'cfPc1' Calculated = True end object StringField9: TStringField FieldName = 'cfPc2' Calculated = True end object StringField10: TStringField FieldName = 'cfIznos' Calculated = True end end object ds2PredSt: TDataSource DataSet = ta2PredSt Left = 1043 Top = 210 end object ta3PredSt: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'PredSt' Left = 989 Top = 277 object AutoIncField6: TAutoIncField FieldName = 'Record' end object SmallintField14: TSmallintField FieldName = 'Godina' end object IntegerField17: TIntegerField FieldName = 'Broj' end object SmallintField15: TSmallintField FieldName = 'Redbr' end object IntegerField21: TIntegerField FieldName = 'Sifra' end object FloatField6: TFloatField FieldName = 'Kolicina' DisplayFormat = ',0.000' EditFormat = '0.000' end object FloatField7: TFloatField FieldName = 'Nc' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object FloatField13: TFloatField FieldName = 'Marza' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object FloatField14: TFloatField FieldName = 'Rabat' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object SmallintField16: TSmallintField FieldName = 'PorezTb' end object FloatField15: TFloatField FieldName = 'PorezStopa' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object StringField11: TStringField FieldName = 'cfSifra' Size = 60 Calculated = True end object StringField12: TStringField FieldName = 'cfJedmj' Calculated = True end object ta3PredStcfPc1: TStringField FieldName = 'cfPc1' Calculated = True end object StringField13: TStringField FieldName = 'cfPc2' Calculated = True end object StringField14: TStringField FieldName = 'cfIznos' Calculated = True end end object ta1Irnv: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'irnv' Left = 1007 Top = 353 object ta1IrnvRecord: TAutoIncField FieldName = 'Record' end object ta1IrnvGodina: TSmallintField FieldName = 'Godina' end object ta1IrnvBroj: TIntegerField FieldName = 'Broj' end object ta1IrnvDatum: TDateField FieldName = 'Datum' EditMask = '00/00/0000' end object ta1IrnvPartner: TIntegerField FieldName = 'Partner' end object ta1IrnvTipIrnv: TSmallintField FieldName = 'TipIrnv' end object ta1IrnvSkladiste: TIntegerField FieldName = 'Skladiste' end object ta1IrnvCjenik: TIntegerField FieldName = 'Cjenik' end object ta1IrnvPredGod: TSmallintField FieldName = 'PredGod' end object ta1IrnvPredBroj: TIntegerField FieldName = 'PredBroj' end object ta1IrnvPredDat: TDateField FieldName = 'PredDat' EditMask = '99/99/9999' end object ta1IrnvPredIznos: TFloatField FieldName = 'PredIznos' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object ta1IrnvModelPlac: TStringField FieldName = 'ModelPlac' Size = 30 end object ta1IrnvNacinPlac: TSmallintField FieldName = 'NacinPlac' end object ta1IrnvDospjece: TDateField FieldName = 'Dospjece' EditMask = '99/99/9999' end object ta1IrnvTekstPrije: TBlobField FieldName = 'TekstPrije' BlobType = ftFmtMemo end object ta1IrnvTekstIza: TBlobField FieldName = 'TekstIza' BlobType = ftFmtMemo end object ta1IrnvFakturirao: TSmallintField FieldName = 'Fakturirao' end object ta1IrnvOdobrio: TSmallintField FieldName = 'Odobrio' end object ta1IrnvJedinica: TIntegerField FieldName = 'Jedinica' end object ta1IrnvTip_ira: TIntegerField FieldName = 'Tip_ira' end object ta1IrnvTip_ira_unos: TIntegerField FieldName = 'Tip_ira_unos' end object ta1IrnvcfPartner: TStringField FieldName = 'cfPartner' Size = 60 Calculated = True end object ta1IrnvcfSkladiste: TStringField FieldName = 'cfSkladiste' Size = 60 Calculated = True end object ta1IrnvcfOtpremnica: TStringField FieldName = 'cfOtpremnica' Size = 60 Calculated = True end end object ta1IrnvSt: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'IrnvSt' Left = 881 Top = 366 object ta1IrnvStRecord: TAutoIncField FieldName = 'Record' end object ta1IrnvStGodina: TSmallintField FieldName = 'Godina' end object ta1IrnvStBroj: TIntegerField FieldName = 'Broj' end object ta1IrnvStRedbr: TSmallintField FieldName = 'Redbr' end object ta1IrnvStSifra: TIntegerField FieldName = 'Sifra' end object ta1IrnvStKolicina: TFloatField FieldName = 'Kolicina' DisplayFormat = ',0.000' EditFormat = '0.000' end object ta1IrnvStNc: TFloatField FieldName = 'Nc' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object ta1IrnvStMarza: TFloatField FieldName = 'Marza' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object ta1IrnvStRabat: TFloatField FieldName = 'Rabat' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object ta1IrnvStPorezTb: TSmallintField FieldName = 'PorezTb' end object ta1IrnvStPorezStopa: TFloatField FieldName = 'PorezStopa' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object ta1IrnvStcfSifra: TStringField FieldName = 'cfSifra' Size = 60 Calculated = True end object ta1IrnvStcfJedmj: TStringField FieldName = 'cfJedmj' Calculated = True end object ta1IrnvStcfPc1: TStringField FieldName = 'cfPc1' Calculated = True end object ta1IrnvStcfPc2: TStringField FieldName = 'cfPc2' Calculated = True end object ta1IrnvStcfIznos: TStringField FieldName = 'cfIznos' Calculated = True end end object ta1Zalrob: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'zalRob' Left = 744 Top = 610 object ta1ZalrobRecord: TAutoIncField FieldName = 'Record' end object ta1ZalrobSkladiste: TIntegerField FieldName = 'Skladiste' end object ta1ZalrobSifra: TIntegerField FieldName = 'Sifra' end object ta1ZalrobDatum: TDateField FieldName = 'Datum' end object ta1ZalrobCijena: TFloatField FieldName = 'Cijena' DisplayFormat = ',0.00;;-' EditFormat = '0.00' end object ta1ZalrobStanje: TFloatField FieldName = 'Stanje' DisplayFormat = ',0.000;;-' EditFormat = '0.00' end end object ta1LockRob: TTable DatabaseName = 'praznegod' TableName = '_lockRob' Left = 837 Top = 615 end object ta1LockFakt: TTable DatabaseName = 'praznegod' TableName = '_lockFakt' Left = 833 Top = 670 end object ta1LockPorev: TTable DatabaseName = 'praznegod' TableName = '_lockPorev' Left = 903 Top = 712 end object ta1Ira: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'ira' Left = 1005 Top = 646 object ta1IraRecord: TAutoIncField FieldName = 'Record' end object ta1IraTip: TIntegerField FieldName = 'Tip' end object ta1IraRedbr: TIntegerField FieldName = 'Redbr' end object ta1IraBrojrn: TStringField FieldName = 'Brojrn' Size = 30 end object ta1IraDatum: TDateField FieldName = 'Datum' end object ta1IraPartner: TIntegerField FieldName = 'Partner' end object ta1IraNaziv: TStringField FieldName = 'Naziv' Size = 60 end object ta1IraMatbroj: TStringField FieldName = 'Matbroj' Size = 15 end object ta1IraNapomena: TStringField FieldName = 'Napomena' Size = 60 end object ta1IraIznosRn: TFloatField FieldName = 'IznosRn' DisplayFormat = ',0.00;;-' EditFormat = '0.00' end object ta1IraNepodl: TFloatField FieldName = 'Nepodl' DisplayFormat = ',0.00;;-' EditFormat = '0.00' end object ta1IraOslIzvoz: TFloatField FieldName = 'OslIzvoz' DisplayFormat = ',0.00;;-' EditFormat = '0.00' end object ta1IraOslOstalo: TFloatField FieldName = 'OslOstalo' DisplayFormat = ',0.00;;-' EditFormat = '0.00' end object ta1IraOsnObvez: TFloatField FieldName = 'OsnObvez' DisplayFormat = ',0.00;;-' EditFormat = '0.00' end object ta1IraPorObvez: TFloatField FieldName = 'PorObvez' DisplayFormat = ',0.00;;-' EditFormat = '0.00' end object ta1IraOsnPotr: TFloatField FieldName = 'OsnPotr' DisplayFormat = ',0.00;;-' EditFormat = '0.00' end object ta1IraPorPotr: TFloatField FieldName = 'PorPotr' DisplayFormat = ',0.00;;-' EditFormat = '0.00' end object ta1IracfPartner: TStringField FieldName = 'cfPartner' Size = 66 Calculated = True end end object ta1Jedinice: TTable Tag = 3 DatabaseName = 'praznepar' TableName = 'jedinice' Left = 1047 Top = 608 object ta1JediniceSifra: TIntegerField FieldName = 'Sifra' end object ta1JediniceTip: TSmallintField FieldName = 'Tip' end object ta1JediniceNaziv: TStringField FieldName = 'Naziv' Size = 40 end object ta1JediniceAdresa: TStringField FieldName = 'Adresa' Size = 60 end object ta1JediniceKonto: TStringField FieldName = 'Konto' Size = 10 end object ta1JedinicecfTip: TStringField FieldName = 'cfTip' Calculated = True end end object ta1Roba: TTable Tag = 3 DatabaseName = 'praznepar' TableName = 'roba' Left = 947 Top = 354 object ta1RobaSifra: TIntegerField FieldName = 'Sifra' end object ta1RobaNaziv: TStringField FieldName = 'Naziv' Size = 60 end object ta1RobaOpis: TBlobField FieldName = 'Opis' BlobType = ftFmtMemo end object ta1RobaTip: TSmallintField FieldName = 'Tip' end object ta1RobaKlas: TStringField FieldName = 'Klas' Size = 30 end object ta1RobaJedmj: TSmallintField FieldName = 'Jedmj' end object ta1RobaKatbroj: TStringField FieldName = 'Katbroj' Size = 30 end object ta1RobaEan13: TStringField FieldName = 'Ean13' Size = 13 end object ta1RobaPorez: TSmallintField FieldName = 'Porez' end object ta1RobaOznacen: TSmallintField FieldName = 'Oznacen' end object ta1RobaProizvodjac: TIntegerField FieldName = 'Proizvodjac' end object ta1RobaMinz: TFloatField FieldName = 'Minz' DisplayFormat = '0.000;;-' EditFormat = '0.000' end object ta1RobaMaxz: TFloatField FieldName = 'Maxz' DisplayFormat = '0.000;;-' EditFormat = '0.000' end object ta1RobacfTip: TStringField FieldName = 'cfTip' Calculated = True end object ta1RobacfJedmj: TStringField FieldName = 'cfJedmj' Calculated = True end object ta1RobacfPorez: TStringField FieldName = 'cfPorez' Calculated = True end object ta1RobacfCijena: TFloatField FieldName = 'cfCijena' DisplayFormat = ',0.00;;-' Calculated = True end object ta1RobacfNc: TFloatField FieldName = 'cfNc' DisplayFormat = ',0.00;;-' Calculated = True end object ta1RobacfMarza: TFloatField FieldName = 'cfMarza' DisplayFormat = ',0.00;;-' Calculated = True end object ta1RobacfPorezIznos: TFloatField FieldName = 'cfPorezIznos' DisplayFormat = ',0.00;;-' Calculated = True end object ta1RobacfCijena2: TFloatField FieldName = 'cfCijena2' DisplayFormat = ',0.00;;-' Calculated = True end object ta1RobacfStanje: TFloatField FieldName = 'cfStanje' DisplayFormat = ',0.000;;-' Calculated = True end object ta1RobacfMarzaStopa: TStringField FieldName = 'cfMarzaStopa' Calculated = True end object ta1RobacfCijena1: TStringField FieldName = 'cfCijena1' Calculated = True end end object ta1CjeniciPop: TTable Tag = 3 DatabaseName = 'praznepar' TableName = 'cjeniciPop' Left = 932 Top = 435 object ta1CjeniciPopSifra: TIntegerField FieldName = 'Sifra' end object ta1CjeniciPopNaziv: TStringField FieldName = 'Naziv' Size = 150 end end object ta1Cjenici: TTable Tag = 3 DatabaseName = 'praznepar' TableName = 'Cjenici' Left = 1013 Top = 510 object ta1CjeniciRecord: TAutoIncField FieldName = 'Record' end object ta1CjeniciSifra: TIntegerField FieldName = 'Sifra' end object ta1CjeniciArtikl: TIntegerField FieldName = 'Artikl' end object ta1CjeniciMarzaStopa: TFloatField FieldName = 'MarzaStopa' DisplayFormat = ',0.00####' EditFormat = '0.00####' end object ta1CjeniciCijena1: TFloatField FieldName = 'Cijena1' DisplayFormat = ',0.00####' EditFormat = '0.00####' end end object ta1PrekidPar: TTable Tag = 3 DatabaseName = 'praznepar' TableName = 'prekidPar.db' Left = 1070 Top = 481 object StringField15: TStringField FieldName = 'Prekidac' Size = 40 end object SmallintField19: TSmallintField FieldName = 'Sifra' end object StringField16: TStringField DisplayLabel = 'Opis prekida�a' FieldName = 'Opis_prekidaca' Size = 80 end object StringField17: TStringField FieldName = 'Grupa' end object StringField18: TStringField FieldName = 'Skupina' Size = 10 end object StringField19: TStringField FieldName = 'cfVri_prekidVrijednost' Calculated = True end end object ta1Vri_sif: TTable Tag = 2 DatabaseName = 'Skupne' TableName = 'vri_sif.db' Left = 1011 Top = 434 object ta1Vri_sifSifrarnik: TStringField DisplayLabel = '�ifrarnik' FieldName = 'Sifrarnik' Size = 30 end object ta1Vri_sifSifra: TSmallintField DisplayLabel = '�ifra' FieldName = 'Sifra' end object ta1Vri_sifNaziv: TStringField FieldName = 'Naziv' Size = 50 end object ta1Vri_sifSkr_naziv: TStringField DisplayLabel = 'Skra�eni naziv' FieldName = 'Skr_naziv' Size = 4 end object ta1Vri_sifTip: TSmallintField FieldName = 'Tip' end object ta1Vri_sifKonto: TStringField FieldName = 'Konto' Size = 10 end object ta1Vri_sifTekst: TBlobField FieldName = 'Tekst' BlobType = ftFmtMemo end object ta1Vri_sifZasticen: TBooleanField FieldName = 'Zasticen' end object ta1Vri_sifcfTip: TStringField DisplayLabel = 'Tip dokumenta' FieldName = 'cfTip' Calculated = True end end object ta1Konta: TTable Tag = 2 DatabaseName = 'skupne' TableName = 'konta.db' Left = 813 Top = 502 object ta1KontaSintetika_analitika: TStringField FieldName = 'Sintetika_analitika' Size = 1 end object ta1KontaKonto: TStringField FieldName = 'Konto' Size = 10 end object ta1KontaNaziv: TStringField DisplayWidth = 100 FieldName = 'Naziv' Size = 100 end object ta1KontaPrihod_trosak: TSmallintField FieldName = 'Prihod_trosak' end object ta1KontacfKonto: TStringField DisplayWidth = 120 FieldName = 'cfKonto' Size = 120 Calculated = True end object ta1Kontacfsintetika_analitika: TStringField FieldName = 'cfsintetika_analitika' Calculated = True end object ta1Kontacfprihod_trosak: TStringField FieldName = 'cfprihod_trosak' Calculated = True end object ta1KontaPsDuguje: TFloatField FieldName = 'PsDuguje' end object ta1KontaPsPotrazuje: TFloatField FieldName = 'PsPotrazuje' end object ta1KontaPrDuguje: TFloatField FieldName = 'PrDuguje' end object ta1KontaPrPotrazuje: TFloatField FieldName = 'PrPotrazuje' end object ta1KontaSaDuguje: TFloatField FieldName = 'SaDuguje' end object ta1KontaSaPotrazuje: TFloatField FieldName = 'SaPotrazuje' end end object ta1Partneri: TTable Tag = 2 DatabaseName = 'c:\knjigovodstvo\data\skupne' TableName = 'partneri' TableType = ttParadox Left = 894 Top = 485 object ta1PartneriSifra: TIntegerField DisplayLabel = '�ifra partnera' FieldName = 'Sifra' end object ta1PartneriNaziv: TStringField FieldName = 'Naziv' Size = 60 end object ta1PartneriPtt: TStringField DisplayLabel = 'Po�tanski broj' FieldName = 'Ptt' Size = 5 end object ta1PartneriMjesto: TStringField FieldName = 'Mjesto' Size = 40 end object ta1PartneriUlica: TStringField FieldName = 'Ulica' Size = 60 end object ta1PartneriZemlja: TSmallintField FieldName = 'Zemlja' end object ta1PartneriDjelatnost: TSmallintField FieldName = 'Djelatnost' end object ta1PartneriBanka: TIntegerField FieldName = 'Banka' end object ta1PartneriTelefon: TStringField DisplayLabel = 'Telefoni i faxovi' FieldName = 'Telefon' Size = 50 end object ta1PartneriOpcina: TSmallintField DisplayLabel = 'Op�ina' FieldName = 'Opcina' end object ta1PartneriMaticni_broj: TStringField DisplayLabel = 'Mati�ni broj ili JMBG' FieldName = 'Maticni_broj' Size = 15 end object ta1PartneriZiro_racun1: TStringField DisplayLabel = '�iro-ra�un 1' FieldName = 'Ziro_racun1' Size = 50 end object ta1PartneriZiro_racun2: TStringField DisplayLabel = '�iro-ra�un 2' FieldName = 'Ziro_racun2' Size = 50 end object ta1PartneriRabat: TFloatField DisplayLabel = 'Rabat u veleprodaji' FieldName = 'Rabat' DisplayFormat = '.0000'#39' %'#39 EditFormat = '.0000' end object ta1PartneriPorezni_obveznik: TSmallintField DisplayLabel = 'Porezni obveznik prema PDV-u' FieldName = 'Porezni_obveznik' end object ta1PartnericfPorezni_obveznik: TStringField FieldName = 'cfPorezni_obveznik' Calculated = True end object ta1PartneriMemo: TBlobField FieldName = 'Memo' BlobType = ftFmtMemo end object ta1PartneriFilter: TStringField FieldName = 'Filter' Size = 60 end object ta1PartneriSifra_djelat: TStringField FieldName = 'Sifra_djelat' Size = 10 end object ta1PartneriNaziv_djelat: TStringField FieldName = 'Naziv_djelat' Size = 100 end end object ta1Korisnici: TTable Tag = 2 DatabaseName = 'skupne' TableName = 'korisnici' Left = 936 Top = 618 object ta1KorisniciSifra: TSmallintField FieldName = 'Sifra' end object ta1KorisniciTip_korisnika: TSmallintField FieldName = 'Tip_korisnika' end object ta1KorisniciNaziv: TStringField FieldName = 'Naziv' Size = 50 end object ta1KorisniciLozinka: TStringField FieldName = 'Lozinka' end object ta1KorisnicicfTip_korisnika: TStringField FieldName = 'cfTip_korisnika' Size = 40 Calculated = True end object ta1KorisnicicfLozinka: TStringField FieldName = 'cfLozinka' Calculated = True end end object ta1PorPromet: TTable Tag = 2 DatabaseName = 'skupne' TableName = 'porPromet' Left = 992 Top = 591 object ta1PorPrometSifra: TSmallintField FieldName = 'Sifra' end object ta1PorPrometNaziv: TStringField FieldName = 'Naziv' Size = 80 end object ta1PorPrometStopa: TFloatField FieldName = 'Stopa' DisplayFormat = ',0.0000'#39'%'#39 EditFormat = ',0.0000'#39'%'#39 end object ta1PorPrometKonto: TStringField FieldName = 'Konto' Size = 10 end end object ta1Prekid: TTable Tag = 2 DatabaseName = 'skupne' TableName = 'prekid.db' Left = 849 Top = 432 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 end