david
bd7a099c7d
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES/trunk@4 b68bf8ae-e977-074f-a058-3cfd71dd8f45
441 lines
15 KiB
Plaintext
441 lines
15 KiB
Plaintext
object frElegirEmpresa: TfrElegirEmpresa
|
||
Left = 0
|
||
Top = 0
|
||
Width = 594
|
||
Height = 370
|
||
Color = 16383743
|
||
Font.Charset = DEFAULT_CHARSET
|
||
Font.Color = clWindowText
|
||
Font.Height = -11
|
||
Font.Name = 'Tahoma'
|
||
Font.Style = []
|
||
ParentColor = False
|
||
ParentFont = False
|
||
TabOrder = 0
|
||
OnShow = RdxFrameEmpresasShow
|
||
object Shape1: TShape
|
||
Left = 0
|
||
Top = 60
|
||
Width = 594
|
||
Height = 1
|
||
Align = alTop
|
||
end
|
||
object Image6: TImage
|
||
Left = 0
|
||
Top = 61
|
||
Width = 594
|
||
Height = 10
|
||
Align = alTop
|
||
AutoSize = True
|
||
end
|
||
object DBCtrlGrid1: TDBCtrlGrid
|
||
Left = 24
|
||
Top = 80
|
||
Width = 550
|
||
Height = 240
|
||
AllowDelete = False
|
||
AllowInsert = False
|
||
ColCount = 1
|
||
Color = 15726583
|
||
DataSource = dsEmpresas
|
||
PanelBorder = gbNone
|
||
PanelHeight = 60
|
||
PanelWidth = 533
|
||
ParentColor = False
|
||
TabOrder = 0
|
||
RowCount = 4
|
||
SelectedColor = 12775679
|
||
OnDblClick = actAbrirExecute
|
||
object DBText1: TDBText
|
||
Left = 64
|
||
Top = 6
|
||
Width = 360
|
||
Height = 17
|
||
DataField = 'NOMBRE'
|
||
DataSource = dsEmpresas
|
||
Font.Charset = DEFAULT_CHARSET
|
||
Font.Color = clWindowText
|
||
Font.Height = -13
|
||
Font.Name = 'Verdana'
|
||
Font.Style = [fsBold]
|
||
ParentFont = False
|
||
Transparent = True
|
||
OnDblClick = actAbrirExecute
|
||
end
|
||
object DBText2: TDBText
|
||
Left = 64
|
||
Top = 24
|
||
Width = 361
|
||
Height = 28
|
||
DataField = 'CALLE'
|
||
DataSource = dsEmpresas
|
||
Transparent = True
|
||
OnDblClick = actAbrirExecute
|
||
end
|
||
object FourthStandardButton1: TFourthStandardButton
|
||
Left = 438
|
||
Top = 8
|
||
Width = 90
|
||
Height = 20
|
||
Action = actModificar
|
||
Caption = 'Modificar'
|
||
Options.Alignment = taLeftJustify
|
||
Options.BackgroundColor = 14280169
|
||
Options.DisabledFont.Charset = DEFAULT_CHARSET
|
||
Options.DisabledFont.Color = clBtnShadow
|
||
Options.DisabledFont.Height = -11
|
||
Options.DisabledFont.Name = 'Tahoma'
|
||
Options.DisabledFont.Style = []
|
||
Options.DrawLeftLine = True
|
||
Options.DrawRightLine = True
|
||
Options.Font.Charset = DEFAULT_CHARSET
|
||
Options.Font.Color = clBlack
|
||
Options.Font.Height = -11
|
||
Options.Font.Name = 'Tahoma'
|
||
Options.Font.Style = []
|
||
Options.HotTrackCursor = crDefault
|
||
Options.HotTrackFont.Charset = DEFAULT_CHARSET
|
||
Options.HotTrackFont.Color = clBtnText
|
||
Options.HotTrackFont.Height = -11
|
||
Options.HotTrackFont.Name = 'Tahoma'
|
||
Options.HotTrackFont.Style = []
|
||
Options.Level1LightColor = 8623776
|
||
Options.Level1ShadowColor = 8623776
|
||
Options.Level2LightColor = 8623776
|
||
Options.Level2ShadowColor = 8623776
|
||
Options.Level3Color = 15726583
|
||
Options.SeparatorStyle = ssRectangle
|
||
Options.Transparent = False
|
||
Options.VertLineColor = 8623776
|
||
end
|
||
object FourthStandardButton2: TFourthStandardButton
|
||
Left = 438
|
||
Top = 33
|
||
Width = 90
|
||
Height = 20
|
||
Action = actEliminar
|
||
Caption = 'Eliminar'
|
||
Options.Alignment = taLeftJustify
|
||
Options.BackgroundColor = 14280169
|
||
Options.DisabledFont.Charset = DEFAULT_CHARSET
|
||
Options.DisabledFont.Color = clBtnShadow
|
||
Options.DisabledFont.Height = -11
|
||
Options.DisabledFont.Name = 'Tahoma'
|
||
Options.DisabledFont.Style = []
|
||
Options.DrawLeftLine = True
|
||
Options.DrawRightLine = True
|
||
Options.Font.Charset = DEFAULT_CHARSET
|
||
Options.Font.Color = clBlack
|
||
Options.Font.Height = -11
|
||
Options.Font.Name = 'Tahoma'
|
||
Options.Font.Style = []
|
||
Options.HotTrackCursor = crDefault
|
||
Options.HotTrackFont.Charset = DEFAULT_CHARSET
|
||
Options.HotTrackFont.Color = clBtnText
|
||
Options.HotTrackFont.Height = -11
|
||
Options.HotTrackFont.Name = 'Tahoma'
|
||
Options.HotTrackFont.Style = []
|
||
Options.Level1LightColor = 8623776
|
||
Options.Level1ShadowColor = 8623776
|
||
Options.Level2LightColor = 8623776
|
||
Options.Level2ShadowColor = 8623776
|
||
Options.Level3Color = 15726583
|
||
Options.SeparatorStyle = ssRectangle
|
||
Options.Transparent = False
|
||
Options.VertLineColor = 8623776
|
||
end
|
||
object DBImage1: TDBImage
|
||
Left = 6
|
||
Top = 5
|
||
Width = 50
|
||
Height = 50
|
||
BorderStyle = bsNone
|
||
DataField = 'Logotipo'
|
||
DataSource = dsEmpresas
|
||
Stretch = True
|
||
TabOrder = 2
|
||
OnDblClick = actAbrirExecute
|
||
end
|
||
end
|
||
object pnlBarraSuperior: TRdxGradientePanel
|
||
Left = 0
|
||
Top = 0
|
||
Width = 594
|
||
Height = 60
|
||
Align = alTop
|
||
BevelOuter = bvNone
|
||
ParentColor = True
|
||
TabOrder = 2
|
||
BackGroundEffect = bdFlat
|
||
ColorEnd = clBtnFace
|
||
ColorShadow = clBtnFace
|
||
ColorStart = clBtnFace
|
||
object imgFondo: TImage
|
||
Left = -1406
|
||
Top = 0
|
||
Width = 2000
|
||
Height = 60
|
||
Align = alRight
|
||
AutoSize = True
|
||
end
|
||
object Image1: TImage
|
||
Left = 13
|
||
Top = 13
|
||
Width = 36
|
||
Height = 36
|
||
AutoSize = True
|
||
Center = True
|
||
Picture.Data = {
|
||
0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000002400
|
||
0000240806000000E1009898000000097048597300000B1300000B1301009A9C
|
||
180000000467414D410000B18E7CFB51930000076C4944415478DABD9809509C
|
||
E519C7FFEFB21C0BCB994DB82140219433218018A86626B5D15093386A6A66AC
|
||
9DB166B4338E3A1393CED0F16A2771AA36A6EAD04E469BDA9C4A48C6D86A1095
|
||
2BC89540C2B5B09C3120A7105816D86F977DFBBC7B905D12C295F19DFDCFBEDF
|
||
B7EFF73EBF7D9EE7BD3EC63987288C312CB1DC47BA48322DF5C1DB95598E6502
|
||
3D42FA17A989F42EE9DC4AC15602B45326931D7B25E78F4AB5BA05673FFB9C1B
|
||
8DC67CBAFF12A9F7A706DAE3E4E474F8E5979E571C783D074E4CC64ACBCBF92B
|
||
6FBC898B9535632693E93FD4E6ADE5802D1548467AD17F8DEAADF7DF39207F74
|
||
FB362E9AD3C38C5357A69919545FAAC507473E46DEF92F6F180CC64FA97D2EA9
|
||
41D8BADB407EA4F74283039EF8ECE487B20D8971F48C890B3B66205137F7216E
|
||
9970F94A03728F9E6667FEFBF5B47642574C3F1C227D8305726CB140C233F90A
|
||
85DBCEC2FCA3C84CDF60356C316E83B80974F37E7D93062FBCFA0E4A2AEAC48F
|
||
47482F90A4950009980FA2D6863E77EEDF8759C2CFA3B930660993C52BF6757B
|
||
2F3108CF71F3FD0B45DF21E7ED0F71A5B9A39D1AFC9D748C34BE54A0B5A44F13
|
||
D645A5167E928B80D5BE560376C66085B3D61D80CCAC96B08A6B4A769C2EACC3
|
||
337BFFC2A6F5D22E6A98B714202F52656458506C49FE3F10ECBF0A96FCB57A05
|
||
A6D97F6F5FB70F9F05DA064472F54267EF08D21EFA2D1BD54E2D0948453ABA39
|
||
637DF6B17773101CA072347087BA7D0EDDF4227D9C95E819955092978BE7738B
|
||
D8D8A461D140DB44CE6CDB92B9F6D4DFF6C2D343015B286CC3FB660ECD09DF6C
|
||
82DB03D195FB6A74F78FA18C3CADD78D63FF89862501BD465FAF5F38FD4FFCEA
|
||
BE74305D1F6094AC508083515BCE388C34C03E97B83208DD4393B8782617D313
|
||
37CC36F61DAFC792818EE63CC6EFDFBC05AA88447838937774FD6033D2AD730F
|
||
E68C32DBFCC7640413CC5A3A7BF8A582530433366B74591EFA68DF769E14E50F
|
||
E62487A77F2402A23742E94A13B3AE9F43D2CD86C30C4485DB3A304F14724CBB
|
||
87A2B6BA82B5561570A3A47730BA6CA0087F770C0F0D232222024ECEAEF00D4F
|
||
66FE5189DCCD3008A6ED9B85980B34E31389F2922268AA0B1937996E5932960D
|
||
14E22B47716909941E4A24252621303090C9155E7C75742A56F9873017699843
|
||
37609D0EA803F28CD12B12B5359568283E27563747CFDD0DA0AE9E7E6CDDB11B
|
||
05E73FC1606F375B17B38E0B8FB928BC984F581C5F131E0385F106E353A35CEB
|
||
1288D22FF2D0A7A91330B786724540FBB723C4D7191DDFF7E2D1DDBF875E92D0
|
||
D7D787A22FCFD0A8D3232D351DDEDEDE7051FA62754C06BCD684E3AB138730D4
|
||
ADC6426559A3CCE6214DD77564EFD885D1BE2EC8159E8CB978F2B6D646B4D4D7
|
||
302FA53B4F888F87A79737D34E9B785B632DEC1D72773D640552B777E3810777
|
||
A0B0B41285973AD8639BE3F986B89F41EEEECBAE75B7F1B6AB95C8CAFA051B1C
|
||
18E0D7AF5F77E87C01A067A9FA3149BF38206BC84ACBCA90B9290BAA552A5CD6
|
||
FC80F7CE56E1775BD7E397A951301A67505353817B3336617070103D73801608
|
||
D99B542D245D836567A95F9487EA1A1AE1EDB30A266912EB626299938B828F68
|
||
A710EEEFC32449E2B575979071CFBDCBF1D041AA16C3B2051925F5932638374F
|
||
FBF30375F70EE0A9E75EC677C51728A1CFB1B0B0709E9C940CDA53338341E275
|
||
75B5484FBF6725405A9258537E14DFD4DC70472031EC773FB507D2F424260D60
|
||
755565BCB3E50A428243584040206F6A6A445A5ADAA2816EE80C7835AF89E90D
|
||
A6E5003913501F1ED9F524DA5B9AE0EEE6C23CBC7CB9C49DD1A6AE67DD9A06EE
|
||
E62227A0F445010D8DEB71E87F6D189990AAE8F27D71CB0E6850846E76F6BF1D
|
||
50A89F0B9A35EDC8FEF54E34A8DB71F0D8B72C32C88F3FBD6D2382028398C1C4
|
||
F9E5F2AF919292B22050EFC8140E7FD186F129E329BA3C09CB2A6CB002D19602
|
||
DF5B727A9EA43EB2F7611E1FEE87AB57AF605C3B8EF4B40C3111B2829A763EA5
|
||
376047662CE59081373737223979FD1D817ED44A78FB730D467592387588132E
|
||
B30219AD23AC853433DF281313D69F83549E317BB253F0406A2426C6C7D0417B
|
||
73575737161E1ECE692284DC9CD406AE5637232929695EA0D61FB4FCA3A22E91
|
||
3B3574EBAFA4693BA01E588EE133B667E6DBC2BA92C4CEF10D95B77BC2E39BE3
|
||
F0F8FD713019A6181935370D0D0D631E1E1E5CA369454242C22D40144D94A987
|
||
D9D9EA5EC3B4C124CEFC2254B6E30FB38648C0389CD3163A7528494F935E5B1B
|
||
E0E3B7FF894CA4C404627464189D9D9D7077F7009DEF114FCBC7DC89F1ABFA01
|
||
E457F58A889DB4C2D8976E921AB739342EF6A01846FA934CC69E4C8F0D563CFB
|
||
F046C486FAB1A1A121AED3E9101D1DEDE0A18AB6111C2FBBA637CEF0137479DE
|
||
9A2BB6D241D2609EA3F552CFF601A4679C64ECC5E4A800D5EE2D093C2B310CCE
|
||
7227335067D7359CA9EE15A19A9A3171B134D4CD31DC6A059AB72CF7ED4734E9
|
||
10B5CDDE9A16C5F6FD6613F493E33870FC22CA5B874547E21C5F34E719E1BEFA
|
||
853A5EC9FB21D1308B74D0D5599E951CA9E2D5ADFD624E11135E85D533A28DC8
|
||
13B180B660112FB356FA06CD06964AFA03A9009684B52F6234F52DB6331BC7FF
|
||
016DF07504D0BA55770000000049454E44AE426082}
|
||
end
|
||
object Label1: TLabel
|
||
Left = 61
|
||
Top = 12
|
||
Width = 125
|
||
Height = 21
|
||
Caption = 'Lista de empresas'
|
||
Font.Charset = DEFAULT_CHARSET
|
||
Font.Color = clWhite
|
||
Font.Height = -16
|
||
Font.Name = 'Franklin Gothic Medium'
|
||
Font.Style = []
|
||
ParentFont = False
|
||
Transparent = True
|
||
end
|
||
object Label2: TLabel
|
||
Left = 62
|
||
Top = 33
|
||
Width = 235
|
||
Height = 13
|
||
Caption = 'Seleccione la empresa con la que desea trabajar.'
|
||
Font.Charset = DEFAULT_CHARSET
|
||
Font.Color = clWhite
|
||
Font.Height = -11
|
||
Font.Name = 'Tahoma'
|
||
Font.Style = []
|
||
ParentFont = False
|
||
Transparent = True
|
||
end
|
||
end
|
||
object brDoble: TRdxBarraInferior
|
||
Left = 0
|
||
Top = 320
|
||
Width = 594
|
||
Height = 50
|
||
Caption = ' '
|
||
ParentColor = True
|
||
ColorHighLight = 8623776
|
||
ColorShadow = 8623776
|
||
Align = alBottom
|
||
TabOrder = 1
|
||
UseDockManager = True
|
||
Margen = 10
|
||
object bSeleccionar: TRdxBoton
|
||
Left = 397
|
||
Top = 17
|
||
Width = 90
|
||
Height = 25
|
||
Default = True
|
||
Action = actAbrir
|
||
Alignment = taLeftJustify
|
||
Color = 14280169
|
||
ColorFocused = 12775679
|
||
ColorDown = 14280169
|
||
ColorBorder = 8623776
|
||
ColorHighLight = 8623776
|
||
ColorShadow = 8623776
|
||
Font.Charset = DEFAULT_CHARSET
|
||
Font.Color = clBlack
|
||
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 = 1
|
||
Spacing = 6
|
||
end
|
||
object bCancelar: TRdxBoton
|
||
Left = 494
|
||
Top = 17
|
||
Width = 90
|
||
Height = 25
|
||
Cancel = True
|
||
Alignment = taLeftJustify
|
||
Color = 14280169
|
||
ColorFocused = 12775679
|
||
ColorDown = 14280169
|
||
ColorBorder = 8623776
|
||
ColorHighLight = 8623776
|
||
ColorShadow = 8623776
|
||
Caption = 'Cancelar'
|
||
Font.Charset = DEFAULT_CHARSET
|
||
Font.Color = clBlack
|
||
Font.Height = -11
|
||
Font.Name = 'Tahoma'
|
||
Font.Style = []
|
||
FontDown.Charset = DEFAULT_CHARSET
|
||
FontDown.Color = clBlack
|
||
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 = 2
|
||
Spacing = 6
|
||
ModalResult = 2
|
||
end
|
||
object bGestionar: TRdxBoton
|
||
Left = 9
|
||
Top = 17
|
||
Width = 176
|
||
Height = 25
|
||
Action = actAnadir
|
||
Alignment = taLeftJustify
|
||
Color = 14280169
|
||
ColorFocused = 12775679
|
||
ColorDown = 14280169
|
||
ColorBorder = 8623776
|
||
ColorHighLight = 8623776
|
||
ColorShadow = 8623776
|
||
Font.Charset = DEFAULT_CHARSET
|
||
Font.Color = clBlack
|
||
Font.Height = -11
|
||
Font.Name = 'Tahoma'
|
||
Font.Style = []
|
||
FontDown.Charset = DEFAULT_CHARSET
|
||
FontDown.Color = clWindowText
|
||
FontDown.Height = -11
|
||
FontDown.Name = 'Tahoma'
|
||
FontDown.Style = []
|
||
Margin = 5
|
||
ParentFont = False
|
||
ParentColor = False
|
||
TabStop = True
|
||
TabOrder = 0
|
||
Spacing = 6
|
||
end
|
||
end
|
||
object dsEmpresas: TDataSource
|
||
Left = 40
|
||
Top = 272
|
||
end
|
||
object Acciones: TActionList
|
||
Left = 288
|
||
Top = 320
|
||
object actAnadir: TAction
|
||
Caption = 'A<>adir una empresa nueva...'
|
||
OnExecute = actAnadirExecute
|
||
end
|
||
object actModificar: TAction
|
||
Caption = 'Modificar'
|
||
OnExecute = actModificarExecute
|
||
end
|
||
object actEliminar: TAction
|
||
Caption = 'Eliminar'
|
||
OnExecute = actEliminarExecute
|
||
end
|
||
object actConsultar: TAction
|
||
Caption = 'Consultar'
|
||
end
|
||
object actCancelar: TAction
|
||
Caption = 'Cancelar'
|
||
end
|
||
object actAbrir: TAction
|
||
Caption = 'Seleccionar'
|
||
OnExecute = actAbrirExecute
|
||
end
|
||
object actCerrar: TAction
|
||
Caption = 'Cerrar'
|
||
end
|
||
end
|
||
end
|