home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BUG 11
/
BUGCD1998_02.ISO
/
aplic
/
trade
/
_setup.1
/
main.exe
/
0
/
RCDATA
/
TULAZNAFAKTURAKOMISIJA
/
TULAZNAFAKTURAKOMISIJA.txt
Wrap
Text File
|
1998-01-05
|
121KB
|
4,036 lines
object UlaznaFakturaKomisija: TUlaznaFakturaKomisija
Tag = 1
Left = 148
Top = 87
ActiveControl = gTable
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Primke za robu na komisiji'
ClientHeight = 453
ClientWidth = 632
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
Position = poScreenCenter
OnCloseQuery = FormCloseQuery
OnHide = FormHide
OnKeyDown = FormKeyDown
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Book: TNotebook
Tag = 1
Left = 0
Top = 0
Width = 632
Height = 453
Align = alClient
TabOrder = 0
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Zaglavlje'
object Bevel3: TBevel
Left = 152
Top = 308
Width = 5
Height = 45
Shape = bsLeftLine
end
object Bevel24: TBevel
Left = 324
Top = 308
Width = 5
Height = 45
Shape = bsLeftLine
end
object Bevel4: TBevel
Left = 548
Top = 264
Width = 5
Height = 45
Shape = bsLeftLine
end
object Bevel7: TBevel
Left = 472
Top = 308
Width = 5
Height = 45
Shape = bsLeftLine
end
object Bevel8: TBevel
Left = 280
Top = 264
Width = 5
Height = 45
Shape = bsRightLine
end
object Bevel12: TBevel
Left = 364
Top = 220
Width = 5
Height = 45
Shape = bsRightLine
end
object Bevel1: TBevel
Left = 177
Top = 172
Width = 4
Height = 49
Shape = bsLeftLine
end
object Bevel2: TBevel
Left = 80
Top = 172
Width = 4
Height = 49
Style = bsRaised
end
object Bevel11: TBevel
Left = 4
Top = 264
Width = 625
Height = 5
Shape = bsTopLine
end
object Bevel14: TBevel
Left = 4
Top = 308
Width = 625
Height = 5
Shape = bsTopLine
end
object Bevel56: TBevel
Left = 4
Top = 352
Width = 625
Height = 5
Shape = bsTopLine
end
object Bevel15: TBevel
Left = 4
Top = 172
Width = 625
Height = 49
Shape = bsFrame
end
object Bevel6: TBevel
Left = 4
Top = 172
Width = 625
Height = 226
Shape = bsFrame
end
object Bevel58: TBevel
Left = 320
Top = 396
Width = 5
Height = 53
Shape = bsLeftLine
end
object Bevel57: TBevel
Left = 164
Top = 396
Width = 5
Height = 53
Shape = bsLeftLine
end
object Bevel21: TBevel
Left = 180
Top = 354
Width = 5
Height = 43
Shape = bsLeftLine
end
object Bojano: TShape
Left = 7
Top = 175
Width = 72
Height = 44
Brush.Color = clRed
Pen.Style = psClear
end
object Label21: TLabel
Left = 13
Top = 177
Width = 58
Height = 13
Caption = 'Primka br.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Bevel59: TBevel
Left = 4
Top = 396
Width = 481
Height = 53
Shape = bsFrame
end
object Label1: TLabel
Left = 12
Top = 176
Width = 58
Height = 13
Caption = 'Primka br.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label2: TLabel
Left = 92
Top = 176
Width = 75
Height = 13
Caption = 'Datum knji�enja'
FocusControl = EditDatumKnj
end
object Label15: TLabel
Left = 164
Top = 312
Width = 77
Height = 13
Caption = 'Iznos reversa'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 376
Top = 224
Width = 98
Height = 13
Caption = 'Org. jed. dobavlja�a:'
end
object Label4: TLabel
Left = 188
Top = 176
Width = 57
Height = 13
Caption = 'Skladi�te:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object DBText2: TMyDBText
Left = 340
Top = 176
Width = 281
Height = 13
DataField = 'Naziv'
DataSource = DataUfa2.sPart
end
object DBText37: TMyDBText
Left = 340
Top = 190
Width = 281
Height = 13
DataField = 'Mjesto'
DataSource = DataUfa2.sPart
end
object DBText41: TMyDBText
Left = 340
Top = 204
Width = 281
Height = 13
DataField = 'UlicaBroj'
DataSource = DataUfa2.sPart
end
object Label12: TLabel
Left = 12
Top = 312
Width = 102
Height = 13
Caption = 'Na�a zahtjevnica broj'
FocusControl = EditNarudzbaBr
end
object Label3: TLabel
Left = 12
Top = 268
Width = 69
Height = 13
Caption = 'Datum reversa'
FocusControl = EditDatumDok
end
object Label6: TLabel
Left = 96
Top = 268
Width = 124
Height = 13
Caption = 'Revers od dobavlja�a broj'
end
object Label7: TLabel
Left = 372
Top = 268
Width = 144
Height = 13
Caption = 'Otpremnica od dobavlja�a broj'
FocusControl = EditOtpremnicaBr
end
object Label9: TLabel
Left = 292
Top = 268
Width = 67
Height = 13
Caption = 'Datum DVO'
FocusControl = EditDatumDVO
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 556
Top = 268
Width = 63
Height = 13
Caption = 'Rok pla�anja'
FocusControl = EditRokPlacanja
end
object Dani: TLabel
Left = 596
Top = 288
Width = 24
Height = 13
Caption = 'dana'
end
object Label14: TLabel
Left = 484
Top = 312
Width = 105
Height = 13
Caption = 'Ostali tro�kovi nabave'
end
object Label18: TLabel
Left = 336
Top = 312
Width = 93
Height = 13
Caption = 'Transportni tro�kovi'
end
object Label20: TLabel
Left = 12
Top = 356
Width = 93
Height = 13
Caption = 'Konto dobavlja� (P)'
end
object TrosakLabel: TLabel
Left = 224
Top = 376
Width = 43
Height = 13
Caption = '% duguje'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clGray
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label13: TLabel
Left = 120
Top = 400
Width = 42
Height = 13
Caption = 'u iznosu.'
end
object Label103: TLabel
Left = 56
Top = 400
Width = 8
Height = 13
Caption = ' i '
end
object Label91: TLabel
Left = 296
Top = 176
Width = 37
Height = 13
Caption = 'Vlasnik:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label106: TLabel
Left = 8
Top = 432
Width = 28
Height = 13
Caption = 'Unos:'
end
object Label151: TLabel
Left = 436
Top = 376
Width = 22
Height = 13
Caption = 'Potr.'
end
object Label11: TLabel
Left = 12
Top = 226
Width = 68
Height = 13
Caption = 'Roba se unosi'
end
object DBText45: TMyDBText
Left = 12
Top = 244
Width = 349
Height = 15
DataField = 'Naziv'
DataSource = DataUfa2.sSkladiste
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 232
Top = 226
Width = 115
Height = 13
Caption = 'sva ide na isto skladi�te:'
end
object xImaRabat2: TDBChecker
Left = 584
Top = 244
Width = 13
Height = 13
TabStop = False
Caption = 'xImaRabat2'
DataField = 'ImaRabat2'
DataSource = DataUfa2.sGlava
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xImaRabat2Change
OnClick = xImaRabat2Change
end
object xRabat2Kolicina: TDBChecker
Left = 600
Top = 244
Width = 13
Height = 13
TabStop = False
Caption = 'xRabat2Kolicina'
DataField = 'Rabat2Kolicina'
DataSource = DataUfa2.sGlava
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 8
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xImaRabat2Change
OnClick = xImaRabat2Change
end
object Knjizeno: TDBEdit
Left = 56
Top = 196
Width = 13
Height = 13
AutoSize = False
DataField = 'Knjizeno'
DataSource = DataUfa2.sCodes
TabOrder = 40
OnChange = KnjizenoChange
end
object StavkeButton: TBitBtn
Left = 488
Top = 400
Width = 93
Height = 25
Caption = 'Stavke'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 35
OnClick = StavkeButtonClick
Glyph.Data = {
76020000424D7602000000000000760000002800000040000000100000000100
0400000000000002000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333393333333333333333333333333333333FF333333333333333333
333333333339093333333333333333333333333333F888F33333333333333333
333333333990F0933333333333333333333333333888388F3333333333333333
33333333990F0F0933333333333FF333333333338F838388F333333333003333
3333333900FFF0F09333333333883FF3333333F8883338388F333333330A0033
33333990FFFFFF0F09333333338F883FF33338883F33338388F33333330AAA00
3333990F0FFFFFF0F0933FFFFF8F33883FF38F8383F33338388F0000000AAAAA
003390FFF0FFFFFF0F09888888833333883F8833383F333383880AAAAAAAAAAA
AA030FFFFF0FFFFFF0F08FFFFFFF33333F8883F33383F33338380000000AAAAA
003330FFFFF0FFFFFF038888888F333F8833383F33383F333F833333330AAA00
3333330FFFFF0FFF00333333338F3F8833333383F33383FF88333333330A0033
33333330FFFFF00033333333338F8833333333383F3338883333333333003333
333333330FFF033333333333338833333333333383FF83333333333333333333
3333333330003333333333333333333333333333388833333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object PrintBtn: TBitBtn
Left = 580
Top = 400
Width = 45
Height = 25
TabOrder = 36
OnClick = PrintBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
object CalcBtn: TBitBtn
Left = 488
Top = 424
Width = 29
Height = 25
TabOrder = 37
OnClick = KnjiziUFUClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object ZapisiButton: TBitBtn
Left = 516
Top = 424
Width = 73
Height = 25
Caption = 'Primka'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 38
OnClick = ZapisiButtonClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
end
object gTable: TMyDBGrid
Tag = 1
Left = 4
Top = 6
Width = 621
Height = 161
FindByName = True
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete]
ParentFont = False
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnSpace = KnjiziUFUClick
OnCtrlSpace = KnjiziSveUFEClick
end
object eSifra: TDBKeyField
Left = 12
Top = 192
Width = 61
Height = 20
AutoSize = False
Ctl3D = True
DataField = 'BROJUFE'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentCtl3D = False
ParentFont = False
TabOrder = 1
DisplayName = 'Broj Primke na komisiju'
OnNew = eSifraNew
OnRename = eSifraRename
end
object EditDatumKnj: TDBVar
Left = 92
Top = 192
Width = 77
Height = 20
AutoSize = False
DataField = 'DatumKnj'
DataSource = DataUfa2.sGlava
TabOrder = 2
OnExitChanged = EditDatumKnjExitChanged
end
object EditIznos: TDBVar
Left = 160
Top = 328
Width = 157
Height = 20
AutoSize = False
DataField = 'Iznos'
DataSource = DataUfa2.sGlava
TabOrder = 15
end
object eOrgJed: TDBLookupField
Left = 376
Top = 240
Width = 101
Height = 21
DataField = 'ORGJEDDOB'
DataSource = DataUfa2.sGlava
LookupSource = DataUfa2.sOrgJed
LookupDisplay = 'SIFRA'
LookupField = 'CODE'
TabOrder = 5
DisplayName = '�ifra organizacijske jedinice'
OnF2Press = OrgJed_F2
end
object Dobavljac: TDBJustLookup
Left = 188
Top = 192
Width = 145
Height = 21
DataField = 'SKLADISTE'
DataSource = DataUfa2.sGlava
LookupSource = DataUfa2.sSkladiste
LookupDisplay = 'SIFRA'
LookupField = 'CODE'
TabOrder = 3
DisplayName = '�ifra komisionog skladi�ta'
OnExitChanged = DobavljacExitChanged
OnF2Press = Skladiste_F2
end
object EditNarudzbaBr: TDBVar
Left = 12
Top = 328
Width = 133
Height = 21
AutoSize = False
DataField = 'ZahtjevBr'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 14
end
object EditDatumDok: TDBVar
Left = 12
Top = 284
Width = 73
Height = 20
AutoSize = False
DataField = 'DatumDok'
DataSource = DataUfa2.sGlava
TabOrder = 9
OnExitChanged = EditDatumDokExitChanged
end
object EditOtpremnicaBr: TDBVar
Left = 372
Top = 284
Width = 169
Height = 20
AutoSize = False
DataField = 'OtpremnicaBr'
DataSource = DataUfa2.sGlava
TabOrder = 12
end
object EditDatumDVO: TDBVar
Left = 292
Top = 284
Width = 69
Height = 20
AutoSize = False
DataField = 'DatumDVO'
DataSource = DataUfa2.sGlava
TabOrder = 11
end
object EditRokPlacanja: TDBVar
Left = 556
Top = 284
Width = 37
Height = 20
AutoSize = False
DataField = 'RokPlacanja'
DataSource = DataUfa2.sGlava
TabOrder = 13
OnChange = EditRokPlacanjaChange
end
object EditRacunBr: TDBVar
Left = 96
Top = 284
Width = 181
Height = 20
AutoSize = False
DataField = 'ReversBr'
DataSource = DataUfa2.sGlava
TabOrder = 10
end
object eTransTros: TDBVar
Left = 332
Top = 328
Width = 133
Height = 20
AutoSize = False
DataField = 'Transport'
DataSource = DataUfa2.sGlava
TabOrder = 16
OnChange = TrosakNaStavkeChanged
OnExitChanged = TrosakNaStavke
end
object eOstaliTros: TDBVar
Left = 484
Top = 328
Width = 137
Height = 20
AutoSize = False
DataField = 'OstaliTroskovi'
DataSource = DataUfa2.sGlava
TabOrder = 17
OnChange = TrosakNaStavkeChanged
OnExitChanged = TrosakNaStavke
end
object eKonto: TDBLookupField
Left = 12
Top = 372
Width = 65
Height = 21
DataField = 'KONTO'
DataSource = DataUfa2.sGlava
LookupSource = DataUfa2.sKonto
LookupDisplay = 'KONTO'
LookupField = 'CODE'
TabOrder = 18
DisplayName = 'Konto dobavlja�'
OnF2Press = KontniPlan_F2
end
object nKonto: TDBName
Tag = 55
Left = 76
Top = 372
Width = 101
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
Ctl3D = True
DataField = 'Naziv'
DataSource = DataUfa2.sKonto
ParentCtl3D = False
TabOrder = 19
end
object NaTrosak: TDBChecker
Left = 184
Top = 356
Width = 249
Height = 13
TabStop = False
Caption = 'Dio tro�kova nabave knji�i se direktno na tro�ak:'
DataField = 'TrosakDirekt'
DataSource = DataUfa2.sGlava
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 20
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = NaTrosakChange
OnClick = NaTrosakChange
end
object eKontoTros: TDBLookupField
Left = 272
Top = 372
Width = 61
Height = 21
TabStop = False
DataField = 'KONTOTROSKA'
DataSource = DataUfa2.sGlava
LookupSource = DataUfa2.sKonto3
LookupDisplay = 'KONTO'
LookupField = 'CODE'
Color = clBtnFace
Enabled = False
TabOrder = 23
DisplayName = 'Konto '
OnF2Press = KontniPlan_F2
end
object nKontoTros: TDBName
Tag = 55
Left = 332
Top = 372
Width = 101
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
Ctl3D = True
DataField = 'Naziv'
DataSource = DataUfa2.sKonto3
ParentCtl3D = False
TabOrder = 24
end
object eStopaTros: TDBVar
Left = 184
Top = 372
Width = 37
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'StopaTroska'
DataSource = DataUfa2.sGlava
TabOrder = 22
OnChange = TrosakNaStavkeChanged
OnExitChanged = tUfaStopaTroskaValidate
end
object xSifreDob: TDBChecker
Left = 88
Top = 226
Width = 141
Height = 13
Caption = 'po dobavlja�evim �iframa,'
DataField = 'SifreDobavljaca'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xSifreDobChange
OnClick = xSifreDobChange
end
object nOrgJed: TDBName
Tag = 55
Left = 476
Top = 240
Width = 143
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Naziv'
DataSource = DataUfa2.sOrgJed
TabOrder = 6
end
object xRabatIznos: TDBChecker
Left = 8
Top = 400
Width = 49
Height = 13
Caption = 'Rabat'
DataField = 'RabatIznos'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 27
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xRabatIznosChange
OnClick = xRabatIznosChange
end
object xMarzaIznos: TDBChecker
Left = 68
Top = 400
Width = 53
Height = 13
Caption = 'mar�a'
DataField = 'MarzaIznos'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 28
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xMarzaIznosChange
OnClick = xMarzaIznosChange
end
object xVeceKolicine: TDBChecker
Left = 8
Top = 416
Width = 153
Height = 13
TabStop = False
Caption = 'Uzimamo ve�e koli�ine robe.'
DataField = 'VeceKolicine'
DataSource = DataUfa2.sGlava
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 29
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xImaRabat2Change
OnClick = xImaRabat2Change
end
object xTrosakMod: TDBChecker
Left = 436
Top = 356
Width = 191
Height = 13
TabStop = False
Caption = 'Tro�kovi mogu varirati po stavkama.'
DataField = 'TrosakMod'
DataSource = DataUfa2.sGlava
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 21
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xTrosakModChange
end
object xFVchange: TDBChecker
Left = 40
Top = 432
Width = 35
Height = 13
Caption = 'FV'
DataField = 'PodesiFV'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 30
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xFVchangeChange
end
object xVPCchange: TDBChecker
Left = 76
Top = 432
Width = 43
Height = 13
Caption = 'VPC'
DataField = 'PodesiVPC'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 31
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xVPCchangeChange
end
object eKontoTrosakD: TDBLookupField
Left = 460
Top = 372
Width = 65
Height = 21
TabStop = False
DataField = 'KONTOTROSKAD'
DataSource = DataUfa2.sGlava
LookupSource = DataUfa2.sKonto2
LookupDisplay = 'KONTO'
LookupField = 'CODE'
Color = clBtnFace
Enabled = False
TabOrder = 25
DisplayName = 'Konto obra�unatih tro�kova'
OnF2Press = KontniPlan_F2
end
object nKontoTrosakD: TDBName
Tag = 55
Left = 524
Top = 372
Width = 99
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
Ctl3D = True
DataField = 'Naziv'
DataSource = DataUfa2.sKonto2
ParentCtl3D = False
TabOrder = 26
end
object xMPChange: TDBChecker
Left = 120
Top = 432
Width = 43
Height = 13
Caption = 'MPC'
DataField = 'PodesiMPC'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 32
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xMPChangeChange
end
object RabatBook: TNotebook
Left = 168
Top = 400
Width = 149
Height = 45
TabOrder = 33
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'U postotku'
object Label138: TLabel
Left = 136
Top = 24
Width = 8
Height = 13
Caption = '%'
end
object Label139: TLabel
Left = 56
Top = 24
Width = 20
Height = 13
Caption = '% +'
end
object iRabat2: TDBVar
Left = 78
Top = 20
Width = 55
Height = 20
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Rabat2'
DataSource = DataUfa2.sGlava
Enabled = False
TabOrder = 3
end
object iRabat1: TDBVar
Left = 2
Top = 20
Width = 51
Height = 20
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Rabat1'
DataSource = DataUfa2.sGlava
TabOrder = 2
end
object xIstiRabat: TDBChecker
Left = 4
Top = 4
Width = 93
Height = 13
Caption = 'Prijedlog rabata'
DataField = 'IstiRabat'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xIstiRabatChange
OnClick = xIstiRabatChange
end
object xRabatMod: TDBChecker
Left = 102
Top = 4
Width = 47
Height = 13
TabStop = False
Caption = 'varira'
DataField = 'RabatMod'
DataSource = DataUfa2.sGlava
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xRabatIznosChange
OnClick = xRabatIznosChange
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'U iznosu'
object iRabatIznos: TDBVar
Left = 6
Top = 20
Width = 135
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'RabatI'
DataSource = DataUfa2.sGlava
TabOrder = 2
end
object xIstiRabatI: TDBChecker
Left = 4
Top = 4
Width = 91
Height = 13
Caption = 'Rabat ukupno'
DataField = 'IstiRabat'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xIstiRabatIChange
OnClick = xIstiRabatIChange
end
object xRabatModI: TDBChecker
Left = 96
Top = 4
Width = 49
Height = 13
TabStop = False
Caption = 'varira.'
DataField = 'RabatMod'
DataSource = DataUfa2.sGlava
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xRabatIznosChange
OnClick = xRabatIznosChange
end
end
end
object MarzaBook: TNotebook
Left = 324
Top = 400
Width = 157
Height = 45
TabOrder = 34
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'U postotku'
object Label140: TLabel
Left = 142
Top = 24
Width = 8
Height = 13
Caption = '%'
end
object MarzaLabel: TLabel
Left = 55
Top = 24
Width = 40
Height = 13
Alignment = taRightJustify
Caption = '+ mar�a'
Font.Charset = DEFAULT_CHARSET
Font.Color = clGray
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object iRUC: TDBVar
Left = 100
Top = 20
Width = 41
Height = 20
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Marza'
DataSource = DataUfa2.sGlava
TabOrder = 3
end
object xUzmiRabat: TDBChecker
Left = 4
Top = 22
Width = 49
Height = 17
TabStop = False
Caption = 'Rabat'
DataField = 'UzmiRabat'
DataSource = DataUfa2.sGlava
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object xIstiRUC: TDBChecker
Left = 4
Top = 4
Width = 97
Height = 13
Caption = 'Prijedlog RUC-a'
DataField = 'IstaMarza'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xIstiRUCChange
OnClick = xIstiRUCChange
end
object xRucMod: TDBChecker
Left = 104
Top = 4
Width = 45
Height = 13
TabStop = False
Caption = 'varira'
DataField = 'MarzaMod'
DataSource = DataUfa2.sGlava
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xMarzaIznosChange
OnClick = xMarzaIznosChange
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'U iznosu'
object iRucIznos: TDBVar
Left = 8
Top = 20
Width = 137
Height = 20
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'MarzaI'
DataSource = DataUfa2.sGlava
TabOrder = 2
end
object xIstiRUCI: TDBChecker
Left = 8
Top = 4
Width = 87
Height = 13
Caption = 'RUC ukupno'
DataField = 'IstaMarza'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xIstiRUCIChange
OnClick = xIstiRUCIChange
end
object xRucModI: TDBChecker
Left = 96
Top = 4
Width = 49
Height = 13
TabStop = False
Caption = 'varira.'
DataField = 'MarzaMod'
DataSource = DataUfa2.sGlava
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xMarzaIznosChange
OnClick = xMarzaIznosChange
end
end
end
object CalcBtn2: TBitBtn
Left = 588
Top = 424
Width = 37
Height = 25
TabOrder = 39
OnClick = KnjiziSveUFEClick
Glyph.Data = {
F6010000424DF601000000000000760000002800000030000000100000000100
0400000000008001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00380000000008
333330333333338888888883F333338F333330777777777033333033333338F3
F3F3FFF8F3333383F33330707079997033330903333338F838388838F33338F8
F33330777777777033330903333338F3F3F3F3F8F33338383F33307070707070
33309990333338F838383838F3338F338F3330777777777033309990333338F3
F3F3F3F8F333833383F330707070707033099999033338F838383838F338F333
38F330777777777033099999033338F3F3F3F3F8F3383333383F307070707070
30999999903338F838383838F38FFFF3FF8F30777777777030000900003338F3
FFFFFFF8F38888F8888330700000007033330903333338F8888888F8F33338F8
F333307000E0E07033330903333338F8FFFFF8F8F33338F8F333307000000070
33330903333338F888888838F33338F8F33330777777777033330903333338F3
33333338F33338F8F333307777777770333309033333383FFFFFFFF8333338F8
F333380000000008333300033333338888888883333338883333}
NumGlyphs = 2
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Stavke'
object Bevel17: TBevel
Left = 4
Top = 76
Width = 205
Height = 373
Shape = bsFrame
end
object Bevel23: TBevel
Left = 8
Top = 342
Width = 197
Height = 5
Shape = bsTopLine
Style = bsRaised
end
object Bevel30: TBevel
Left = 8
Top = 428
Width = 197
Height = 17
end
object Bevel53: TBevel
Left = 476
Top = 4
Width = 153
Height = 69
end
object Bevel48: TBevel
Left = 8
Top = 80
Width = 197
Height = 53
Shape = bsFrame
Style = bsRaised
end
object Bevel47: TBevel
Left = 216
Top = 30
Width = 253
Height = 17
end
object Bevel43: TBevel
Left = 212
Top = 10
Width = 261
Height = 61
Shape = bsFrame
end
object Bevel18: TBevel
Left = 4
Top = 2
Width = 205
Height = 37
Shape = bsFrame
end
object Bevel9: TBevel
Left = 101
Top = 4
Width = 3
Height = 33
end
object Bevel5: TBevel
Left = 4
Top = 42
Width = 97
Height = 29
Shape = bsFrame
end
object BrojUfe: TMyDBText
Left = 44
Top = 50
Width = 53
Height = 13
DataField = 'BrojUFE'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Bevel16: TBevel
Left = 104
Top = 42
Width = 105
Height = 29
Shape = bsFrame
end
object DBText5: TMyDBText
Left = 8
Top = 22
Width = 89
Height = 13
Alignment = taCenter
DataField = 'Sifra'
DataSource = DataUfa2.sPartner
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label22: TLabel
Left = 108
Top = 50
Width = 34
Height = 13
Caption = 'Stavka'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label24: TLabel
Left = 6
Top = 6
Width = 95
Height = 13
Alignment = taCenter
AutoSize = False
Caption = '�ifra dobavlja�a'
end
object Label17: TLabel
Left = 108
Top = 6
Width = 97
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Konto dobavlja� (P)'
end
object DBText6: TMyDBText
Left = 116
Top = 22
Width = 81
Height = 13
Alignment = taCenter
DataField = 'Konto'
DataSource = DataUfa2.sKonto
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label67: TLabel
Left = 236
Top = 14
Width = 66
Height = 13
Alignment = taRightJustify
Caption = 'Iznos reversa:'
end
object Label68: TLabel
Left = 220
Top = 32
Width = 82
Height = 13
Alignment = taRightJustify
Caption = 'Knji�eni iznos:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Shape3: TShape
Left = 304
Top = 50
Width = 165
Height = 17
Pen.Width = 2
end
object Label70: TLabel
Left = 215
Top = 52
Width = 87
Height = 13
Caption = 'Preostaje za unos:'
end
object DBText8: TMyDBText
Left = 64
Top = 430
Width = 137
Height = 13
Alignment = taRightJustify
DataField = 'Vrijednost'
DataSource = DataUfa2.sStavke
end
object DBText4: TMyDBText
Left = 12
Top = 84
Width = 189
Height = 45
DataField = 'Naziv'
DataSource = DataUfa2.sSkladiste
WordWrap = True
end
object Label28: TLabel
Left = 12
Top = 380
Width = 37
Height = 13
Alignment = taRightJustify
Caption = 'Koli�ina'
end
object JedMjere: TMyDBText
Left = 156
Top = 378
Width = 49
Height = 17
DataField = 'Naziv'
DataSource = DataUfa2.sMjere
end
object Label29: TLabel
Left = 12
Top = 404
Width = 36
Height = 13
Alignment = taRightJustify
Caption = 'Cijena'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object DBText10: TMyDBText
Left = 156
Top = 404
Width = 49
Height = 17
DataField = 'Cij'
DataSource = DataUfa2.sValuta
end
object Label43: TLabel
Left = 12
Top = 430
Width = 49
Height = 13
Alignment = taRightJustify
Caption = 'Vrijednost:'
end
object Label100: TLabel
Left = 12
Top = 356
Width = 37
Height = 13
Caption = 'Min.kol.'
end
object DBText36: TMyDBText
Left = 304
Top = 14
Width = 161
Height = 15
Alignment = taRightJustify
DataField = 'Iznos'
DataSource = DataUfa2.sGlava
end
object DBText38: TMyDBText
Left = 304
Top = 32
Width = 161
Height = 13
Alignment = taRightJustify
DataField = 'Vrijednost'
DataSource = DataUfa2.sGlava
end
object DBText30: TMyDBText
Left = 308
Top = 52
Width = 157
Height = 13
Alignment = taRightJustify
DataField = 'Razlika'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Bevel44: TBevel
Left = 480
Top = 20
Width = 145
Height = 17
Shape = bsFrame
Style = bsRaised
end
object Bevel52: TBevel
Left = 480
Top = 52
Width = 145
Height = 17
Shape = bsFrame
Style = bsRaised
end
object DBText43: TMyDBText
Left = 484
Top = 22
Width = 137
Height = 13
Alignment = taRightJustify
Color = clBtnFace
DataField = 'Transport'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label23: TLabel
Left = 480
Top = 6
Width = 145
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Transportni tro�kovi'
end
object Label84: TLabel
Left = 480
Top = 38
Width = 145
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Ostali tro�kovi nabave'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object DBText44: TMyDBText
Left = 486
Top = 54
Width = 137
Height = 13
Alignment = taRightJustify
Color = clBtnFace
DataField = 'OstaliTroskovi'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Min_Kol: TMyDBText
Left = 132
Top = 356
Width = 38
Height = 13
AutoSize = True
DataField = 'MinKol'
DataSource = DataUfa2.sStavke
end
object Bevel60: TBevel
Left = 8
Top = 272
Width = 197
Height = 21
Shape = bsFrame
Style = bsRaised
end
object Bevel26: TBevel
Left = 8
Top = 172
Width = 197
Height = 97
Style = bsRaised
end
object Bevel27: TBevel
Left = 8
Top = 172
Width = 197
Height = 53
Shape = bsFrame
Style = bsRaised
end
object Bevel36: TBevel
Left = 8
Top = 272
Width = 197
Height = 65
Style = bsRaised
end
object DBText13: TMyDBText
Left = 12
Top = 276
Width = 189
Height = 13
DataField = 'Naziv'
DataSource = DataUfa2.sImeBoje
end
object DBText7: TMyDBText
Left = 12
Top = 176
Width = 189
Height = 45
DataField = 'Naziv'
DataSource = DataUfa2.sImeRobe
WordWrap = True
end
object Label27: TLabel
Left = 8
Top = 50
Width = 35
Height = 13
Caption = 'Primka:'
end
object MjereNaziv: TDBVar
Left = 90
Top = 358
Width = 9
Height = 9
TabStop = False
AutoSize = False
DataField = 'Naziv'
DataSource = DataUfa2.sMjere
Enabled = False
TabOrder = 12
OnChange = Mjereno
end
object xImaAtoma: TDBChecker
Left = 104
Top = 356
Width = 13
Height = 13
TabStop = False
Caption = 'xImaAtoma'
DataField = 'ImaAtoma'
DataSource = DataUfa2.sPakung
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 11
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xImaAtomaChange
end
object DBVar1: TDBVar
Left = 78
Top = 358
Width = 9
Height = 9
TabStop = False
AutoSize = False
DataField = 'XKol'
DataSource = DataUfa2.sStavke
Enabled = False
TabOrder = 10
OnChange = Mjereno
end
object xImaBoje: TDBChecker
Left = 62
Top = 356
Width = 15
Height = 13
TabStop = False
Caption = 'xImaBoje'
DataField = 'Bezbojno'
DataSource = DataUfa2.sRoba
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 9
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xImaBojeChange
end
object Panel1: TPanel
Left = 212
Top = 74
Width = 420
Height = 375
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object Book3: TNotebook
Left = 2
Top = 2
Width = 416
Height = 371
Align = alClient
TabOrder = 0
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Marza'
object Bevel22: TBevel
Left = 212
Top = 152
Width = 5
Height = 219
Shape = bsLeftLine
end
object Bevel32: TBevel
Left = 216
Top = 320
Width = 197
Height = 5
Shape = bsTopLine
end
object Bevel28: TBevel
Left = 216
Top = 300
Width = 197
Height = 5
Shape = bsTopLine
end
object Bevel13: TBevel
Left = 216
Top = 236
Width = 197
Height = 21
Shape = bsFrame
end
object Bevel10: TBevel
Left = 216
Top = 199
Width = 197
Height = 3
Shape = bsBottomLine
end
object Bevel29: TBevel
Left = 280
Top = 160
Width = 129
Height = 37
end
object Bevel31: TBevel
Left = 216
Top = 156
Width = 197
Height = 119
Shape = bsFrame
end
object Bevel33: TBevel
Left = 216
Top = 280
Width = 197
Height = 61
Shape = bsFrame
Style = bsRaised
end
object DBText14: TMyDBText
Left = 248
Top = 284
Width = 161
Height = 13
Alignment = taRightJustify
DataField = 'RUCV'
DataSource = DataUfa2.sStavke
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object DBText20: TMyDBText
Left = 288
Top = 220
Width = 121
Height = 13
Alignment = taRightJustify
DataField = 'Porez3V'
DataSource = DataUfa2.sStavke
Transparent = True
end
object Label54: TLabel
Left = 228
Top = 152
Width = 43
Height = 13
Alignment = taCenter
Caption = 'POREZ'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label57: TLabel
Left = 4
Top = 196
Width = 41
Height = 13
Caption = 'Fakt.Vrij.'
end
object DBText18: TMyDBText
Left = 280
Top = 204
Width = 129
Height = 13
Alignment = taRightJustify
DataField = 'PorezV'
DataSource = DataUfa2.sStavke
Transparent = True
end
object DBText17: TMyDBText
Left = 280
Top = 258
Width = 129
Height = 13
Alignment = taRightJustify
DataField = 'Porez1V'
DataSource = DataUfa2.sStavke
Transparent = True
end
object DBText19: TMyDBText
Left = 284
Top = 240
Width = 125
Height = 13
Alignment = taRightJustify
DataField = 'Porez2V'
DataSource = DataUfa2.sStavke
Transparent = True
end
object DBText15: TMyDBText
Left = 284
Top = 162
Width = 121
Height = 33
DataField = 'Naziv'
DataSource = DataUfa2.sPorez
end
object Label48: TLabel
Left = 220
Top = 168
Width = 57
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Tarifni broj'
end
object Label36: TLabel
Left = 17
Top = 304
Width = 29
Height = 13
Alignment = taRightJustify
Caption = 'Mar�a'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label37: TLabel
Left = 112
Top = 304
Width = 14
Height = 13
Alignment = taCenter
Caption = '%='
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label38: TLabel
Left = 21
Top = 328
Width = 25
Height = 13
Alignment = taRightJustify
Caption = 'VPC'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object DBText11: TMyDBText
Left = 168
Top = 328
Width = 41
Height = 15
DataField = 'Cij'
DataSource = DataUfa2.sValuta
end
object Label30: TLabel
Left = 16
Top = 156
Width = 32
Height = 13
Alignment = taRightJustify
Caption = 'Rabat-'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label33: TLabel
Left = 112
Top = 156
Width = 14
Height = 13
Alignment = taCenter
Caption = '%='
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label39: TLabel
Left = 4
Top = 176
Width = 41
Height = 13
Alignment = taRightJustify
Caption = '2.Rabat-'
end
object Label40: TLabel
Left = 112
Top = 176
Width = 14
Height = 13
Alignment = taCenter
Caption = '%='
end
object Label47: TLabel
Left = 221
Top = 284
Width = 26
Height = 13
Alignment = taRightJustify
Caption = 'RUC:'
end
object Label49: TLabel
Left = 241
Top = 258
Width = 26
Height = 13
Caption = 'RUC:'
end
object Label50: TLabel
Left = 238
Top = 204
Width = 29
Height = 13
Caption = 'Roba:'
end
object Label51: TLabel
Left = 220
Top = 240
Width = 47
Height = 13
Caption = 'Potro�nja:'
end
object Label53: TLabel
Left = 231
Top = 220
Width = 36
Height = 13
Caption = 'Usluga:'
end
object Label59: TLabel
Left = 11
Top = 264
Width = 35
Height = 13
Alignment = taRightJustify
Caption = 'Rabat+'
end
object Label60: TLabel
Left = 112
Top = 264
Width = 14
Height = 13
Alignment = taCenter
Caption = '%='
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label61: TLabel
Left = 2
Top = 284
Width = 44
Height = 13
Alignment = taRightJustify
Caption = '2.Rabat+'
end
object Label62: TLabel
Left = 112
Top = 284
Width = 14
Height = 13
Alignment = taCenter
Caption = '%='
end
object DBText1: TMyDBText
Left = 222
Top = 182
Width = 53
Height = 15
Alignment = taCenter
Color = clBtnFace
DataField = 'Tarifa'
DataSource = DataUfa2.sPorez
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Bevel102: TBevel
Left = -1
Top = 148
Width = 417
Height = 3
Shape = bsBottomLine
Style = bsRaised
end
object DBText3: TMyDBText
Left = 268
Top = 204
Width = 42
Height = 13
AutoSize = True
DataField = 'PorezP'
DataSource = DataUfa2.sStavke
end
object DBText56: TMyDBText
Left = 268
Top = 220
Width = 48
Height = 13
AutoSize = True
DataField = 'Porez3P'
DataSource = DataUfa2.sStavke
end
object DBText55: TMyDBText
Left = 268
Top = 240
Width = 48
Height = 13
AutoSize = True
DataField = 'Porez2P'
DataSource = DataUfa2.sStavke
end
object DBText54: TMyDBText
Left = 268
Top = 258
Width = 48
Height = 13
AutoSize = True
DataField = 'Porez1P'
DataSource = DataUfa2.sStavke
end
object Label16: TLabel
Left = 19
Top = 352
Width = 27
Height = 13
Alignment = taRightJustify
Caption = 'MPC'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object DBText16: TMyDBText
Left = 168
Top = 352
Width = 41
Height = 15
DataField = 'Cij'
DataSource = DataUfa2.sValuta
end
object DBText21: TMyDBText
Left = 248
Top = 304
Width = 161
Height = 13
Alignment = taRightJustify
DataField = 'VPVrijednost'
DataSource = DataUfa2.sStavke
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label25: TLabel
Left = 223
Top = 304
Width = 24
Height = 13
Alignment = taRightJustify
Caption = 'VPV:'
end
object DBText22: TMyDBText
Left = 248
Top = 324
Width = 161
Height = 13
Alignment = taRightJustify
DataField = 'MPVrijednost'
DataSource = DataUfa2.sStavke
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label31: TLabel
Left = 221
Top = 324
Width = 26
Height = 13
Alignment = taRightJustify
Caption = 'MPV:'
end
object TrosBook0: TNotebook
Tag = 1
Left = 0
Top = 216
Width = 211
Height = 41
PageIndex = 4
TabOrder = 5
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Bez troskova'
object Label104: TLabel
Left = 26
Top = 14
Width = 155
Height = 13
Alignment = taCenter
Caption = 'Nema zavisnih tro�kova nabave.'
end
object Bevel34: TBevel
Left = 4
Top = 4
Width = 205
Height = 33
Style = bsRaised
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Troskovi direkt'
object Bevel35: TBevel
Left = 4
Top = 4
Width = 205
Height = 33
Style = bsRaised
end
object Label105: TLabel
Left = 28
Top = 8
Width = 159
Height = 26
Alignment = taCenter
Caption = 'Tro�kovi nabave robe knji�eni su direktno na tro�ak.'
WordWrap = True
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Transport u cijeni'
object Label109: TLabel
Left = 112
Top = 14
Width = 14
Height = 13
Alignment = taCenter
Caption = '%='
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label32: TLabel
Left = 4
Top = 14
Width = 45
Height = 13
Caption = 'Transport'
end
object eTrans3: TDBVarP2
Left = 52
Top = 10
Width = 57
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Transport'
DataSource = DataUfa2.sStavke
TabOrder = 0
Field_Res = DataUfa2.tStavkeTransportI
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
object eTrans3I: TDBVarN2
Left = 128
Top = 10
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'TransportI'
DataSource = DataUfa2.sStavke
TabOrder = 1
Field_Res = DataUfa2.tStavkeTransport
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Ostalo u cijeni'
object Label111: TLabel
Left = 112
Top = 14
Width = 14
Height = 13
Alignment = taCenter
Caption = '%='
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label34: TLabel
Left = 8
Top = 14
Width = 38
Height = 13
Caption = 'Ostali tr.'
end
object eOst3: TDBVarP2
Left = 52
Top = 10
Width = 55
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'OstaliTr'
DataSource = DataUfa2.sStavke
TabOrder = 0
Field_Res = DataUfa2.tStavkeOstaliTrI
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
object eOst3I: TDBVarN2
Left = 128
Top = 10
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'OstaliTrI'
DataSource = DataUfa2.sStavke
TabOrder = 1
Field_Res = DataUfa2.tStavkeOstaliTr
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Troskovi u cijeni'
object Label35: TLabel
Left = 0
Top = 4
Width = 45
Height = 13
Alignment = taRightJustify
Caption = 'Transport'
end
object Label52: TLabel
Left = 8
Top = 24
Width = 38
Height = 13
Alignment = taRightJustify
Caption = 'Ostali tr.'
end
object Label55: TLabel
Left = 112
Top = 4
Width = 14
Height = 13
Alignment = taCenter
Caption = '%='
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label141: TLabel
Left = 112
Top = 24
Width = 14
Height = 13
Alignment = taCenter
Caption = '%='
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object eTrans4: TDBVarP2
Left = 52
Top = 0
Width = 57
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Transport'
DataSource = DataUfa2.sStavke
TabOrder = 0
Field_Res = DataUfa2.tStavkeTransportI
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
object eTrans4I: TDBVarN2
Left = 128
Top = 0
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'TransportI'
DataSource = DataUfa2.sStavke
TabOrder = 1
Field_Res = DataUfa2.tStavkeTransport
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
object eOst4I: TDBVarN2
Left = 128
Top = 20
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'OstaliTrI'
DataSource = DataUfa2.sStavke
TabOrder = 3
Field_Res = DataUfa2.tStavkeOstaliTr
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
object eOst4: TDBVarP2
Left = 52
Top = 20
Width = 57
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'OstaliTr'
DataSource = DataUfa2.sStavke
TabOrder = 2
Field_Res = DataUfa2.tStavkeOstaliTrI
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
end
end
object xRabatI: TDBVarN2
Left = 128
Top = 260
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'XRabatI'
DataSource = DataUfa2.sStavke
TabOrder = 7
Field_Res = DataUfa2.tStavkeXRabat
Field_Base = DataUfa2.tStavkeCijena
OnExitChanged = xRabatIExitChanged
end
object xRabat: TDBVarP2
Left = 52
Top = 260
Width = 57
Height = 21
AutoSize = False
DataField = 'XRabat'
DataSource = DataUfa2.sStavke
TabOrder = 6
Field_Res = DataUfa2.tStavkeXRabatI
Field_Base = DataUfa2.tStavkeCijena
OnExitChanged = xRabatExitChanged
end
object xRabat2I: TDBVarN2
Left = 128
Top = 280
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'XRabat2I'
DataSource = DataUfa2.sStavke
Enabled = False
TabOrder = 9
OnExitChanged = xRabat2IExitChanged
end
object xRabat2: TDBVarP2
Left = 52
Top = 280
Width = 57
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'XRabat2'
DataSource = DataUfa2.sStavke
Enabled = False
TabOrder = 8
OnExitChanged = xRabat2ExitChanged
end
object eMarzaI: TDBVarN2
Left = 128
Top = 300
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'MarzaI'
DataSource = DataUfa2.sStavke
TabOrder = 11
Field_Res = DataUfa2.tStavkeMarza
Field_Base = DataUfa2.tStavkeVPC
OnExitChanged = MarzaChanged
end
object eMarza: TDBVarP2
Left = 52
Top = 300
Width = 57
Height = 21
AutoSize = False
DataField = 'Marza'
DataSource = DataUfa2.sStavke
TabOrder = 10
Field_Res = DataUfa2.tStavkeMarzaI
Field_Base = DataUfa2.tStavkeVPC
OnExitChanged = MarzaChanged
end
object eVPC: TDBVar
Left = 52
Top = 324
Width = 113
Height = 20
AutoSize = False
DataField = 'VPCijena'
DataSource = DataUfa2.sStavke
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 12
OnExitChanged = eVPCExitChanged
end
object eRabat: TDBVarP2
Left = 52
Top = 152
Width = 57
Height = 21
AutoSize = False
DataField = 'Rabat'
DataSource = DataUfa2.sStavke
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
Field_Res = DataUfa2.tStavkeRabatI
Field_Base = DataUfa2.tStavkeCijena
OnExitChanged = eRabatExitChanged
end
object eRabatI: TDBVarN2
Left = 128
Top = 152
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'RabatI'
DataSource = DataUfa2.sStavke
TabOrder = 1
Field_Res = DataUfa2.tStavkeRabat
Field_Base = DataUfa2.tStavkeCijena
OnExitChanged = eRabatIExitChanged
end
object eRabat2: TDBVarP2
Left = 52
Top = 172
Width = 57
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Rabat2'
DataSource = DataUfa2.sStavke
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnExitChanged = eRabat2ExitChanged
end
object eRabat2I: TDBVarN2
Left = 128
Top = 172
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Rabat2I'
DataSource = DataUfa2.sStavke
Enabled = False
TabOrder = 3
OnExitChanged = eRabat2IExitChanged
end
object eFaktVrij: TDBVar
Left = 52
Top = 192
Width = 157
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'FaktVrijednost'
DataSource = DataUfa2.sStavke
TabOrder = 4
OnEnter = eFaktVrijEnter
OnExitChanged = eFaktVrijExitChanged
end
object gStavke0: TMyDBGrid
Left = 0
Top = 0
Width = 416
Height = 147
FindByName = False
Align = alTop
DataSource = DataUfa2.sStavke
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete]
TabOrder = 16
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object ZapisiButton20: TBitBtn
Left = 217
Top = 344
Width = 80
Height = 25
Caption = 'Stavka'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 14
OnClick = ZapisiButton20Click
OnEnter = ZapisiButton20Enter
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
end
object IzlazButton20: TBitBtn
Left = 304
Top = 344
Width = 108
Height = 25
Caption = 'Zaglavlje'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 15
OnClick = IzlazButton20Click
Glyph.Data = {
76020000424D7602000000000000760000002800000040000000100000000100
0400000000000002000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333933333333333333333333333333333338F33333333333333333333
3333333339093333333333333333FF33333333333888F3333333333333300333
3333333390F093333333333333F88F333333333388388F3333333333300C0333
333333390FFF093333333333F8838F333333333888F388F3333333300CCC0333
3333339990FFF093333333F883338FFFFF333383388F388F3333300CCCCC0000
00033999990FFF093333F88333338888883338333388F388F3330CCCCCCCCCCC
CC0319999990FFF0933383FF33333FFFFF338F3333388F388F33300CCCCC0000
0003919999990FFF09333883FF338888883388F333F388F388F333300CCC0333
33333919909990FFF093333883FF8F333333388F3833F88F38833333300C0333
333333919990990F0933333338838F3333333388F338F3888833333333300333
33333339190099903333333333388333333333388F883338F333333333333333
333333339199999933333333333333333333333388F333F83333333333333333
3333333339199993333333333333333333333333388F38833333333333333333
3333333333919333333333333333333333333333338883333333333333333333
3333333333333333333333333333333333333333333333333333}
Layout = blGlyphRight
NumGlyphs = 2
end
object eMPC: TDBVar
Left = 52
Top = 348
Width = 113
Height = 20
AutoSize = False
DataField = 'MPCijena'
DataSource = DataUfa2.sStavke
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 13
OnExitChanged = eMPCExitChanged
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Provizija'
object Bevel19: TBevel
Left = 216
Top = 285
Width = 197
Height = 2
Shape = bsBottomLine
end
object Bevel55: TBevel
Left = 280
Top = 248
Width = 129
Height = 35
end
object Bevel41: TBevel
Left = 216
Top = 242
Width = 197
Height = 79
Shape = bsFrame
end
object Bevel40: TBevel
Left = 216
Top = 324
Width = 197
Height = 17
end
object DBText29: TMyDBText
Left = 272
Top = 326
Width = 137
Height = 13
Alignment = taRightJustify
DataField = 'RUC'
DataSource = DataUfa2.sStavke
end
object DBText31: TMyDBText
Left = 272
Top = 304
Width = 137
Height = 13
Alignment = taRightJustify
DataField = 'Porez3V'
DataSource = DataUfa2.sStavke
Transparent = True
end
object Bevel38: TBevel
Left = 0
Top = 350
Width = 209
Height = 17
end
object DBText28: TMyDBText
Left = 64
Top = 352
Width = 141
Height = 13
Alignment = taRightJustify
DataField = 'SkladVrijednost'
DataSource = DataUfa2.sStavke
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label69: TLabel
Left = 4
Top = 352
Width = 52
Height = 13
Caption = 'Nab.Vrijed.'
end
object Label73: TLabel
Left = 9
Top = 246
Width = 29
Height = 13
Alignment = taRightJustify
Caption = 'Rabat'
end
object Label76: TLabel
Left = 104
Top = 246
Width = 23
Height = 12
Alignment = taCenter
AutoSize = False
Caption = '% ='
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label79: TLabel
Left = 0
Top = 266
Width = 38
Height = 13
Alignment = taRightJustify
Caption = '2.Rabat'
end
object Label80: TLabel
Left = 104
Top = 266
Width = 23
Height = 13
Alignment = taCenter
AutoSize = False
Caption = '% ='
end
object Bevel39: TBevel
Left = 213
Top = 234
Width = 5
Height = 135
Shape = bsLeftLine
end
object Label82: TLabel
Left = 228
Top = 238
Width = 43
Height = 13
Alignment = taCenter
Caption = 'POREZ'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object DBText32: TMyDBText
Left = 272
Top = 288
Width = 137
Height = 13
Alignment = taRightJustify
DataField = 'PorezV'
DataSource = DataUfa2.sStavke
Transparent = True
end
object DBText35: TMyDBText
Left = 284
Top = 250
Width = 121
Height = 31
DataField = 'Naziv'
end
object Label83: TLabel
Left = 220
Top = 252
Width = 49
Height = 13
Alignment = taCenter
Caption = 'Tarifni broj'
end
object Label85: TLabel
Left = 227
Top = 288
Width = 29
Height = 13
Caption = 'Roba:'
end
object Label87: TLabel
Left = 220
Top = 304
Width = 36
Height = 13
Caption = 'Usluga:'
end
object Label81: TLabel
Left = 220
Top = 326
Width = 53
Height = 13
Caption = 'Provizija:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object DBText34: TMyDBText
Left = 220
Top = 268
Width = 57
Height = 13
Alignment = taCenter
Color = clBtnFace
DataField = 'Tarifa'
DataSource = DataUfa2.sPorez
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label72: TLabel
Left = 0
Top = 286
Width = 41
Height = 13
Caption = 'Fakt.Vrij.'
end
object Bevel25: TBevel
Left = 0
Top = 232
Width = 417
Height = 3
end
object DBText47: TMyDBText
Left = 256
Top = 288
Width = 48
Height = 13
AutoSize = True
DataField = 'PorezP'
DataSource = DataUfa2.sStavke
end
object DBText46: TMyDBText
Left = 256
Top = 304
Width = 48
Height = 13
AutoSize = True
DataField = 'Porez3P'
DataSource = DataUfa2.sStavke
end
object eRabat1: TDBVarP2
Left = 44
Top = 242
Width = 61
Height = 21
AutoSize = False
DataField = 'Rabat'
DataSource = DataUfa2.sStavke
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
Field_Res = DataUfa2.tStavkeRabatI
Field_Base = DataUfa2.tStavkeCijena
OnExitChanged = eRabatExitChanged
end
object eRabat1I: TDBVarN2
Left = 128
Top = 242
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'RabatI'
DataSource = DataUfa2.sStavke
TabOrder = 1
Field_Res = DataUfa2.tStavkeRabat
Field_Base = DataUfa2.tStavkeCijena
OnExitChanged = eRabatIExitChanged
end
object eRabat3: TDBVarP2
Left = 44
Top = 262
Width = 61
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Rabat2'
DataSource = DataUfa2.sStavke
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnExitChanged = eRabat2ExitChanged
end
object eRabat3I: TDBVarN2
Left = 128
Top = 262
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Rabat2I'
DataSource = DataUfa2.sStavke
Enabled = False
TabOrder = 3
OnExitChanged = eRabat2IExitChanged
end
object TrosBook1: TNotebook
Tag = 1
Left = 0
Top = 304
Width = 211
Height = 45
TabOrder = 5
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Bez troskova'
object Label74: TLabel
Left = 14
Top = 16
Width = 183
Height = 15
Alignment = taCenter
AutoSize = False
Caption = 'Nema zavisnih tro�kova nabave.'
end
object Bevel62: TBevel
Left = 12
Top = 10
Width = 187
Height = 26
Style = bsRaised
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Troskovi direkt'
object Label75: TLabel
Left = 8
Top = 0
Width = 193
Height = 39
Alignment = taCenter
AutoSize = False
Caption =
'Tro�kovi nabave robe knji�eni su direktno na tro�ak, te se ne ev' +
'identiraju u pove�anju nabavne vrijednosti robe.'
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Transport u cijeni'
object Bevel63: TBevel
Left = 2
Top = 26
Width = 207
Height = 17
Style = bsRaised
end
object Label77: TLabel
Left = 4
Top = 28
Width = 201
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Nema ostalih tro�kova nabave.'
end
object Label78: TLabel
Left = 104
Top = 6
Width = 23
Height = 12
Alignment = taCenter
AutoSize = False
Caption = '% ='
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label94: TLabel
Left = 0
Top = 6
Width = 45
Height = 13
Caption = 'Transport'
end
object eTrans1: TDBVarP2
Left = 48
Top = 2
Width = 57
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Transport'
DataSource = DataUfa2.sStavke
TabOrder = 0
Field_Res = DataUfa2.tStavkeTransportI
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
object eTrans1I: TDBVarN2
Left = 128
Top = 2
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'TransportI'
DataSource = DataUfa2.sStavke
TabOrder = 1
Field_Res = DataUfa2.tStavkeTransport
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Ostalo u cijeni'
object Bevel64: TBevel
Left = 0
Top = 2
Width = 209
Height = 17
Style = bsRaised
end
object Label95: TLabel
Left = 4
Top = 4
Width = 201
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Nema transportnih tro�kova.'
end
object Label96: TLabel
Left = 104
Top = 26
Width = 23
Height = 12
Alignment = taCenter
AutoSize = False
Caption = '% ='
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label97: TLabel
Left = 2
Top = 26
Width = 38
Height = 13
Caption = 'Ostali tr.'
end
object eOst1: TDBVarP2
Left = 44
Top = 22
Width = 61
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'OstaliTr'
DataSource = DataUfa2.sStavke
TabOrder = 0
Field_Res = DataUfa2.tStavkeOstaliTrI
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
object eOst1I: TDBVarN2
Left = 128
Top = 22
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'OstaliTrI'
DataSource = DataUfa2.sStavke
TabOrder = 1
Field_Res = DataUfa2.tStavkeOstaliTr
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Troskovi u cijeni'
object Label98: TLabel
Left = 0
Top = 6
Width = 45
Height = 13
Alignment = taRightJustify
Caption = 'Transport'
end
object Label99: TLabel
Left = 6
Top = 26
Width = 38
Height = 13
Alignment = taRightJustify
Caption = 'Ostali tr.'
end
object Label101: TLabel
Left = 104
Top = 6
Width = 23
Height = 12
Alignment = taCenter
AutoSize = False
Caption = '% ='
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label102: TLabel
Left = 104
Top = 26
Width = 23
Height = 12
Alignment = taCenter
AutoSize = False
Caption = '% ='
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object eTrans2: TDBVarP2
Left = 48
Top = 2
Width = 57
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Transport'
DataSource = DataUfa2.sStavke
TabOrder = 0
Field_Res = DataUfa2.tStavkeTransportI
Field_Base = DataUfa2.tStavkeFaktCijena
end
object eTrans2I: TDBVarN2
Left = 128
Top = 2
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'TransportI'
DataSource = DataUfa2.sStavke
TabOrder = 1
Field_Res = DataUfa2.tStavkeTransport
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
object eOst2I: TDBVarN2
Left = 128
Top = 22
Width = 81
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'OstaliTrI'
DataSource = DataUfa2.sStavke
TabOrder = 3
Field_Res = DataUfa2.tStavkeOstaliTr
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
object eOst2: TDBVarP2
Left = 48
Top = 22
Width = 57
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'OstaliTr'
DataSource = DataUfa2.sStavke
TabOrder = 2
Field_Res = DataUfa2.tStavkeOstaliTrI
Field_Base = DataUfa2.tStavkeFaktCijena
OnExitChanged = RacunajSkladCijenu
end
end
end
object eFaktVrij2: TDBVar
Left = 44
Top = 282
Width = 165
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'FaktVrijednost'
DataSource = DataUfa2.sStavke
TabOrder = 4
OnEnter = eFaktVrijEnter
OnExitChanged = eFaktVrijExitChanged
end
object gStavke1: TMyDBGrid
Tag = 1
Left = 0
Top = 0
Width = 416
Height = 229
FindByName = True
Align = alTop
DataSource = DataUfa2.sStavke
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete]
TabOrder = 8
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object ZapisiButton21: TBitBtn
Left = 217
Top = 344
Width = 84
Height = 25
Caption = 'Stavka'
TabOrder = 6
OnClick = ZapisiButton20Click
OnEnter = ZapisiButton20Enter
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
end
object IzlazButton21: TBitBtn
Left = 304
Top = 344
Width = 110
Height = 25
Caption = 'Zaglavlje'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = IzlazButton20Click
Glyph.Data = {
76020000424D7602000000000000760000002800000040000000100000000100
0400000000000002000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333933333333333333333333333333333338F33333333333333333333
3333333339093333333333333333FF33333333333888F3333333333333300333
3333333390F093333333333333F88F333333333388388F3333333333300C0333
333333390FFF093333333333F8838F333333333888F388F3333333300CCC0333
3333339990FFF093333333F883338FFFFF333383388F388F3333300CCCCC0000
00033999990FFF093333F88333338888883338333388F388F3330CCCCCCCCCCC
CC0319999990FFF0933383FF33333FFFFF338F3333388F388F33300CCCCC0000
0003919999990FFF09333883FF338888883388F333F388F388F333300CCC0333
33333919909990FFF093333883FF8F333333388F3833F88F38833333300C0333
333333919990990F0933333338838F3333333388F338F3888833333333300333
33333339190099903333333333388333333333388F883338F333333333333333
333333339199999933333333333333333333333388F333F83333333333333333
3333333339199993333333333333333333333333388F38833333333333333333
3333333333919333333333333333333333333333338883333333333333333333
3333333333333333333333333333333333333333333333333333}
Layout = blGlyphRight
NumGlyphs = 2
end
end
end
end
object cSifra: TDBKey
Left = 148
Top = 46
Width = 53
Height = 21
AutoSize = False
Ctl3D = True
DataField = 'STAVKA'
DataSource = DataUfa2.sStavke
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentCtl3D = False
ParentFont = False
TabOrder = 1
DisplayName = 'Stavka Ulazne fakture'
end
object eKolicina: TDBVar
Left = 52
Top = 376
Width = 101
Height = 21
AutoSize = False
DataField = 'Kolicina'
DataSource = DataUfa2.sStavke
TabOrder = 6
OnExitChanged = tStavkeKolicinaChange
end
object eCijena: TDBVar
Left = 52
Top = 400
Width = 101
Height = 21
AutoSize = False
DataField = 'CijenaX'
DataSource = DataUfa2.sStavke
TabOrder = 7
OnExitChanged = tStavkeCijenaChange
end
object eMinKol: TDBJustLookup
Left = 52
Top = 352
Width = 77
Height = 21
TabStop = False
DataField = 'ATOM'
DataSource = DataUfa2.sStavke
LookupSource = DataUfa2.sAtomi
LookupField = 'KOLICINA'
Color = clBtnFace
Enabled = False
TabOrder = 5
DisplayName = 'Osnovna jedinica koli�ine'
OnExitChanged = eMinKolExitChanged
end
object Zarada: TMyDBRadioGroup
Left = 8
Top = 136
Width = 197
Height = 33
Caption = 'Zarada od prodane robe je u obliku ...'
Columns = 2
DataField = 'Zarada'
DataSource = DataUfa2.sGlava
Enabled = False
Items.Strings = (
'RUC-a'
'Provizije')
TabOrder = 2
Values.Strings = (
'1'
'2')
OnChange = ZaradaChange
end
object TrosPanel: TPanel
Left = 476
Top = 4
Width = 153
Height = 69
BevelOuter = bvLowered
TabOrder = 8
Visible = False
object Bevel45: TBevel
Left = 4
Top = 16
Width = 145
Height = 17
Shape = bsFrame
Style = bsRaised
end
object Bevel46: TBevel
Left = 4
Top = 48
Width = 145
Height = 17
Shape = bsFrame
Style = bsRaised
end
object DBText39: TMyDBText
Left = 6
Top = 18
Width = 139
Height = 13
Alignment = taRightJustify
Color = clBtnFace
DataField = 'TransportOstaje'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label19: TLabel
Left = 4
Top = 2
Width = 145
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Neraspore�eni transportni tr.'
end
object Label71: TLabel
Left = 4
Top = 34
Width = 145
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Neraspore�eni ostali tro�kovi'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object DBText40: TMyDBText
Left = 6
Top = 50
Width = 139
Height = 13
Alignment = taRightJustify
Color = clBtnFace
DataField = 'OstaloOstaje'
DataSource = DataUfa2.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
end
end
object SifBookA: TNotebook
Tag = 1
Left = 12
Top = 228
Width = 189
Height = 37
PageIndex = 1
TabOrder = 3
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Na�e �ifre'
object Label26: TLabel
Left = 0
Top = 12
Width = 52
Height = 13
Caption = '�ifra artikla'
end
object eSifArt: TDBJustLookup
Left = 60
Top = 8
Width = 129
Height = 21
DataField = 'ARTIKL'
DataSource = DataUfa2.sStavke
LookupSource = DataUfa2.sArtikl
LookupDisplay = 'SIFRA'
LookupField = 'CODE'
TabOrder = 0
Required = True
DisplayName = '�ifra artikla'
OnExitChanged = eSifArtExitChanged
OnF2Press = SifArt_F2
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Dobavlja�eve �ifre'
object Label42: TLabel
Left = 0
Top = 0
Width = 52
Height = 13
Caption = '�ifra artikla'
end
object Label46: TLabel
Left = 100
Top = 0
Width = 78
Height = 13
Caption = 'Na�a �ifra artikla'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object eSifArtD: TDBJustLookup
Left = 0
Top = 16
Width = 97
Height = 21
DataField = 'ARTIKL'
DataSource = DataUfa2.sStavke
LookupSource = DataUfa2.sArtikl
LookupDisplay = 'SIFRA'
LookupField = 'CODE'
Ctl3D = True
ParentCtl3D = False
TabOrder = 0
Required = True
DisplayName = 'Dobavlja�eva �ifra artikla'
OnExitChanged = eSifArtDExitChanged
OnF2Press = SifArtD_F2
end
object DBField1: TDBCodeField
Tag = 55
Left = 100
Top = 16
Width = 89
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
Ctl3D = True
DataField = 'SIFRA'
DataSource = DataUfa2.sArtikl2
ParentCtl3D = False
TabOrder = 1
Required = False
DisplayName = 'Na�a �ifra artikla'
OnF2Press = SifArt_F2
end
end
end
object SifBookB: TNotebook
Tag = 1
Left = 12
Top = 296
Width = 189
Height = 37
PageIndex = 1
TabOrder = 4
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Na�e �ifre'
object Label119: TLabel
Left = 8
Top = 12
Width = 44
Height = 13
Caption = '�ifra boje'
end
object eSifBoje: TDBJustLookup
Left = 60
Top = 8
Width = 129
Height = 21
TabStop = False
DataField = 'BOJA'
DataSource = DataUfa2.sStavke
LookupSource = DataUfa2.sBoje
LookupDisplay = 'SIFRA'
LookupField = 'CODE'
Color = clBtnFace
Enabled = False
TabOrder = 0
DisplayName = '�ifra boje'
OnExitChanged = eSifBojeExitChanged
OnF2Press = SifBoja_F2
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Dobavlja�eve �ifre'
object Label121: TLabel
Left = 2
Top = 0
Width = 44
Height = 13
Caption = '�ifra boje'
end
object Label122: TLabel
Left = 102
Top = 0
Width = 70
Height = 13
Caption = 'Na�a �ifra boje'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object eSifBojeD: TDBJustLookup
Left = 0
Top = 16
Width = 97
Height = 21
TabStop = False
DataField = 'BOJA'
DataSource = DataUfa2.sStavke
LookupSource = DataUfa2.sBoje
LookupDisplay = 'SIFRA'
LookupField = 'CODE'
Color = clBtnFace
Enabled = False
TabOrder = 0
DisplayName = 'Dobavlja�eva �ifra boje'
OnExitChanged = eSifBojeDExitChanged
OnF2Press = SifBojaD_F2
end
object DBField3: TDBCodeField
Tag = 55
Left = 100
Top = 16
Width = 89
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
Ctl3D = True
DataField = 'SIFRA'
DataSource = DataUfa2.sBoje2
ParentCtl3D = False
TabOrder = 1
Required = False
DisplayName = 'Na�a �ifra boje'
OnF2Press = SifBoja_F2
end
end
end
object RabatPanel: TPanel
Left = 212
Top = 3
Width = 260
Height = 5
TabOrder = 13
end
end
end
end
