git-svn-id: https://192.168.0.254/svn/Proyectos.Noviseda_FactuGES2/trunk@62 f33bb606-9f5c-448d-9c99-757f00063c96
317 lines
7.8 KiB
Plaintext
317 lines
7.8 KiB
Plaintext
object fEditorExportacionNorma32: TfEditorExportacionNorma32
|
|
Left = 0
|
|
Top = 0
|
|
ActiveControl = edtCodEntidad
|
|
BorderStyle = bsDialog
|
|
Caption = 'Volcado de remesas a disco (Norma 32)'
|
|
ClientHeight = 366
|
|
ClientWidth = 389
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
Position = poMainFormCenter
|
|
OnCreate = FormCreate
|
|
DesignSize = (
|
|
389
|
|
366)
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object Label2: TLabel
|
|
Left = 24
|
|
Top = 144
|
|
Width = 90
|
|
Height = 13
|
|
Margins.Bottom = 0
|
|
Caption = 'Entidad receptora:'
|
|
end
|
|
object Label3: TLabel
|
|
Left = 24
|
|
Top = 171
|
|
Width = 42
|
|
Height = 13
|
|
Margins.Bottom = 0
|
|
Caption = 'Agencia:'
|
|
end
|
|
object Bevel1: TBevel
|
|
Left = 8
|
|
Top = 321
|
|
Width = 373
|
|
Height = 3
|
|
Anchors = [akLeft, akRight, akBottom]
|
|
Shape = bsBottomLine
|
|
ExplicitTop = 328
|
|
end
|
|
object Label1: TLabel
|
|
Left = 24
|
|
Top = 264
|
|
Width = 71
|
|
Height = 13
|
|
Margins.Bottom = 0
|
|
Caption = 'Guardar como:'
|
|
end
|
|
object Bevel2: TBevel
|
|
Left = 24
|
|
Top = 245
|
|
Width = 349
|
|
Height = 3
|
|
Anchors = [akLeft, akTop, akRight]
|
|
Shape = bsBottomLine
|
|
end
|
|
object Label5: TLabel
|
|
Left = 202
|
|
Top = 144
|
|
Width = 48
|
|
Height = 13
|
|
Margins.Bottom = 0
|
|
Caption = '(4 d'#237'gitos)'
|
|
end
|
|
object Label6: TLabel
|
|
Left = 202
|
|
Top = 171
|
|
Width = 48
|
|
Height = 13
|
|
Margins.Bottom = 0
|
|
Caption = '(4 d'#237'gitos)'
|
|
end
|
|
object Label7: TLabel
|
|
Left = 24
|
|
Top = 90
|
|
Width = 65
|
|
Height = 13
|
|
Margins.Bottom = 0
|
|
Caption = 'Identificador:'
|
|
end
|
|
object Label8: TLabel
|
|
Left = 301
|
|
Top = 90
|
|
Width = 54
|
|
Height = 13
|
|
Margins.Bottom = 0
|
|
Caption = '(15 d'#237'gitos)'
|
|
end
|
|
object Label9: TLabel
|
|
Left = 24
|
|
Top = 117
|
|
Width = 69
|
|
Height = 13
|
|
Margins.Bottom = 0
|
|
Caption = 'C'#243'digo I.N.E.:'
|
|
end
|
|
object Label10: TLabel
|
|
Left = 301
|
|
Top = 117
|
|
Width = 48
|
|
Height = 13
|
|
Margins.Bottom = 0
|
|
Caption = '(9 d'#237'gitos)'
|
|
end
|
|
object Label4: TLabel
|
|
Left = 24
|
|
Top = 201
|
|
Width = 78
|
|
Height = 13
|
|
Margins.Bottom = 0
|
|
Caption = 'Fecha de cargo:'
|
|
end
|
|
object edtCodEntidad: TcxMaskEdit
|
|
Left = 120
|
|
Top = 141
|
|
Properties.BeepOnError = True
|
|
Properties.MaxLength = 4
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
TabOrder = 2
|
|
Text = ' '
|
|
Width = 73
|
|
end
|
|
object edtCodAgencia: TcxMaskEdit
|
|
Left = 120
|
|
Top = 168
|
|
Properties.BeepOnError = True
|
|
Properties.MaxLength = 4
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
TabOrder = 3
|
|
Text = ' '
|
|
Width = 73
|
|
end
|
|
object CancelBtn: TButton
|
|
Left = 301
|
|
Top = 330
|
|
Width = 75
|
|
Height = 25
|
|
Anchors = [akLeft, akRight, akBottom]
|
|
Cancel = True
|
|
Caption = '&Cancelar'
|
|
ModalResult = 2
|
|
TabOrder = 7
|
|
OnClick = CancelBtnClick
|
|
end
|
|
object OKBtn: TButton
|
|
Left = 202
|
|
Top = 330
|
|
Width = 85
|
|
Height = 25
|
|
Action = actVolcar
|
|
Anchors = [akLeft, akRight, akBottom]
|
|
TabOrder = 6
|
|
end
|
|
object JvFilenameEdit1: TJvFilenameEdit
|
|
Left = 24
|
|
Top = 283
|
|
Width = 349
|
|
Height = 21
|
|
Flat = False
|
|
ParentFlat = False
|
|
Filter = 'Ficheros de norma 32 (*.C32)|*.C32'
|
|
DialogOptions = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist]
|
|
DialogTitle = 'Volcar a disco la remesa'
|
|
TabOrder = 5
|
|
end
|
|
object edtCodigoIdentif: TcxMaskEdit
|
|
Left = 120
|
|
Top = 87
|
|
Properties.BeepOnError = True
|
|
Properties.MaxLength = 15
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
TabOrder = 0
|
|
Text = ' '
|
|
Width = 167
|
|
end
|
|
object edtINE: TcxMaskEdit
|
|
Left = 120
|
|
Top = 114
|
|
Properties.BeepOnError = True
|
|
Properties.MaxLength = 9
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
TabOrder = 1
|
|
Text = ' '
|
|
Width = 167
|
|
end
|
|
object edtFechaCargo: TcxDateEdit
|
|
Left = 120
|
|
Top = 198
|
|
Properties.DateButtons = [btnToday]
|
|
Properties.ImmediatePost = True
|
|
Properties.SaveTime = False
|
|
Properties.ShowTime = False
|
|
Style.LookAndFeel.Kind = lfStandard
|
|
Style.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.Kind = lfStandard
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.Kind = lfStandard
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.Kind = lfStandard
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
TabOrder = 4
|
|
Width = 167
|
|
end
|
|
object pnlHeader: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 389
|
|
Height = 64
|
|
Align = alTop
|
|
BevelOuter = bvNone
|
|
Color = clWhite
|
|
Padding.Left = 25
|
|
Padding.Top = 8
|
|
Padding.Right = 25
|
|
Padding.Bottom = 8
|
|
ParentBackground = False
|
|
TabOrder = 8
|
|
object lblTitle: TLabel
|
|
AlignWithMargins = True
|
|
Left = 25
|
|
Top = 8
|
|
Width = 339
|
|
Height = 13
|
|
Margins.Left = 0
|
|
Margins.Top = 0
|
|
Margins.Right = 0
|
|
Margins.Bottom = 8
|
|
Align = alTop
|
|
Caption = 'Volcado de remesas a disco'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
ExplicitWidth = 155
|
|
end
|
|
object lblComments: TLabel
|
|
AlignWithMargins = True
|
|
Left = 50
|
|
Top = 29
|
|
Width = 314
|
|
Height = 24
|
|
Margins.Left = 25
|
|
Margins.Top = 0
|
|
Margins.Right = 0
|
|
Align = alClient
|
|
Caption = 'Introduzca los siguientes datos para realizar el volcado'
|
|
ExplicitWidth = 263
|
|
ExplicitHeight = 13
|
|
end
|
|
end
|
|
object JvFormStorage: TJvFormStorage
|
|
AppStorage = JvAppRegistryStorage
|
|
AppStoragePath = 'fEditorBase\'
|
|
VersionCheck = fpvcNocheck
|
|
StoredProps.Strings = (
|
|
'edtCodigoIdentif.Text'
|
|
'edtINE.Text')
|
|
StoredValues = <>
|
|
Left = 80
|
|
Top = 32
|
|
end
|
|
object JvAppRegistryStorage: TJvAppRegistryStorage
|
|
StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y'
|
|
StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N'
|
|
Root = 'Software\FactuGES'
|
|
SubStorages = <>
|
|
Left = 112
|
|
Top = 32
|
|
end
|
|
object ActionList1: TActionList
|
|
Left = 144
|
|
Top = 32
|
|
object actVolcar: TAction
|
|
Caption = 'Volcar a disco'
|
|
OnExecute = actVolcarExecute
|
|
OnUpdate = actVolcarUpdate
|
|
end
|
|
end
|
|
end
|