inherited frViewDatosYSeleccionContacto: TfrViewDatosYSeleccionContacto Width = 450 Height = 238 Constraints.MinHeight = 202 Constraints.MinWidth = 350 object dxLayoutControl1: TdxLayoutControl Left = 0 Top = 0 Width = 450 Height = 238 Align = alClient Constraints.MinHeight = 214 Constraints.MinWidth = 429 ParentBackground = True TabOrder = 0 AutoContentSizes = [acsWidth, acsHeight] DesignSize = ( 450 238) object edtlNombre: TcxDBTextEdit Left = 97 Top = 56 Anchors = [akLeft, akTop, akRight] AutoSize = False DataBinding.DataField = 'NOMBRE' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clActiveCaption StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 1 Height = 21 Width = 515 end object edtTrabajo: TcxDBTextEdit Left = 97 Top = 110 Anchors = [akLeft, akTop, akRight] AutoSize = False DataBinding.DataField = 'TELEFONO2' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clActiveCaption StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 3 Height = 21 Width = 150 end object edtParticular: TcxDBTextEdit Left = 97 Top = 137 Anchors = [akLeft, akTop, akRight] AutoSize = False DataBinding.DataField = 'TELEFONO1' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clActiveCaption StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 5 Height = 21 Width = 150 end object edtMovil: TcxDBTextEdit Left = 286 Top = 110 Anchors = [akLeft, akTop, akRight] AutoSize = False DataBinding.DataField = 'MOVIL' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clActiveCaption StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 4 Height = 21 Width = 515 end object edtCorreo: TcxDBTextEdit Left = 97 Top = 164 Anchors = [akLeft, akTop, akRight] AutoSize = False DataBinding.DataField = 'CORREO1' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clActiveCaption StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 7 Height = 21 Width = 371 end object edtFax: TcxDBTextEdit Left = 286 Top = 137 Anchors = [akLeft, akTop, akRight] AutoSize = False DataBinding.DataField = 'FAX' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clActiveCaption StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 6 Height = 21 Width = 443 end object ToolBar1: TToolBar Left = 22 Top = 28 Width = 441 Height = 22 Align = alNone Anchors = [akLeft, akTop, akRight] ButtonWidth = 140 Caption = 'ToolBar1' EdgeBorders = [] EdgeInner = esNone EdgeOuter = esNone Flat = True Images = PngImageList List = True ParentShowHint = False ShowCaptions = True ShowHint = True TabOrder = 0 Transparent = False Wrapable = False object ToolButton1: TToolButton Left = 0 Top = 0 Action = actElegirContacto AutoSize = True end object ToolButton3: TToolButton Left = 117 Top = 0 Width = 8 Caption = 'ToolButton3' ImageIndex = 1 Style = tbsSeparator end object ToolButton2: TToolButton Left = 125 Top = 0 Action = actAnadirContacto end end object ToolBar2: TToolBar Left = 239 Top = 191 Width = 193 Height = 22 Align = alNone Anchors = [akLeft, akTop, akRight] AutoSize = True ButtonWidth = 189 Caption = 'ToolBar1' EdgeBorders = [] EdgeInner = esNone EdgeOuter = esNone Flat = True Images = PngImageList List = True ParentShowHint = False ShowCaptions = True ShowHint = True TabOrder = 8 Transparent = False Wrapable = False object ToolButton4: TToolButton Left = 0 Top = 0 Action = actVerContacto AutoSize = True end end object edtNIFCIF: TcxDBTextEdit Left = 97 Top = 83 Anchors = [akLeft, akTop, akRight] AutoSize = False DataBinding.DataField = 'NIFCIF' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.HotTrack = False Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clActiveCaption StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 2 Height = 21 Width = 310 end object dxLayoutControl1Group_Root: TdxLayoutGroup AutoAligns = [aaVertical] AlignHorz = ahClient ShowCaption = False Hidden = True ShowBorder = False object dxLayoutControl1Group1: TdxLayoutGroup Caption = 'Contacto' object dxLayoutControl1Item7: TdxLayoutItem ShowCaption = False Control = ToolBar1 ControlOptions.AutoColor = True ControlOptions.ShowBorder = False end object dxLayoutControl1Item1: TdxLayoutItem Caption = 'Nombre:' Control = edtlNombre ControlOptions.ShowBorder = False end object dxLayoutControl1Item9: TdxLayoutItem Caption = 'NIFCIF:' Control = edtNIFCIF ControlOptions.ShowBorder = False end object dxLayoutControl1Group2: TdxLayoutGroup ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Item2: TdxLayoutItem Caption = 'Tlf. trabajo:' Control = edtTrabajo ControlOptions.ShowBorder = False end object dxLayoutControl1Item4: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'M'#243'vil:' Control = edtMovil ControlOptions.ShowBorder = False end end object dxLayoutControl1Group3: TdxLayoutGroup ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Item3: TdxLayoutItem Caption = 'Tlf. particul.:' Control = edtParticular ControlOptions.ShowBorder = False end object dxLayoutControl1Item6: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Fax:' Control = edtFax ControlOptions.ShowBorder = False end end object dxLayoutControl1Item5: TdxLayoutItem Caption = 'E-mail trabajo:' Control = edtCorreo ControlOptions.ShowBorder = False end object dxLayoutControl1Item8: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahRight ShowCaption = False Control = ToolBar2 ControlOptions.AutoColor = True ControlOptions.ShowBorder = False end end end end object DADataSource: TDADataSource Left = 80 end object ActionList1: TActionList Images = PngImageList Left = 120 object actElegirContacto: TAction Caption = 'Elegir un contacto' ImageIndex = 1 OnExecute = actElegirContactoExecute end object actAnadirContacto: TAction Caption = 'Dar de alta un contacto' ImageIndex = 0 OnExecute = actAnadirContactoExecute end object actVerContacto: TAction Caption = 'Ver ficha completa del contacto...' ImageIndex = 2 OnExecute = actVerContactoExecute OnUpdate = actVerContactoUpdate end 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 = 'PngImage0' Background = clWindow end item PngImage.Data = { 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF 61000000097048597300000AC400000AC401666D82D4000002A94944415478DA 7D925D48536118C79FF3B5AF36DD66B639CB924243225010BC49BA914004CDE8 E32228B482EA4689A22289C8CBA28B32B1061688902912D28D16991F6062B2DC 45921FB954669BF39C9D6DE7EC9CF3EEBC9D2D8C2CB7079E9BF779FEBFF7F922 30C69034822060D3665F5F3A0B90B8C672FCAEC07AD8E35DF0DFBFE3F64EC05F F647F72FC0DB75AED1E1B43D138438C9B26108B11C0443BC30ECF959D731303F 9411D0D35C612C2ADBEF3319F5B992AC402412037F9003A4C8E05F17679BDA3E 976BA9D1F4807B95552E877D90222910250556023170E66481D900F0CD17C0AD 5DDE63F3CBFC505AC0685B6DE34654762B88009B350B8AF658815011C8521C04 518487DD530D9D83BECEB480C98EDA13F9798E5E9A61526F098440D1CA572409 24298EEFBA271B7BC756D203FA5A8FE49516EDF3313A5D8AA0AAAAD6BF929A01 CFC7505DCBBBAAD590349C710BD3EEFA57D916D3A954920648249255283031B3 3A7BE1D164A5F61CCC0878D15C917FA8C43165D6334E558B25DBD80847E51BCF A79B3E7D65DB33AEF1E04D570EE5723DB513C4C966E9006101ED0662043C6697 30B7DB3021CE6D5C5EEA58FAB22DE0F0ADBD36D25E38A6E6E2126413E00CAA81 FAE27AE85FEB876EF10D30DC0E2083542432F3E3F8E2CBC5F7FF01CA5A8E3E21 6CC6AB8A264636110C7A80EADC2AE88B0E004474C0B026A035C76BF2B2A7ED43 29E671680BA0FC76B50F5BC902641501658B90304BA0EA11100A05544C0774D8 0834A7396B04DFE8C8E9B58FC19EAD80EB358B84852E44D9F1DF62930C9856B5 6320801419A0A27AA079430AB4303E722530EE6FDF3A838B15E729B3E50195C3 D855B34A247F074A8BA91A40A2808C91803955E6E70233F36F3D0D58C6DEEDD6 B8D35040179B9DA602305266AC028925A4A0B822A090C20BAB09BF96F35D736E 53F70B90E997F07974AFDF0000000049454E44AE426082} Name = 'PngImage1' Background = clWindow end item PngImage.Data = { 89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF 610000000970485973000017120000171201679FD252000001EC4944415478DA A5934B6813511486BF541B88CD26620DA262A51BDB8520158308D5852055B01B A3E8CEBD2E7CE063512852D09D2E82E04604AB1B5D4451B059D8A6010D84D842 5B6B6B1A8D414A4C9B18EB4C27F3F466D41943ED4233309C3BDC39DFFFDF9F7B 3C9665D1C8E379323CD510C1061C3DD0697F48C531BEE7A7EDB57F6B072DADBB 9C1F4DE154D74D34DD70DE43272FB9805AF3975484E56F1A856289C2D23CFB4F 44D8D4BE17DD30B932A8D629B7358D70F7C1D39F8023FBB6917B35C0D78F590C 43EC5A06954A8505A5C4B1CB2947F14F07D158D205F48436F03E761E640FEB7C 3ED660204B3263B9597A2F24ED866B8F59DD414F28C8E7443FDE6A55A883AAA9 28F232F3FA7ABA8EDFAC53FEBD1E1A4DBB805A0685370F91E65E0880084BD358 9255CCB65EDAF784571E413378F97ABC1E90C8C6C88EDC6687E9150EAAA415D8 BCFB14DD9D875734D76A2235E102B674A85C1CEEA3B498E374F020A666727F21 4E662ECFDBAB19BBB9EFD6B3BA0C423B37BA80A4F188E733A32881327EA91991 22924FA7B9E427373B45FADCB4A3ACFD72929E78E702EE1506C8E68B18AD0AEA 5A595C2F44A02D3495BD7CF8344EF2CC24D7EFC4567770361EA65C2EFCF5AA06 0241A2E1215BD5302DBB9AA24ECE645C4077D77606A3F17F9E0307D07F23F2FF C3D4E838FF008E7263BE13CA147C0000000049454E44AE426082} Name = 'PngImage2' Background = clWindow end> Left = 152 Bitmap = {} end end