ProGestion/Modulos/Contactos/Cliente/uViewContactosAsociados.dfm
2007-06-21 16:12:43 +00:00

200 lines
7.1 KiB
Plaintext

inherited frViewContactosAsociados: TfrViewContactosAsociados
Width = 459
Height = 382
object dxLayoutControl1: TdxLayoutControl
Left = 0
Top = 0
Width = 459
Height = 382
Align = alClient
ParentBackground = True
TabOrder = 0
AutoContentSizes = [acsWidth, acsHeight]
DesignSize = (
459
382)
object ToolBar2: TToolBar
Left = 22
Top = 28
Width = 271
Height = 22
Align = alNone
Anchors = [akLeft, akTop, akRight]
ButtonWidth = 153
Caption = 'ToolBar1'
EdgeBorders = []
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Images = PngImageList
List = True
ParentShowHint = False
ShowCaptions = True
ShowHint = True
TabOrder = 0
Transparent = True
Wrapable = False
object bAsociarContacto: TToolButton
Left = 0
Top = 0
Action = actAnadir
AutoSize = True
end
object bEliminarContactoAsociado: TToolButton
Left = 123
Top = 0
Action = actEliminar
end
object bEditar: TToolButton
Left = 276
Top = 0
Action = actEditar
end
end
object DBLookupListBox1: TDBLookupListBox
Left = 24
Top = 58
Width = 411
Height = 13
Cursor = crHandPoint
BevelInner = bvNone
BevelOuter = bvNone
BevelKind = bkFlat
BorderStyle = bsNone
Ctl3D = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clActiveCaption
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsUnderline]
KeyField = 'CODIGOASOCIADO'
ListField = 'NOMBRE'
ListSource = DADataSource1
ParentCtl3D = False
ParentFont = False
TabOrder = 1
OnDblClick = actEditarExecute
end
object dxLayoutGroup1: TdxLayoutGroup
ShowCaption = False
Hidden = True
ShowBorder = False
object dxLayoutGroup2: TdxLayoutGroup
AutoAligns = [aaHorizontal]
AlignVert = avClient
Caption = 'Contactos asociados'
object dxLayoutControl1Item2: TdxLayoutItem
ShowCaption = False
Control = ToolBar2
ControlOptions.AutoColor = True
ControlOptions.ShowBorder = False
end
object dxLayoutControl1Item3: TdxLayoutItem
AutoAligns = [aaHorizontal]
AlignVert = avClient
Caption = 'DBLookupListBox1'
ShowCaption = False
Control = DBLookupListBox1
end
end
end
end
object DADataSource1: TDADataSource
Left = 72
Top = 24
end
object PngImageList: TPngImageList
PngImages = <
item
PngImage.Data = {
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
610000000970485973000017120000171201679FD252000002224944415478DA
95935D48936114C77FCB36584A6064161515DEA441108B240293E8A682246805
DEA45020F40196505D081242DE94512B8C20169937056914D52E726B6083B114
D44CD3D51A216BB6656B5FEF677B5FF31D23033DF070CE03CFFFF73F1CCE6362
29D1806AD44E4C5A32F5F58FAA8BD5D73DD8465757034D4D4EFA4E8C62000ED7
56E997647490DFE131BD2ED9584971D98EB9478D2603D279B39EE6733DC6DD00
68E2EF7E07E95F2291688C48629ABDC71DACABD8AD0334E7B420104D24F4A3D5
DDD707E60087F66C2234D0CECF2F41643987556566676799C9C4387AD18FF964
91E178EA522DF73ADC851D1CA85ECD27D77948995861B552844C2A9962303441
DD051FA22473E5095C735B3972DAC6D3DB016EED7BC9FD47CFE601E57CF3B661
C966D1E62C880299549A696915B6639D4892A243D6B6AC349C0B00DA0C22EF7B
484EBDCA015424512491125036D751B1CBAE8BB5330F12459937EF860A01DEA0
8BA0FB0E5B154BAE832C810CACDF594F4DD5C17FC45AF6FA87F3800D95022DFD
ADC47E84682CDF8F222A3C9CF1303915E6C3E5495DDC7AE379C14E546F5F9307
F8E4C7BC187F4BA6344E49D24C6E8A24AD12E65809A1895102CD6386B3F8B793
C0F0C73CC0196927188E2297651096A7D096D4922D6659DCC2E7AF43F8CE8C70
F5AEEBFF1D9CF5D889C7230BAE6F696939BDF6D7BAABACA87A567279647C320F
A8B16DA1BBD7B3A47FA5850168EB702C596C6CA2AA2EFA332E187F0080F1503E
182A98A90000000049454E44AE426082}
Name = 'PngImage3'
Background = clWindow
end
item
PngImage.Data = {
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
610000000970485973000017120000171201679FD252000000714944415478DA
63FCFFFF3F03258071D4002A1B10DA7E13CC01897DFDFA83E1DBB71F60FAFBB7
9F0C9F3F7F03E3F7FBA219F11A1013A500E77FFCCCC8F0EA1D23C38BB74C0CCF
5E3131AC9E3397E1F7E914DC0684B4DDF88FCBE62F9FBF33FCF9F397E1FFF974
DC060C7C208E1A401E0000EFE473E127272ED00000000049454E44AE426082}
Name = 'PngImage1'
Background = clWindow
end
item
PngImage.Data = {
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
610000000970485973000017120000171201679FD252000002234944415478DA
A5934F4814511CC7BF6BBAB0AD97225B2A2B4B88ECB014861241ED2190FE9017
2D15843A74E8E0A14D3282608935920E092D7A10A44C25A843497FEDA0EB422D
2DE6A2F647ADA5C542A6DD76DB6CC79979F3DE34F3CA99C4BAB40F1EEF0DEF7D
3FDFEFFC783F9BA669C865D8EE0FBDCE89C001473D3BF8473631861FB36FF9BE
7063199C45BBCC8B4C4FAAAA0C44A5E6ACAA3F67010CF19748000BDF0984440A
C2FC1CF61F0F605DE91EA894E17CAFB2C4B9246F18DD7D03BF0087F76E46FCB9
1FDF3EC640A97EAA5164321924A5146A5A22A6A391C0E971724097F7B1053858
B90633835E40B461A5C38115A010B322C6E2D3A83E1BE6E24B7781D676070A1A
9A40FAAFA3270A74569D5E04B8F039E4835D96757740210A24710173EA6A941F
BBC69D676E3BF169EB3892E37DC86B6EE3294C805103E1553FB21F9EE800BD58
84605E54C04AAA515A51CBC5EE230108D38F7073A402EB7D3EC83D7FFC820108
C506111BEEC07666D713C81895800DBB1BB0E94D9D2936668DBF180F9E85118A
4C5880E23205CD431791FA1AC749D70130C2702B1944A73DBA4CECA96BE5F12B
DD6B2D4098DEC1C3A91148ABD228CC1640AF223A94977F7526BFDFC2E8C43B0B
7043F023369B002D92A0E48BF0CA67B09334C2B5EDD032E7C5B1244153B016E9
B4601E5E75B7E344633DA2DDF95C3CF0F40577A54CE32BD3D7C9A9F716605FF9
16F4DE0B9A80B60BA7CC7DCBE5AE7FF68109F05D09FC7F33E5DACE3F0109DB53
BED36F80890000000049454E44AE426082}
Name = 'PngImage2'
Background = clWindow
end>
Left = 120
Top = 24
Bitmap = {}
end
object ActionList1: TActionList
Images = PngImageList
Left = 32
Top = 24
object actAnadir: TAction
Caption = 'Asociar contacto...'
ImageIndex = 0
OnExecute = actAnadirExecute
end
object actEliminar: TAction
Caption = 'Eliminar contacto asociado'
ImageIndex = 1
OnExecute = actEliminarExecute
OnUpdate = actEliminarUpdate
end
object actEditar: TAction
Caption = 'Editar contacto'
ImageIndex = 2
OnExecute = actEditarExecute
OnUpdate = actEditarUpdate
end
end
object XPManifest1: TXPManifest
Left = 32
Top = 64
end
end