object fm5000100Virmani: Tfm5000100Virmani Left = 352 Top = 159 Width = 676 Height = 475 HelpContext = 500010000 VertScrollBar.Tracking = True Caption = 'fm5000100Virmani' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] FormStyle = fsMDIChild KeyPreview = True Position = poDefaultPosOnly Visible = True OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 14 object paTipke: TPanel Left = 0 Top = 27 Width = 668 Height = 58 Align = alTop ParentShowHint = False ShowHint = True TabOrder = 0 object bbUnos: TBitBtn Left = 5 Top = 7 Width = 75 Height = 22 Hint = 'Unos novih podataka | Unos novih podataka u donjem ekranu' Caption = '&Unos' ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = bbUnosClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3 333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0 C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0 F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF 00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333 3333333373FF7333333333333000333333333333377733333333333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 end object bbIzmjena: TBitBtn Left = 5 Top = 30 Width = 75 Height = 22 Hint = 'Izmjena postoje�ih podataka, mijenja se red koji je teku�i u tab' + 'eli tj. ekranu' Caption = '&Izmjena' TabOrder = 1 OnClick = bbIzmjenaClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000 000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F 00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B 0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F 0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF 00333377737FFFFF773333303300000003333337337777777333} NumGlyphs = 2 end object bbBrisanje: TBitBtn Left = 231 Top = 30 Width = 75 Height = 22 Hint = 'Brisanje podataka u teku�em redu u tabeli ili u ekranu' Caption = '&Brisanje' TabOrder = 2 OnClick = bbBrisanjeClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555 555557777F777555F55500000000555055557777777755F75555005500055055 555577F5777F57555555005550055555555577FF577F5FF55555500550050055 5555577FF77577FF555555005050110555555577F757777FF555555505099910 555555FF75777777FF555005550999910555577F5F77777775F5500505509990 3055577F75F77777575F55005055090B030555775755777575755555555550B0 B03055555F555757575755550555550B0B335555755555757555555555555550 BBB35555F55555575F555550555555550BBB55575555555575F5555555555555 50BB555555555555575F555555555555550B5555555555555575} NumGlyphs = 2 end object bbIspis: TBitBtn Left = 156 Top = 30 Width = 75 Height = 22 Hint = 'Ispis podataka u vidu izvje�taja' Caption = 'Iz&vje�taji' TabOrder = 3 OnClick = bbIspisClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 0003377777777777777308888888888888807F33333333333337088888888888 88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F 8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F 8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0 33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033 33333337FFFF7733333333300000033333333337777773333333} NumGlyphs = 2 end object bbSpremi: TBitBtn Left = 80 Top = 7 Width = 75 Height = 22 Hint = 'Spremanje novih podataka u unosu ili podataka koji su mijenjani' Caption = '&Spremi' TabOrder = 4 OnClick = bbSpremiClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070 7700333333337777777733333333008088003333333377F73377333333330088 88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000 000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039 99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999 93337FFFF7737777733300000033333333337777773333333333} NumGlyphs = 2 end object bbOdustani: TBitBtn Left = 156 Top = 7 Width = 75 Height = 22 Hint = 'Odustanak od unosa novih podataka ili mijenjanja postoje�ih' Caption = '&Odustani' TabOrder = 5 OnClick = bbOdustaniClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999 3333333777333777FF3333993333339993333377FF3333377FF3399993333339 993337777FF3333377F3393999333333993337F777FF333337FF993399933333 399377F3777FF333377F993339993333399377F33777FF33377F993333999333 399377F333777FF3377F993333399933399377F3333777FF377F993333339993 399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399 99333773FF3333777733339993333339933333773FFFFFF77333333999999999 3333333777333777333333333999993333333333377777333333} NumGlyphs = 2 end object bbIzlaz: TBitBtn Left = 231 Top = 7 Width = 75 Height = 22 Hint = 'Prekid rada i izlaz iz prozora' Caption = 'I&zlaz' TabOrder = 6 OnClick = bbIzlazClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB 0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB 0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB 0333337F777FFFFF7F3333000000000003333377777777777333} NumGlyphs = 2 end object bbSpremisljedeci: TBitBtn Left = 80 Top = 30 Width = 75 Height = 22 Hint = 'Spremanje novih podataka u unosu ili podataka koji su mijenjani' Caption = 'S&ljede�i' Default = True TabOrder = 7 OnClick = bbSpremisljedeciClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999 3333333777333777FF33339993707399933333773337F3777FF3399933000339 9933377333777F3377F3399333707333993337733337333337FF993333333333 399377F33333F333377F993333303333399377F33337FF333373993333707333 333377F333777F333333993333101333333377F333777F3FFFFF993333000399 999377FF33777F77777F3993330003399993373FF3777F37777F399933000333 99933773FF777F3F777F339993707399999333773F373F77777F333999999999 3393333777333777337333333999993333333333377777333333} NumGlyphs = 2 end object bbPrijenos: TBitBtn Left = 307 Top = 7 Width = 75 Height = 22 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 = 8 OnClick = bbPrijenosClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303 333333333333337FF3333333333333903333333333333377FF33333333333399 03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999 99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999 99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099 03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003 33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333 33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333 3333777777333333333333333333333333333333333333333333} NumGlyphs = 2 end object Panel1: TPanel Left = 540 Top = 1 Width = 127 Height = 56 Align = alRight BevelOuter = bvNone TabOrder = 9 object rgRedoslijed: TRadioGroup Left = 28 Top = 7 Width = 93 Height = 37 Hint = 'Promjena redoslijeda prikaza' Caption = 'Redoslijed po' Items.Strings = ( '�ifri') TabOrder = 0 OnClick = rgRedoslijedClick end end object bbOznaci: TBitBtn Left = 307 Top = 30 Width = 104 Height = 22 Hint = 'Ozna�avenje i deozna�avanje virmana za ispis' Caption = 'Oz&na�i/deozna�i' TabOrder = 10 OnClick = bbOznaciClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 555555555555555555555555555555555555555555FF55555555555559055555 55555555577FF5555555555599905555555555557777F5555555555599905555 555555557777FF5555555559999905555555555777777F555555559999990555 5555557777777FF5555557990599905555555777757777F55555790555599055 55557775555777FF5555555555599905555555555557777F5555555555559905 555555555555777FF5555555555559905555555555555777FF55555555555579 05555555555555777FF5555555555557905555555555555777FF555555555555 5990555555555555577755555555555555555555555555555555} NumGlyphs = 2 Spacing = 0 end object bbKoordinate: TBitBtn Left = 413 Top = 30 Width = 80 Height = 22 Hint = 'Promjena koordinata polja za ispis' Caption = 'Koordinate' TabOrder = 11 OnClick = bbKoordinateClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333FFFFFFFFFFFFFFF000000000000000077777777777777770FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07FFFFFFFFFFFFFF70CCCCCCCCCCCCCC07777777777777777088CCCCCCCCC C8807FF7777777777FF700000000000000007777777777777777333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 end end object Panel4: TPanel Left = 0 Top = 0 Width = 668 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 Label16: TLabel Left = 430 Top = 6 Width = 53 Height = 14 Caption = 'Ozna�eno:' end object lbOznaceno: TLabel Left = 484 Top = 6 Width = 58 Height = 14 Caption = 'lbOznaceno' 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 = 284 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 = 88 Height = 22 Style = csDropDownList ItemHeight = 14 Items.Strings = ( '�ifru virmana') TabOrder = 1 end end object sb: TStatusBar Left = 0 Top = 429 Width = 668 Height = 19 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] Panels = < item Text = 'Status' Width = 100 end item Width = 100 end> ParentFont = False SimplePanel = False end object PageControl: TPageControl Left = 0 Top = 85 Width = 668 Height = 344 ActivePage = pgEkran Align = alClient TabOrder = 3 object pgTabela: TTabSheet Hint = 'Tabelarni pregled podataka' Caption = 'T&abelarni prikaz' object DBGrid1: TDBGrid Left = 0 Top = 0 Width = 660 Height = 315 Align = alClient Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgCancelOnExit] TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'Arial CE' TitleFont.Style = [] OnDrawColumnCell = DBGrid1DrawColumnCell OnDblClick = bbPrijenosClick Columns = < item FieldName = 'sifra' Title.Caption = '�ifra' Width = 104 end item FieldName = 'cfUkorist' Title.Caption = 'U korist' Width = 166 end item FieldName = 'cfSvrha' Title.Caption = 'Svrha' Width = 226 end item FieldName = 'iznos' Title.Caption = 'Iznos' Width = 99 end item FieldName = 'ziroukorist' Title.Caption = '�iro ra�un' Width = 173 end item FieldName = 'cfPozbrojodo' Title.Caption = 'Poziv na broj odobrenja' Width = 197 end item FieldName = 'datum' Title.Caption = 'Datum' end> end end object pgEkran: TTabSheet Cursor = crArrow Hint = 'Ekranski pregled, unos i izmjena podataka' Caption = '&Ekranski prikaz' object scrollBox: TScrollBox Left = 0 Top = 0 Width = 660 Height = 315 HorzScrollBar.Margin = 20 HorzScrollBar.Range = 649 HorzScrollBar.Tracking = True VertScrollBar.Margin = 20 VertScrollBar.Range = 311 VertScrollBar.Tracking = True Align = alClient AutoScroll = False TabOrder = 0 object paUnos: TPanel Left = 10 Top = 4 Width = 639 Height = 301 BevelInner = bvRaised BevelOuter = bvNone TabOrder = 0 object Label1: TLabel Left = 406 Top = 8 Width = 61 Height = 13 Caption = '�ifra virmana' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 54 Top = 34 Width = 70 Height = 12 Caption = '(jedinica zavoda)' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Arial CE' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 10 Top = 52 Width = 144 Height = 14 Caption = 'Knji�ite na teret na�eg ra�una' end object Label5: TLabel Left = 10 Top = 134 Width = 73 Height = 14 Caption = 'Svrha doznake' end object Label6: TLabel Left = 10 Top = 218 Width = 73 Height = 14 Caption = 'U korist ra�una' end object Label7: TLabel Left = 304 Top = 36 Width = 55 Height = 14 Caption = 'broj ra�una' end object Label8: TLabel Left = 582 Top = 36 Width = 43 Height = 12 Caption = 'na�in izvr.' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Arial CE' Font.Style = [] ParentFont = False end object Label9: TLabel Left = 304 Top = 82 Width = 44 Height = 24 Caption = 'poziv na broj zadu�.' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Arial CE' Font.Style = [] ParentFont = False WordWrap = True end object Label10: TLabel Left = 304 Top = 206 Width = 44 Height = 24 Caption = 'poziv na broj odobr.' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Arial CE' Font.Style = [] ParentFont = False WordWrap = True end object Label11: TLabel Left = 416 Top = 152 Width = 11 Height = 14 Caption = 'kn' end object Label12: TLabel Left = 514 Top = 120 Width = 19 Height = 12 Caption = '�ifra' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Arial CE' Font.Style = [] ParentFont = False end object Label13: TLabel Left = 304 Top = 166 Width = 55 Height = 14 Caption = 'broj ra�una' end object Label14: TLabel Left = 322 Top = 246 Width = 31 Height = 14 Caption = 'mjesto' end object Label15: TLabel Left = 490 Top = 246 Width = 29 Height = 14 Caption = 'datum' end object Bevel1: TBevel Left = 292 Top = 48 Width = 7 Height = 239 Shape = bsLeftLine end object lbSifrapartnera: TLabel Left = 86 Top = 204 Width = 57 Height = 12 Caption = '�ifra partnera' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Arial CE' Font.Style = [] ParentFont = False end object deJedinica: TDBEdit Left = 10 Top = 10 Width = 183 Height = 22 TabStop = False DataField = 'jedinica' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] ParentFont = False TabOrder = 1 end object deSifra: TDBEdit Left = 470 Top = 4 Width = 155 Height = 22 DataField = 'sifra' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object deNateret1: TDBEdit Left = 164 Top = 48 Width = 121 Height = 22 TabStop = False DataField = 'nateret1' TabOrder = 2 end object deNateret2: TDBEdit Left = 8 Top = 74 Width = 277 Height = 22 TabStop = False DataField = 'nateret2' TabOrder = 3 end object deNateret3: TDBEdit Left = 8 Top = 98 Width = 277 Height = 22 TabStop = False DataField = 'nateret3' TabOrder = 4 end object deZironateret: TDBEdit Left = 304 Top = 50 Width = 285 Height = 22 TabStop = False DataField = 'zironateret' TabOrder = 12 end object deNacinizvr: TDBEdit Left = 598 Top = 50 Width = 27 Height = 22 TabStop = False DataField = 'nacinizvr' TabOrder = 13 end object dePozbrojzad1: TDBEdit Left = 358 Top = 84 Width = 27 Height = 22 TabStop = False DataField = 'pozbrojzad1' TabOrder = 14 end object dePozbrojzad2: TDBEdit Left = 388 Top = 84 Width = 237 Height = 22 TabStop = False DataField = 'pozbrojzad2' TabOrder = 15 end object deSif1: TDBEdit Left = 536 Top = 114 Width = 27 Height = 22 TabStop = False DataField = 'sif1' TabOrder = 16 end object deSif2: TDBEdit Left = 568 Top = 114 Width = 27 Height = 22 TabStop = False DataField = 'sif2' TabOrder = 17 end object deSif3: TDBEdit Left = 600 Top = 114 Width = 25 Height = 22 TabStop = False DataField = 'sif3' TabOrder = 18 end object deIznos: TDBEdit Left = 430 Top = 148 Width = 195 Height = 22 DataField = 'iznos' TabOrder = 19 end object deZiroukorist: TDBEdit Left = 304 Top = 180 Width = 249 Height = 22 DataField = 'ziroukorist' TabOrder = 20 end object dePozbrojodo1: TDBEdit Left = 354 Top = 208 Width = 29 Height = 22 DataField = 'pozbrojodo1' TabOrder = 21 end object deMjesto: TDBEdit Left = 322 Top = 260 Width = 163 Height = 22 DataField = 'mjesto' TabOrder = 23 end object dePozbrojodo2: TDBEdit Left = 386 Top = 208 Width = 237 Height = 22 DataField = 'pozbrojodo2' TabOrder = 22 end object deDatum: TDBEdit Left = 490 Top = 260 Width = 121 Height = 22 DataField = 'datum' TabOrder = 24 end object deSvrha1: TDBEdit Left = 88 Top = 130 Width = 197 Height = 22 DataField = 'svrha1' TabOrder = 5 end object deSvrha2: TDBEdit Left = 10 Top = 156 Width = 275 Height = 22 DataField = 'svrha2' TabOrder = 6 end object deSvrha3: TDBEdit Left = 10 Top = 182 Width = 275 Height = 22 DataField = 'svrha3' TabOrder = 7 end object deUkorist1: TDBEdit Left = 150 Top = 214 Width = 135 Height = 22 DataField = 'ukorist1' TabOrder = 9 end object deUkorist2: TDBEdit Left = 10 Top = 240 Width = 275 Height = 22 DataField = 'ukorist2' TabOrder = 10 end object deUkorist3: TDBEdit Left = 10 Top = 266 Width = 275 Height = 22 DataField = 'ukorist3' TabOrder = 11 end object btDatum: TButton Left = 613 Top = 264 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 = 25 TabStop = False OnClick = btDatumClick end object btSifraPartnera: TButton Left = 131 Top = 217 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 = btSifraPartneraClick end object edSifraPartnera: TEdit Left = 88 Top = 214 Width = 39 Height = 22 TabOrder = 8 OnChange = edSifraPartneraChange OnKeyPress = edSifraPartneraKeyPress end end end end end object ta1Vri_sif: TTable Tag = 2 DatabaseName = 'Skupne' TableName = 'vri_sif.db' Left = 915 Top = 138 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 ta1Partneri: TTable Tag = 2 DatabaseName = 'c:\knjigovodstvo\data\skupne' TableName = 'partneri' TableType = ttParadox Left = 910 Top = 273 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 ta1Prekid: TTable Tag = 2 DatabaseName = 'skupne' TableName = 'prekid.db' Left = 909 Top = 204 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 ta1Virmani: TTable Tag = 3 DatabaseName = 'c:\knjigovodstvo\data\praznepar' TableName = 'virmani' Left = 910 Top = 343 object ta1VirmaniRecord: TAutoIncField FieldName = 'Record' end object ta1VirmaniSifra: TStringField FieldName = 'Sifra' Size = 30 end object ta1VirmaniOznacen: TSmallintField FieldName = 'Oznacen' end object ta1VirmaniJedinica: TStringField FieldName = 'Jedinica' Size = 25 end object ta1VirmaniNateret1: TStringField FieldName = 'Nateret1' Size = 16 end object ta1VirmaniNateret2: TStringField FieldName = 'Nateret2' Size = 50 end object ta1VirmaniNateret3: TStringField FieldName = 'Nateret3' Size = 50 end object ta1VirmaniZironateret: TStringField FieldName = 'Zironateret' Size = 30 end object ta1VirmaniNacinizvr: TStringField FieldName = 'Nacinizvr' Size = 2 end object ta1VirmaniPozbrojzad1: TStringField FieldName = 'Pozbrojzad1' Size = 2 end object ta1VirmaniPozbrojzad2: TStringField FieldName = 'Pozbrojzad2' Size = 30 end object ta1VirmaniSif1: TStringField FieldName = 'Sif1' Size = 2 end object ta1VirmaniSif2: TStringField FieldName = 'Sif2' Size = 2 end object ta1VirmaniSif3: TStringField FieldName = 'Sif3' Size = 2 end object ta1VirmaniSvrha1: TStringField FieldName = 'Svrha1' Size = 24 end object ta1VirmaniSvrha2: TStringField FieldName = 'Svrha2' Size = 50 end object ta1VirmaniSvrha3: TStringField FieldName = 'Svrha3' Size = 50 end object ta1VirmaniIznos: TFloatField FieldName = 'Iznos' DisplayFormat = ',0.00' EditFormat = '0.00' end object ta1VirmaniUkorist1: TStringField FieldName = 'Ukorist1' Size = 23 end object ta1VirmaniUkorist2: TStringField FieldName = 'Ukorist2' Size = 50 end object ta1VirmaniUkorist3: TStringField FieldName = 'Ukorist3' Size = 50 end object ta1VirmaniZiroukorist: TStringField FieldName = 'Ziroukorist' Size = 30 end object ta1VirmaniPozbrojodo1: TStringField FieldName = 'Pozbrojodo1' Size = 2 end object ta1VirmaniPozbrojodo2: TStringField FieldName = 'Pozbrojodo2' Size = 30 end object ta1VirmaniMjesto: TStringField FieldName = 'Mjesto' Size = 25 end object ta1VirmaniDatum: TDateField FieldName = 'Datum' end object ta1VirmanicfUkorist: TStringField FieldName = 'cfUkorist' Size = 85 Calculated = True end object ta1VirmanicfSvrha: TStringField FieldName = 'cfSvrha' Size = 85 Calculated = True end object ta1VirmanicfPozbrojodo: TStringField FieldName = 'cfPozbrojodo' Size = 27 Calculated = True end end object ds1Virmani: TDataSource DataSet = ta1Virmani Left = 987 Top = 341 end object ta2Virmani: TTable Tag = 3 DatabaseName = 'c:\knjigovodstvo\data\praznepar' TableName = 'virmani' Left = 906 Top = 407 object ta2VirmaniRecord: TAutoIncField FieldName = 'Record' end object ta2VirmaniSifra: TStringField FieldName = 'Sifra' Size = 30 end object ta2VirmaniOznacen: TSmallintField FieldName = 'Oznacen' end object ta2VirmaniJedinica: TStringField FieldName = 'Jedinica' Size = 25 end object ta2VirmaniNateret1: TStringField FieldName = 'Nateret1' Size = 16 end object ta2VirmaniNateret2: TStringField FieldName = 'Nateret2' Size = 50 end object ta2VirmaniNateret3: TStringField FieldName = 'Nateret3' Size = 50 end object ta2VirmaniZironateret: TStringField FieldName = 'Zironateret' Size = 30 end object ta2VirmaniNacinizvr: TStringField FieldName = 'Nacinizvr' Size = 2 end object ta2VirmaniPozbrojzad1: TStringField FieldName = 'Pozbrojzad1' Size = 2 end object ta2VirmaniPozbrojzad2: TStringField FieldName = 'Pozbrojzad2' Size = 30 end object ta2VirmaniSif1: TStringField FieldName = 'Sif1' Size = 2 end object ta2VirmaniSif2: TStringField FieldName = 'Sif2' Size = 2 end object ta2VirmaniSif3: TStringField FieldName = 'Sif3' Size = 2 end object ta2VirmaniSvrha1: TStringField FieldName = 'Svrha1' Size = 24 end object ta2VirmaniSvrha2: TStringField FieldName = 'Svrha2' Size = 50 end object ta2VirmaniSvrha3: TStringField FieldName = 'Svrha3' Size = 50 end object ta2VirmaniIznos: TFloatField FieldName = 'Iznos' DisplayFormat = ',0.00' EditFormat = '0.00' end object ta2VirmaniUkorist1: TStringField FieldName = 'Ukorist1' Size = 23 end object ta2VirmaniUkorist2: TStringField FieldName = 'Ukorist2' Size = 50 end object ta2VirmaniUkorist3: TStringField FieldName = 'Ukorist3' Size = 50 end object ta2VirmaniZiroukorist: TStringField FieldName = 'Ziroukorist' Size = 30 end object ta2VirmaniPozbrojodo1: TStringField FieldName = 'Pozbrojodo1' Size = 2 end object ta2VirmaniPozbrojodo2: TStringField FieldName = 'Pozbrojodo2' Size = 30 end object ta2VirmaniMjesto: TStringField FieldName = 'Mjesto' Size = 25 end object ta2VirmaniDatum: TDateField FieldName = 'Datum' end object ta2VirmanicfUkorist: TStringField FieldName = 'cfUkorist' Size = 85 Calculated = True end object ta2VirmanicfSvrha: TStringField FieldName = 'cfSvrha' Size = 85 Calculated = True end object ta2VirmanicfPozbrojodo: TStringField FieldName = 'cfPozbrojodo' Size = 27 Calculated = True end end object ds2Virmani: TDataSource DataSet = ta2Virmani Left = 1005 Top = 405 end object ta3Virmani: TTable Tag = 3 DatabaseName = 'c:\knjigovodstvo\data\praznepar' TableName = 'virmani' Left = 904 Top = 469 object ta3VirmaniRecord: TAutoIncField FieldName = 'Record' end object ta3VirmaniSifra: TStringField FieldName = 'Sifra' Size = 30 end object ta3VirmaniOznacen: TSmallintField FieldName = 'Oznacen' end object ta3VirmaniJedinica: TStringField FieldName = 'Jedinica' Size = 25 end object ta3VirmaniNateret1: TStringField FieldName = 'Nateret1' Size = 16 end object ta3VirmaniNateret2: TStringField FieldName = 'Nateret2' Size = 50 end object ta3VirmaniNateret3: TStringField FieldName = 'Nateret3' Size = 50 end object ta3VirmaniZironateret: TStringField FieldName = 'Zironateret' Size = 30 end object ta3VirmaniNacinizvr: TStringField FieldName = 'Nacinizvr' Size = 2 end object ta3VirmaniPozbrojzad1: TStringField FieldName = 'Pozbrojzad1' Size = 2 end object ta3VirmaniPozbrojzad2: TStringField FieldName = 'Pozbrojzad2' Size = 30 end object ta3VirmaniSif1: TStringField FieldName = 'Sif1' Size = 2 end object ta3VirmaniSif2: TStringField FieldName = 'Sif2' Size = 2 end object ta3VirmaniSif3: TStringField FieldName = 'Sif3' Size = 2 end object ta3VirmaniSvrha1: TStringField FieldName = 'Svrha1' Size = 24 end object ta3VirmaniSvrha2: TStringField FieldName = 'Svrha2' Size = 50 end object ta3VirmaniSvrha3: TStringField FieldName = 'Svrha3' Size = 50 end object ta3VirmaniIznos: TFloatField FieldName = 'Iznos' DisplayFormat = ',0.00' EditFormat = '0.00' end object ta3VirmaniUkorist1: TStringField FieldName = 'Ukorist1' Size = 23 end object ta3VirmaniUkorist2: TStringField FieldName = 'Ukorist2' Size = 50 end object ta3VirmaniUkorist3: TStringField FieldName = 'Ukorist3' Size = 50 end object ta3VirmaniZiroukorist: TStringField FieldName = 'Ziroukorist' Size = 30 end object ta3VirmaniPozbrojodo1: TStringField FieldName = 'Pozbrojodo1' Size = 2 end object ta3VirmaniPozbrojodo2: TStringField FieldName = 'Pozbrojodo2' Size = 30 end object ta3VirmaniMjesto: TStringField FieldName = 'Mjesto' Size = 25 end object ta3VirmaniDatum: TDateField FieldName = 'Datum' end object ta3VirmanicfUkorist: TStringField FieldName = 'cfUkorist' Size = 85 Calculated = True end object ta3VirmanicfSvrha: TStringField FieldName = 'cfSvrha' Size = 85 Calculated = True end object ta3VirmanicfPozbrojodo: TStringField FieldName = 'cfPozbrojodo' Size = 27 Calculated = True end end object ta1LockSkupnePar: TTable DatabaseName = 'praznepar' TableName = '_lockSkupnePar' Left = 1003 Top = 233 end end