This repository has been archived on 2024-11-29. You can view files and clone it, but cannot push or open issues or pull requests.
Tecsitel_FactuGES/Obras/AlbaranInstalador.dfm
2007-06-21 15:47:20 +00:00

608 lines
17 KiB
Plaintext

object frAlbaranInstalador: TfrAlbaranInstalador
Left = 0
Top = 0
Width = 708
Height = 692
Color = 16383743
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 0
Visible = False
Entidad = entAlbaranCliente
BarraSalir = brSalir
BarraOperacion = brGuardar
object pnlTitulo: TRdxPanelTituloOperacion
Left = 0
Top = 0
Width = 708
Height = 22
Caption = ' albarán de cliente'
Color = 11461094
Align = alTop
Font.Charset = DEFAULT_CHARSET
Font.Color = 2323077
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
end
object brSalir: TRdxBarraInferior
Left = 0
Top = 592
Width = 708
Height = 50
Caption = ' '
ParentColor = True
Visible = False
ColorHighLight = clBtnFace
ColorShadow = clBtnFace
Align = alBottom
TabOrder = 2
UseDockManager = True
Margen = 10
object bSalir: TRdxBoton
Left = 10
Top = 20
Width = 75
Height = 25
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
GroupIndex = 1
Down = True
Caption = 'Aceptar'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
FontDown.Charset = DEFAULT_CHARSET
FontDown.Color = clWindowText
FontDown.Height = -11
FontDown.Name = 'Tahoma'
FontDown.Style = []
Glyph.Data = {
DE000000424DDE0000000000000076000000280000000E0000000D0000000100
04000000000068000000220B0000220B000010000000100000000000000000FF
0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222022222
2200222220102222220022220110222222002220111102222200220111110222
2200201100111022220001002201102222002022222011022200222222220110
2200222222222011020022222222220110002222222222201000222222222222
0200}
Margin = 5
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 0
Spacing = 6
OnClick = bSalirClick
end
end
object brGuardar: TRdxBarraInferior
Left = 0
Top = 642
Width = 708
Height = 50
Caption = ' '
ParentColor = True
Visible = False
ColorHighLight = clBtnFace
ColorShadow = clBtnFace
Align = alBottom
TabOrder = 1
UseDockManager = True
Margen = 10
object bGuardar: TRdxBoton
Left = 10
Top = 20
Width = 75
Height = 25
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
GroupIndex = 1
Caption = 'Aceptar'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
FontDown.Charset = DEFAULT_CHARSET
FontDown.Color = clWindowText
FontDown.Height = -11
FontDown.Name = 'Tahoma'
FontDown.Style = []
Glyph.Data = {
DE000000424DDE0000000000000076000000280000000E0000000D0000000100
04000000000068000000220B0000220B000010000000100000000000000000FF
0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222022222
2200222220102222220022220110222222002220111102222200220111110222
2200201100111022220001002201102222002022222011022200222222220110
2200222222222011020022222222220110002222222222201000222222222222
0200}
Margin = 5
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 0
Spacing = 6
OnClick = bGuardarClick
end
object bCancelar: TRdxBoton
Left = 95
Top = 20
Width = 75
Height = 25
Cancel = True
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
GroupIndex = 1
Down = True
Caption = 'Cancelar'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
FontDown.Charset = DEFAULT_CHARSET
FontDown.Color = clWindowText
FontDown.Height = -11
FontDown.Name = 'Tahoma'
FontDown.Style = []
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
04000000000080000000220B0000220B0000100000001000000000009C006363
9C00C6C6C6000000CE003131CE000000FF000063FF00319CFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
2222222222222222222222022222222225222450222222222222247502222222
5222224632222225222222235022225022222222350225022222222223505022
2222222222350222222222222350302222222222350223022222223550222230
2222237502222223022221312222222223222222222222222222}
Margin = 5
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 1
Spacing = 6
OnClick = bCancelarClick
end
end
object pnlScroll: TRdxScrollPanel
Left = 0
Top = 22
Width = 708
Height = 570
HorzScrollBar.Smooth = True
HorzScrollBar.Style = ssFlat
VertScrollBar.Smooth = True
VertScrollBar.Style = ssFlat
Align = alClient
BevelOuter = bvNone
Caption = 'pnlScroll'
ParentColor = True
TabOrder = 0
object pnlAlbaran: TRdxPanel
Tag = 1
Left = 0
Top = 0
Width = 708
Height = 100
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 8623776
Align = alTop
TabOrder = 0
TabStop = True
UseDockManager = True
object cDatosAlbaran: TRdxCabecera
Left = 0
Top = 0
Width = 708
Height = 30
Cursor = crHandPoint
Caption = 'Datos del albarán'
Align = alTop
Font.Charset = DEFAULT_CHARSET
Font.Color = 2323077
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
Margen = 10
end
object eCodigo: TLabel
Left = 55
Top = 50
Width = 91
Height = 13
Alignment = taRightJustify
Caption = 'Código de albarán:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eFechaAlta: TLabel
Left = 282
Top = 50
Width = 54
Height = 13
Alignment = taRightJustify
Caption = 'Fecha alta:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eUsuario: TLabel
Left = 481
Top = 50
Width = 40
Height = 13
Alignment = taRightJustify
Caption = 'Usuario:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
Visible = False
end
object eNombre: TLabel
Left = 93
Top = 78
Width = 53
Height = 13
Alignment = taRightJustify
Caption = 'Instalador:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eTelefono1: TLabel
Left = 475
Top = 77
Width = 46
Height = 13
Alignment = taRightJustify
Caption = 'Teléfono:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Codigo: TRdxDBEdit
Left = 154
Top = 46
Width = 110
Height = 19
VerBoton = True
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 15726583
ColorBoton = 12775679
DataField = 'CODIGO'
DataSource = dsAlbaran
TabOrder = 0
Text = 'Codigo'
OnExit = CodigoExit
OnButtonClick = CodigoButtonClick
end
object Usuario: TRdxDBEdit
Left = 529
Top = 46
Width = 110
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 15726583
DataField = 'USUARIO'
DataSource = dsAlbaran
TabOrder = 2
Text = 'Usuario'
Visible = False
end
object FechaAlta: TcxDBDateEdit
Left = 343
Top = 46
Width = 110
Height = 21
DataBinding.DataField = 'FECHAALTA'
DataBinding.DataSource = dsAlbaran
Properties.DateOnError = deToday
Properties.ImmediatePost = True
Properties.InputKind = ikMask
TabOrder = 1
end
object Nombre: TRdxDBEdit
Left = 154
Top = 74
Width = 300
Height = 19
VerBoton = True
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 15726583
DataField = 'NOMBRE'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 3
Text = 'Nombre'
OnExit = NombreExit
OnButtonClick = NombreButtonClick
end
object Telefono: TRdxDBEdit
Left = 529
Top = 74
Width = 110
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 15726583
DataField = 'TELEFONO'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 4
Text = 'Telefono'
end
object CodInstalador: TcxDBButtonEdit
Left = 652
Top = 74
Width = 112
Height = 21
DataBinding.DataField = 'CODIGOINSTALADOR'
DataBinding.DataSource = dsAlbaran
ParentFont = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.MaxLength = 10
TabOrder = 5
Visible = False
end
end
object pnlGridArticulos: TPanel
Left = 0
Top = 100
Width = 708
Height = 355
Align = alClient
BevelOuter = bvNone
BorderWidth = 10
ParentColor = True
TabOrder = 1
TabStop = True
object pnlBarraGrid: TRdxPanel
Left = 10
Top = 10
Width = 688
Height = 28
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 16383743
Align = alTop
TabOrder = 0
UseDockManager = True
object bAnadir: TRdxBoton
Left = 0
Top = 4
Width = 75
Height = 19
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
Caption = 'Añadir'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
FontDown.Charset = DEFAULT_CHARSET
FontDown.Color = clWindowText
FontDown.Height = -11
FontDown.Name = 'Tahoma'
FontDown.Style = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 0
Spacing = 0
OnClick = bAnadirClick
end
object bEliminar: TRdxBoton
Left = 80
Top = 4
Width = 75
Height = 19
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
Caption = 'Eliminar'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
FontDown.Charset = DEFAULT_CHARSET
FontDown.Color = clWindowText
FontDown.Height = -11
FontDown.Name = 'Tahoma'
FontDown.Style = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 1
Spacing = 0
OnClick = bEliminarClick
end
object bEliminarTodo: TRdxBoton
Left = 160
Top = 4
Width = 81
Height = 19
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
Caption = 'Eliminar todo'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
FontDown.Charset = DEFAULT_CHARSET
FontDown.Color = clWindowText
FontDown.Height = -11
FontDown.Name = 'Tahoma'
FontDown.Style = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 2
Spacing = 0
OnClick = bEliminarTodoClick
end
end
object gridDetalles: TdxDBGrid
Left = 10
Top = 38
Width = 688
Height = 307
Bands = <
item
end>
DefaultLayout = False
HeaderPanelRowCount = 1
SummaryGroups = <>
SummarySeparator = ', '
Align = alClient
Color = 15726583
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 1
BandColor = 8623776
BandFont.Charset = DEFAULT_CHARSET
BandFont.Color = clWindowText
BandFont.Height = -11
BandFont.Name = 'Tahoma'
BandFont.Style = []
DataSource = dsDetallesAlbaran
Filter.Criteria = {00000000}
GridLineColor = 14280169
GroupPanelColor = 8623776
GroupPanelFontColor = 15726583
GroupNodeColor = 14280169
HeaderColor = 14280169
HeaderFont.Charset = DEFAULT_CHARSET
HeaderFont.Color = clWindowText
HeaderFont.Height = -11
HeaderFont.Name = 'Tahoma'
HeaderFont.Style = []
HideFocusRect = True
HideSelectionColor = 12775679
HideSelectionTextColor = clBlack
HighlightColor = 12775679
HighlightTextColor = clBlack
LookAndFeel = lfFlat
OptionsBehavior = [edgoAutoSearch, edgoCaseInsensitive, edgoDragScroll, edgoEnterShowEditor, edgoEnterThrough, edgoImmediateEditor, edgoShowHourGlass, edgoTabs, edgoTabThrough, edgoVertThrough]
OptionsCustomize = [edgoBandMoving, edgoBandSizing, edgoColumnMoving, edgoColumnSizing, edgoRowSizing]
OptionsDB = [edgoCancelOnExit, edgoSmartRefresh, edgoSyncSelection, edgoUseBookmarks]
OptionsView = [edgoAutoWidth, edgoBandHeaderWidth, edgoDrawEndEllipsis, edgoIndicator, edgoRowAutoHeight, edgoUseBitmap]
PreviewFont.Charset = DEFAULT_CHARSET
PreviewFont.Color = clBlue
PreviewFont.Height = -11
PreviewFont.Name = 'Tahoma'
PreviewFont.Style = []
end
end
object pnlImporteAlbaran: TRdxPanel
Left = 0
Top = 455
Width = 708
Height = 115
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 8623776
Align = alBottom
TabOrder = 2
TabStop = True
UseDockManager = True
end
end
object dsAlbaran: TDataSource
AutoEdit = False
Left = 672
Top = 62
end
object dsDetallesAlbaran: TDataSource
AutoEdit = False
Left = 680
Top = 102
end
end