You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

322 lines
7.6 KiB
Plaintext

11 months ago
object frmExpVou: TfrmExpVou
Left = 152
Top = 97
Width = 772
Height = 538
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
WindowState = wsMaximized
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Bevel1: TBevel
Left = 0
Top = 85
Width = 764
Height = 4
Align = alTop
Shape = bsTopLine
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 764
Height = 85
Align = alTop
BevelOuter = bvNone
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
object SpeedButton1: TSpeedButton
Left = 148
Top = 48
Width = 105
Height = 25
Caption = #21015#20973#35777#26126#32454
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 524
Top = 40
Width = 105
Height = 25
Caption = #23548#20986#20973#35777#26126#32454
OnClick = SpeedButton2Click
end
object SlDate: TSlDate
Left = 8
Top = 0
Width = 492
Height = 37
Today = 38648.7080732755
iFromDate = 38648.7080732755
iToDate = 38648.7080732755
DateFormat = 'YYYY-MM-DD'
DateKinds = [dkCustom, dkPrevDay, dkToDay, dkNextDay, dkPrev2Week, dkPrevWeek, dkThisWeek, dkNextWeek, dkNext2week, dkPrev2Month, dkPrevMonth, dkThisMonth, dkNextMonth, dkNext2Month, dkPrev2Year, dkPrevYear, dkThisYear, dkNextYear, dkNext2Year, dkAll]
DateKindNames.Strings = (
'<'#33258#23450#20041'>'
#19978#19968#26085
#26412#26085
#19979#19968#26085
#19978#20108#21608
#19978#19968#21608
#26412#21608'('#21608#19968#33267#21608#26085')'
#19979#19968#21608
#19979#20108#21608
#19978#20108#26376
#19978#19968#26376
#26412#26376
#19979#19968#26376
#19979#20108#26376
#19978#20108#24180
#19978#19968#24180
#26412#24180
#19979#19968#24180
#19979#20108#24180
#32047#35745#20840#37096)
DateKind = dkThisMonth
DtpDateFormat = dfLong
FromCap = #20973#35777#26085#26399#33258#65306
ToCap = ' '#33267' '
OffSetTop = 5
OffSetLeft = 4
DtpWidth = 113
ComboBoxWidth = 150
ImageList = DSMainFrm.ImageList
ImageIndex = -1
MonthDay = mdDay
ShowMonthDayCombobox = False
MonthEndDay = 0
OnDateChanged = SlDateDateChanged
BevelOuter = bvNone
TabOrder = 0
end
object CheckBox1: TCheckBox
Left = 16
Top = 52
Width = 117
Height = 17
Caption = #26174#31034#24050#23548#20986#20973#35777
TabOrder = 1
OnClick = CheckBox1Click
end
end
object Panel2: TPanel
Left = 0
Top = 470
Width = 764
Height = 41
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object SpeedButton3: TSpeedButton
Left = 16
Top = 12
Width = 55
Height = 25
Caption = #20840#36873
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
Left = 97
Top = 12
Width = 55
Height = 25
Caption = #21462#28040
OnClick = SpeedButton4Click
end
object BitBtn1: TBitBtn
Left = 556
Top = 12
Width = 75
Height = 25
Caption = #36864#20986
TabOrder = 0
Kind = bkClose
end
end
object DBGridCarriageSum: TDBGridEh
Left = 0
Top = 89
Width = 764
Height = 381
Align = alClient
AllowedOperations = [alopUpdateEh]
AllowedSelections = [gstRecordBookmarks]
DataSource = dsrVouitems
Flat = True
FooterColor = clWindow
FooterFont.Charset = ANSI_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -12
FooterFont.Name = #23435#20307
FooterFont.Style = []
FooterRowCount = 1
Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghAutoSortMarking]
RowHeight = 20
RowSizingAllowed = True
SumList.Active = True
TabOrder = 2
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
UseMultiTitle = True
VTitleMargin = 4
Columns = <
item
Checkboxes = True
EditButtons = <>
FieldName = 'Selected'
Footers = <>
KeyList.Strings = (
'1'
'0')
Title.Caption = #36873#25321
Width = 22
end
item
EditButtons = <>
FieldName = 'VouDate'
Footers = <>
Title.Caption = #26085#26399
end
item
EditButtons = <>
FieldName = 'ACCMONTH'
Footers = <>
Title.Caption = #26376#20221
Width = 32
end
item
EditButtons = <>
FieldName = 'ExPlan'
Footers = <>
Title.Caption = #25688#35201
Width = 105
end
item
EditButtons = <>
FieldName = 'ACCID'
Footers = <>
Title.Caption = #31185#30446'|'#20195' '#30721
end
item
EditButtons = <>
FieldName = 'ACCNAME'
Footers = <>
Title.Caption = #31185#30446'|'#21517#31216
end
item
EditButtons = <>
FieldName = 'MBLNO'
Footers = <>
Title.Caption = #25552#21333#21495
Width = 112
end
item
EditButtons = <>
FieldName = 'DC'
Footers = <>
Width = 22
end
item
EditButtons = <>
FieldName = 'AMTDR'
Footers = <>
Title.Caption = #37329#39069'|'#24212#25910
end
item
EditButtons = <>
FieldName = 'AMTCR'
Footers = <>
Title.Caption = #37329#39069'|'#24212#20184
end
item
EditButtons = <>
FieldName = 'FCYDR'
Footers = <>
Title.Caption = #22806#24065'|'#24212#25910
end
item
EditButtons = <>
FieldName = 'FCYCR'
Footers = <>
Title.Caption = #22806#24065'|'#24212#20184
end
item
EditButtons = <>
FieldName = 'FCYEXRATE'
Footers = <>
Title.Caption = #22806#24065'|'#27719#29575
end
item
EditButtons = <>
FieldName = 'ORDNO'
Footers = <>
Title.Caption = #24207#21495
end
item
EditButtons = <>
FieldName = 'LINENO'
Footers = <>
Title.Caption = #34892#21495
end
item
EditButtons = <>
FieldName = 'PREPARED'
Footers = <>
Title.Caption = #21046#21333
end>
end
object memTblVouitems: TkbmMemTable
DesignActivation = True
AttachedAutoRefresh = True
AttachMaxCount = 1
FieldDefs = <>
IndexDefs = <>
SortOptions = []
PersistentBackup = False
ProgressFlags = [mtpcLoad, mtpcSave, mtpcCopy]
FilterOptions = []
Version = '3.05'
LanguageID = 0
SortID = 0
SubLanguageID = 1
LocaleID = 1024
Left = 328
Top = 152
end
object dsrVouitems: TDataSource
DataSet = memTblVouitems
Left = 120
Top = 176
end
object DataSource1: TDataSource
Left = 312
Top = 296
end
object Query1: TQuery
DatabaseName = 'dbVouItems'
Left = 252
Top = 244
end
object SaveDialog1: TSaveDialog
Left = 168
Top = 136
end
end