git-svn-id: https://192.168.0.254/svn/Proyectos.AlonsoYSal_FactuGES/trunk@5 9a1d36f3-7752-2d40-8ccb-50eb49674c68
138 lines
3.5 KiB
Plaintext
138 lines
3.5 KiB
Plaintext
inherited frViewDocumentosAsociados: TfrViewDocumentosAsociados
|
|
Width = 721
|
|
Height = 487
|
|
ParentFont = True
|
|
OnDestroy = CustomViewDestroy
|
|
object Panel10: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 721
|
|
Height = 487
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
BorderWidth = 10
|
|
Caption = ' '
|
|
Color = clWhite
|
|
ParentBackground = True
|
|
TabOrder = 0
|
|
object Panel11: TPanel
|
|
Left = 10
|
|
Top = 40
|
|
Width = 701
|
|
Height = 437
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
BorderWidth = 5
|
|
Caption = ' '
|
|
ParentBackground = True
|
|
ParentColor = True
|
|
TabOrder = 0
|
|
object explo: TcxShellListView
|
|
Left = 5
|
|
Top = 5
|
|
Width = 691
|
|
Height = 427
|
|
Align = alClient
|
|
DragDropSettings.DefaultDropEffect = deCopy
|
|
DragDropSettings.DropEffect = []
|
|
IconOptions.WrapText = False
|
|
MultiSelect = True
|
|
Options.ShowFolders = False
|
|
Options.ContextMenus = False
|
|
Options.TrackShellChanges = False
|
|
Options.ShowToolTip = False
|
|
Options.AutoNavigate = False
|
|
ParentFont = False
|
|
PopupMenu = GridPopupMenu
|
|
Root.BrowseFolder = bfCustomPath
|
|
Style.Font.Charset = DEFAULT_CHARSET
|
|
Style.Font.Color = clBlack
|
|
Style.Font.Height = -11
|
|
Style.Font.Name = 'Tahoma'
|
|
Style.Font.Style = []
|
|
Style.IsFontAssigned = True
|
|
TabOrder = 0
|
|
OnDblClick = exploDblClick
|
|
end
|
|
end
|
|
object pnlBarraDocumentos: TPanel
|
|
Left = 10
|
|
Top = 10
|
|
Width = 701
|
|
Height = 30
|
|
Align = alTop
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
BorderWidth = 5
|
|
Caption = ' '
|
|
ParentBackground = True
|
|
ParentColor = True
|
|
TabOrder = 1
|
|
object Button1: TButton
|
|
Left = 8
|
|
Top = 5
|
|
Width = 116
|
|
Height = 20
|
|
Action = actAnadirDocumento
|
|
TabOrder = 0
|
|
end
|
|
object Button2: TButton
|
|
Left = 129
|
|
Top = 5
|
|
Width = 116
|
|
Height = 20
|
|
Action = actElliminarDocumento
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
end
|
|
object OpenDialog1: TOpenDialog
|
|
Options = [ofHideReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
|
|
Left = 392
|
|
Top = 8
|
|
end
|
|
object ActionList1: TActionList
|
|
Left = 312
|
|
Top = 8
|
|
object actAnadirDocumento: TAction
|
|
Caption = 'A'#241'adir documento'
|
|
OnExecute = actAnadirDocumentoExecute
|
|
end
|
|
object actElliminarDocumento: TAction
|
|
Caption = 'Eliminar documento'
|
|
OnExecute = actElliminarDocumentoExecute
|
|
OnUpdate = actElliminarDocumentoUpdate
|
|
end
|
|
object actAbrirDocumento: TAction
|
|
Caption = 'Abrir'
|
|
OnExecute = actAbrirDocumentoExecute
|
|
OnUpdate = actAbrirDocumentoUpdate
|
|
end
|
|
end
|
|
object GridPopupMenu: TPopupMenu
|
|
Left = 432
|
|
Top = 8
|
|
object Modificar1: TMenuItem
|
|
Action = actAbrirDocumento
|
|
end
|
|
object N1: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object Nuevo1: TMenuItem
|
|
Action = actAnadirDocumento
|
|
end
|
|
object Previsualizar1: TMenuItem
|
|
Action = actElliminarDocumento
|
|
end
|
|
end
|
|
object JvChangeNotify1: TJvChangeNotify
|
|
Notifications = <
|
|
item
|
|
end>
|
|
FreeOnTerminate = False
|
|
OnChangeNotify = JvChangeNotify1ChangeNotify
|
|
Left = 352
|
|
Top = 8
|
|
end
|
|
end
|