object fm2800600KarticeOs: Tfm2800600KarticeOs Left = 259 Top = 226 Width = 800 Height = 551 HelpContext = 280060000 VertScrollBar.Tracking = True Caption = 'fm2800600KarticeOs' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] FormStyle = fsMDIChild Position = poDefaultPosOnly Visible = True OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 14 object paTipke: TPanel Left = 0 Top = 27 Width = 792 Height = 46 Align = alTop ParentShowHint = False ShowHint = True TabOrder = 0 object bbIspis: TBitBtn Left = 5 Top = 3 Width = 87 Height = 20 Hint = 'Poziv prozora sa popisom izvje�taja' Caption = 'Iz&vje�taji' TabOrder = 0 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 = 5 Top = 23 Width = 87 Height = 20 Hint = 'Prekid rada i izlaz iz prozora' Caption = 'I&zlaz' TabOrder = 1 OnClick = bbIzlazClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB 0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB 0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB 0333337F777FFFFF7F3333000000000003333377777777777333} NumGlyphs = 2 Spacing = 2 end object Panel1: TPanel Left = 524 Top = 1 Width = 267 Height = 44 Align = alRight BevelOuter = bvNone TabOrder = 2 object rgRedoslijedStavke: TRadioGroup Left = 139 Top = 4 Width = 120 Height = 37 Caption = 'Redoslijed stavaka po' Items.Strings = ( 'knji�enju') TabOrder = 0 OnClick = rgRedoslijedStavkeClick end object rgRedoslijedGlava: TRadioGroup Left = 6 Top = 3 Width = 124 Height = 37 Caption = 'Redos. sredstava po' Columns = 2 Items.Strings = ( '�ifri' 'nazivu') TabOrder = 1 OnClick = rgRedoslijedGlavaClick end end object cbAutoPrometKartice: TCheckBox Left = 273 Top = 25 Width = 199 Height = 17 Caption = 'Automatski izra�un prometa kartice' State = cbChecked TabOrder = 3 end object cbSamoKarticePromet: TCheckBox Left = 273 Top = 7 Width = 208 Height = 17 Caption = 'Prikaz samo kartica koje imaju promet' TabOrder = 4 OnClick = cbSamoKarticePrometClick end object bbUlazOs: TBitBtn Left = 92 Top = 3 Width = 87 Height = 20 Hint = 'Poziv prozora sa primkama' Caption = 'Ulaz OS-a' TabOrder = 5 OnClick = bbUlazOsClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333FFFFFFFFFFFFFFF000000000000000077777777777777770FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07FFFFFFFFFFFFFF70CCCCCCCCCCCCCC07777777777777777088CCCCCCCCC C8807FF7777777777FF700000000000000007777777777777777333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 end object bbIzlazOs: TBitBtn Left = 92 Top = 23 Width = 87 Height = 20 Hint = 'Popis otpremnica' Caption = 'Izlaz OS-a' TabOrder = 6 OnClick = bbIzlazOsClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00550B30555000 0000557F57F557777777550B305508888880557F57F575555557550B30508888 8805557F57F7FFFFFF75550B300000000055557F5777777777F5550300000000 0055557F777F555F77F555007800000070555F77557F5F7757F5007888000077 70557755557F775557F508888800777770557F555577555557F5088808077777 70557FF5757F555557F5098988077777705577F7557F555557F5999888077777 705577755575F55557550988888077770555775555575FFF7555088888888000 55557F55555577775555088888880755555575F5555F77555555508888075555 5555575FFF775555555555000755555555555577775555555555} NumGlyphs = 2 end object bbRevalOs: TBitBtn Left = 180 Top = 3 Width = 87 Height = 20 Hint = 'Popis izdatnica' Caption = 'Revaloriza' TabOrder = 7 OnClick = bbRevalOsClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333330000000 00003333377777777777333330FFFFFFFFF03FF3F7FFFF33FFF7003000000FF0 00F077F7777773F77737E00FBFBFB0FFFFF07773333FF7FF33F7E0FBFB00000F F0F077F333777773F737E0BFBFBFBFB0FFF077F3333FFFF733F7E0FBFB00000F F0F077F333777773F737E0BFBFBFBFB0FFF077F33FFFFFF733F7E0FB0000000F F0F077FF777777733737000FB0FFFFFFFFF07773F7F333333337333000FFFFFF FFF0333777F3FFF33FF7333330F000FF0000333337F777337777333330FFFFFF 0FF0333337FFFFFF7F37333330CCCCCC0F033333377777777F73333330FFFFFF 0033333337FFFFFF773333333000000003333333377777777333} NumGlyphs = 2 Spacing = 2 end object bbAmortOs: TBitBtn Left = 180 Top = 23 Width = 87 Height = 20 Hint = 'Popis me�usklad�nica' Caption = 'Amortizacija' TabOrder = 8 OnClick = bbAmortOsClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550 305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000 005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0 B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0 B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000 B0557777FF577777F7F500000E055550805577777F7555575755500000555555 05555777775555557F5555000555555505555577755555557555} NumGlyphs = 2 end end object Panel4: TPanel Left = 0 Top = 0 Width = 792 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 DBNavigator1: 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 = 304 Top = 3 Width = 140 Height = 22 Hint = 'Upisivanjem pojedinih znakova �e se pretra�ivati podaci' TabOrder = 2 OnChange = edTraziChange end object cbTrazi: TComboBox Left = 189 Top = 3 Width = 112 Height = 22 Style = csDropDownList ItemHeight = 14 Items.Strings = ( 'naziv sredstva' '�ifru sredstva') TabOrder = 1 end end object sb: TStatusBar Left = 0 Top = 505 Width = 792 Height = 19 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] Panels = < item Text = 'Status' Width = 100 end item Width = 100 end> ParentFont = False SimplePanel = False end object PageControl: TPageControl Left = 0 Top = 73 Width = 792 Height = 432 ActivePage = pageTabela Align = alClient TabOrder = 3 object pageTabela: TTabSheet Hint = 'Tabelarni pregled podataka' Caption = 'T&abelarni prikaz' object Splitter1: TSplitter Left = 0 Top = 0 Width = 3 Height = 220 Cursor = crHSplit end object Splitter2: TSplitter Left = 0 Top = 220 Width = 784 Height = 3 Cursor = crVSplit Align = alBottom end object Splitter3: TSplitter Left = 362 Top = 0 Width = 3 Height = 220 Cursor = crHSplit Align = alRight end object grdStavke: TDBGrid Left = 0 Top = 223 Width = 784 Height = 180 Align = alBottom Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit] ReadOnly = True TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'Arial CE' TitleFont.Style = [] Columns = < item FieldName = 'cfStorniran' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] Title.Caption = 'Storniran' Width = 22 end item FieldName = 'knjizenje' Title.Caption = 'Knji�enje' Width = 34 end item FieldName = 'cfGodina' Title.Caption = 'Godina' Width = 37 end item FieldName = 'cfDatum' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] Title.Caption = 'Datum' Width = 62 end item FieldName = 'cfDokument' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] Title.Caption = 'Dokument' Width = 123 end item FieldName = 'cfBroj' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] Title.Caption = 'Broj' Width = 44 end item Alignment = taRightJustify FieldName = 'ulaz' Title.Alignment = taRightJustify Title.Caption = 'Ulaz' Width = 53 end item Alignment = taRightJustify FieldName = 'izlaz' Title.Alignment = taRightJustify Title.Caption = 'Izlaz' Width = 55 end item Alignment = taRightJustify FieldName = 'cfNV' Title.Alignment = taRightJustify Title.Caption = 'Nabavna vrijednost' Width = 116 end item Alignment = taRightJustify FieldName = 'cfIV' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] Title.Alignment = taRightJustify Title.Caption = 'Amortizacija' Width = 113 end item FieldName = 'cfopisknj' Title.Caption = 'Opis' Width = 225 end> end object Panel2: TPanel Left = 365 Top = 0 Width = 419 Height = 220 Align = alRight TabOrder = 1 object Bevel3: TBevel Left = 7 Top = 19 Width = 405 Height = 106 end object Bevel2: TBevel Left = 12 Top = 37 Width = 196 Height = 17 Shape = bsFrame Style = bsRaised end object Bevel1: TBevel Left = 211 Top = 37 Width = 196 Height = 17 Shape = bsFrame Style = bsRaised end object Label2: TLabel Left = 211 Top = 63 Width = 95 Height = 14 Alignment = taCenter AutoSize = False Caption = 'Nabavna vrijedn.' Color = clGray ParentColor = False end object Label14: TLabel Left = 311 Top = 63 Width = 95 Height = 14 Alignment = taCenter AutoSize = False Caption = 'Amortizacija' Color = clGray ParentColor = False end object Label1: TLabel Left = 12 Top = 63 Width = 93 Height = 14 Alignment = taCenter AutoSize = False Caption = 'Ulaz' Color = clGray ParentColor = False end object Label3: TLabel Left = 110 Top = 63 Width = 95 Height = 14 Alignment = taCenter AutoSize = False Caption = 'Izlaz' Color = clGray ParentColor = False end object Label5: TLabel Left = 297 Top = 38 Width = 26 Height = 14 Caption = 'Iznos' end object Label6: TLabel Left = 95 Top = 38 Width = 37 Height = 14 Caption = 'Koli�ina' end object Label7: TLabel Left = 280 Top = 102 Width = 27 Height = 14 Caption = 'Saldo' end object Label8: TLabel Left = 73 Top = 102 Width = 30 Height = 14 Caption = 'Stanje' end object bbPrometKartice: TBitBtn Left = 13 Top = 8 Width = 113 Height = 23 Hint = 'Ru�no pokrenut izra�un prometa kartice' Caption = '&Promet kartice' ParentShowHint = False ShowHint = False TabOrder = 0 OnClick = bbPrometKarticeClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000 73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998 0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008 0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008 0333337F777777737F333308888888880333337F333333337F33330888888888 03333373FFFFFFFF733333700000000073333337777777773333} NumGlyphs = 2 end object Panel3: TPanel Left = 1 Top = 200 Width = 417 Height = 19 Align = alBottom BevelOuter = bvNone TabOrder = 1 object DBNavigator2: TDBNavigator Left = 234 Top = 0 Width = 183 Height = 19 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 end object lbDug: TStaticText Left = 212 Top = 79 Width = 96 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbDug' TabOrder = 2 end object lbPot: TStaticText Left = 310 Top = 79 Width = 96 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbPot' TabOrder = 3 end object lbIznosSaldo: TStaticText Left = 310 Top = 100 Width = 96 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbIznosSaldo' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 4 end object lbUlaz: TStaticText Left = 12 Top = 79 Width = 96 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbUlaz' TabOrder = 5 end object lbIzlaz: TStaticText Left = 110 Top = 79 Width = 96 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbIzlaz' TabOrder = 6 end object lbKolicinaSaldo: TStaticText Left = 110 Top = 100 Width = 96 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbKolicinaSaldo' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 7 end end object grdGlava: TDBGrid Left = 3 Top = 0 Width = 359 Height = 220 Align = alClient Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgCancelOnExit] TabOrder = 2 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'Arial CE' TitleFont.Style = [] Columns = < item FieldName = 'sifra' Title.Caption = '�ifra' Width = 62 end item FieldName = 'naziv' Title.Caption = 'Naziv' Width = 243 end item FieldName = 'datum_nabave' Title.Caption = 'Datum nabave' Width = 77 end item FieldName = 'datum_isknj' Title.Caption = 'Datum isknji�enja' Width = 75 end> end end end object ta1Os: TTable Tag = 3 DatabaseName = 'c:\knjigovodstvo\data\praznepar' TableName = 'os' Left = 928 Top = 503 object ta1OsSifra: TIntegerField FieldName = 'Sifra' end object ta1OsNaziv: TStringField FieldName = 'Naziv' Size = 60 end object ta1OsAmort: TIntegerField FieldName = 'Amort' end object ta1OsJedinica: TIntegerField FieldName = 'Jedinica' end object ta1OsRucna_reva: TBooleanField FieldName = 'Rucna_reva' end object ta1OsAmort_dane: TBooleanField FieldName = 'Amort_dane' end object ta1OsAmort_god: TBooleanField FieldName = 'Amort_god' end object ta1OsAmort_osnov: TFloatField FieldName = 'Amort_osnov' end object ta1OsDatum_nabave: TDateField FieldName = 'Datum_nabave' end object ta1OsDobavljac: TIntegerField FieldName = 'Dobavljac' end object ta1OsDatum_isknj: TDateField FieldName = 'Datum_isknj' end object ta1OscfAmort: TStringField FieldName = 'cfAmort' Size = 60 Calculated = True end object ta1OscfJedinica: TStringField FieldName = 'cfJedinica' Size = 60 Calculated = True end end object ta1DneOs: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'dneOs' Left = 999 Top = 309 object ta1DneOsKnjizenje: TIntegerField FieldName = 'Knjizenje' end object ta1DneOsDokument: TSmallintField FieldName = 'Dokument' end object ta1DneOsGodina: TSmallintField FieldName = 'Godina' end object ta1DneOsBroj: TIntegerField FieldName = 'Broj' end object ta1DneOsDatum: TDateField FieldName = 'Datum' end object ta1DneOsOpisknj: TStringField FieldName = 'Opisknj' Size = 80 end object ta1DneOsKnjStornirano: TIntegerField FieldName = 'KnjStornirano' end object ta1DneOsDokumTem: TSmallintField FieldName = 'DokumTem' end object ta1DneOsBrojTemeljnice: TSmallintField FieldName = 'BrojTemeljnice' end object ta1DneOscfStorniran: TStringField FieldName = 'cfStorniran' Calculated = True end object ta1DneOscfDokument: TStringField FieldName = 'cfDokument' Size = 100 Calculated = True end end object ta3DneOs: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'dneOs' Left = 993 Top = 425 object ta3DneOsKnjizenje: TIntegerField FieldName = 'Knjizenje' end object ta3DneOsDokument: TSmallintField FieldName = 'Dokument' end object ta3DneOsGodina: TSmallintField FieldName = 'Godina' end object ta3DneOsBroj: TIntegerField FieldName = 'Broj' end object ta3DneOsDatum: TDateField FieldName = 'Datum' end object ta3DneOsOpisknj: TStringField FieldName = 'Opisknj' Size = 80 end object ta3DneOsKnjStornirano: TIntegerField FieldName = 'KnjStornirano' end object ta3DneOsDokumTem: TSmallintField FieldName = 'DokumTem' end object ta3DneOsBrojTemeljnice: TSmallintField FieldName = 'BrojTemeljnice' end object ta3DneOscfStorniran: TStringField FieldName = 'cfStorniran' Calculated = True end object ta3DneOscfDokument: TStringField FieldName = 'cfDokument' Size = 100 Calculated = True end end object ta1StavOs: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'stavOs' Left = 875 Top = 311 object ta1StavOsRecord: TAutoIncField FieldName = 'Record' end object ta1StavOsKnjizenje: TIntegerField FieldName = 'Knjizenje' end object ta1StavOsRedbr: TSmallintField FieldName = 'Redbr' end object ta1StavOsSifra: TIntegerField FieldName = 'Sifra' end object ta1StavOsUlaz: TFloatField FieldName = 'Ulaz' DisplayFormat = ',0.000##' EditFormat = '0.000##' end object ta1StavOsIzlaz: TFloatField FieldName = 'Izlaz' DisplayFormat = ',0.000###;;-' EditFormat = '0.000##' end object ta1StavOsNvDug: TFloatField FieldName = 'NvDug' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta1StavOsNvPot: TFloatField FieldName = 'NvPot' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta1StavOsIvDug: TFloatField FieldName = 'IvDug' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta1StavOsIvPot: TFloatField FieldName = 'IvPot' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta1StavOscfSifra: TStringField FieldName = 'cfSifra' Size = 80 Calculated = True end object ta1StavOscfNv: TCurrencyField FieldName = 'cfNv' DisplayFormat = ',0.00' Calculated = True end object ta1StavOscfIV: TCurrencyField FieldName = 'cfIV' DisplayFormat = ',0.00' Calculated = True end object ta1StavOscfStorniran: TStringField FieldName = 'cfStorniran' Calculated = True end object ta1StavOscfGodina: TIntegerField FieldName = 'cfGodina' Calculated = True end object ta1StavOscfDatum: TDateTimeField FieldName = 'cfDatum' Calculated = True end object ta1StavOscfDokument: TStringField FieldName = 'cfDokument' Size = 100 Calculated = True end object ta1StavOscfBroj: TIntegerField FieldName = 'cfBroj' Calculated = True end object ta1StavOscfOpisknj: TStringField FieldName = 'cfOpisknj' Size = 100 Calculated = True end end object ds1StavOs: TDataSource DataSet = ta1StavOs Left = 929 Top = 312 end object ta2StavOs: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'stavOs' Left = 873 Top = 367 object ta2StavOsRecord: TAutoIncField FieldName = 'Record' end object ta2StavOsKnjizenje: TIntegerField FieldName = 'Knjizenje' end object ta2StavOsRedbr: TSmallintField FieldName = 'Redbr' end object ta2StavOsSifra: TIntegerField FieldName = 'Sifra' end object ta2StavOsUlaz: TFloatField FieldName = 'Ulaz' DisplayFormat = ',0.000##' EditFormat = '0.000##' end object ta2StavOsIzlaz: TFloatField FieldName = 'Izlaz' DisplayFormat = ',0.000###;;-' EditFormat = '0.000##' end object ta2StavOsNvDug: TFloatField FieldName = 'NvDug' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta2StavOsNvPot: TFloatField FieldName = 'NvPot' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta2StavOsIvDug: TFloatField FieldName = 'IvDug' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta2StavOsIvPot: TFloatField FieldName = 'IvPot' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta2StavOscfSifra: TStringField FieldName = 'cfSifra' Size = 80 Calculated = True end object ta2StavOscfNv: TCurrencyField FieldName = 'cfNv' DisplayFormat = ',0.00' Calculated = True end object ta2StavOscfIV: TCurrencyField FieldName = 'cfIV' DisplayFormat = ',0.00' Calculated = True end object ta2StavOscfStorniran: TStringField FieldName = 'cfStorniran' Calculated = True end object ta2StavOscfGodina: TIntegerField FieldName = 'cfGodina' Calculated = True end object ta2StavOscfDatum: TDateTimeField FieldName = 'cfDatum' Calculated = True end object ta2StavOscfDokument: TStringField FieldName = 'cfDokument' Size = 100 Calculated = True end object ta2StavOscfBroj: TIntegerField FieldName = 'cfBroj' Calculated = True end object ta2StavOscfOpisknj: TStringField FieldName = 'cfOpisknj' Size = 100 Calculated = True end end object ds2StavOs: TDataSource DataSet = ta2StavOs Left = 925 Top = 368 end object ta3StavOs: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'stavOs' Left = 873 Top = 423 object ta3StavOsRecord: TAutoIncField FieldName = 'Record' end object ta3StavOsKnjizenje: TIntegerField FieldName = 'Knjizenje' end object ta3StavOsRedbr: TSmallintField FieldName = 'Redbr' end object ta3StavOsSifra: TIntegerField FieldName = 'Sifra' end object ta3StavOsUlaz: TFloatField FieldName = 'Ulaz' DisplayFormat = ',0.000##' EditFormat = '0.000##' end object ta3StavOsIzlaz: TFloatField FieldName = 'Izlaz' DisplayFormat = ',0.000###;;-' EditFormat = '0.000##' end object ta3StavOsNvDug: TFloatField FieldName = 'NvDug' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta3StavOsNvPot: TFloatField FieldName = 'NvPot' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta3StavOsIvDug: TFloatField FieldName = 'IvDug' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta3StavOsIvPot: TFloatField FieldName = 'IvPot' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta3StavOscfSifra: TStringField FieldName = 'cfSifra' Size = 80 Calculated = True end object ta3StavOscfNv: TCurrencyField FieldName = 'cfNv' DisplayFormat = ',0.00' Calculated = True end object ta3StavOscfIV: TCurrencyField FieldName = 'cfIV' DisplayFormat = ',0.00' Calculated = True end object ta3StavOscfStorniran: TStringField FieldName = 'cfStorniran' Calculated = True end object ta3StavOscfGodina: TIntegerField FieldName = 'cfGodina' Calculated = True end object ta3StavOscfDatum: TDateTimeField FieldName = 'cfDatum' Calculated = True end object ta3StavOscfDokument: TStringField FieldName = 'cfDokument' Size = 100 Calculated = True end object ta3StavOscfBroj: TIntegerField FieldName = 'cfBroj' Calculated = True end object ta3StavOscfOpisknj: TStringField FieldName = 'cfOpisknj' Size = 100 Calculated = True end end object ta1Prekid: TTable Tag = 2 DatabaseName = 'skupne' TableName = 'prekid.db' Left = 841 Top = 560 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 ta1Vri_sif: TTable Tag = 2 DatabaseName = 'Skupne' TableName = 'vri_sif.db' Left = 835 Top = 492 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 ta3Os: TTable Tag = 3 DatabaseName = 'c:\knjigovodstvo\data\praznepar' TableName = 'os' Left = 990 Top = 501 object IntegerField1: TIntegerField FieldName = 'Sifra' end object StringField1: TStringField FieldName = 'Naziv' Size = 60 end object IntegerField2: TIntegerField FieldName = 'Amort' end object IntegerField3: TIntegerField FieldName = 'Jedinica' end object BooleanField1: TBooleanField FieldName = 'Rucna_reva' end object BooleanField2: TBooleanField FieldName = 'Amort_dane' end object BooleanField3: TBooleanField FieldName = 'Amort_god' end object FloatField1: TFloatField FieldName = 'Amort_osnov' end object DateField1: TDateField FieldName = 'Datum_nabave' end object IntegerField4: TIntegerField FieldName = 'Dobavljac' end object DateField2: TDateField FieldName = 'Datum_isknj' end object StringField2: TStringField FieldName = 'cfAmort' Size = 60 Calculated = True end object StringField3: TStringField FieldName = 'cfJedinica' Size = 60 Calculated = True end end object ds1Os: TDataSource DataSet = ta1Os Left = 926 Top = 562 end end