git-svn-id: https://192.168.0.254/svn/Proyectos.AlonsoYSal_FactuGES2/trunk@6 40301925-124e-1c4e-b97d-170ad7a8785b
89 lines
2.1 KiB
Plaintext
89 lines
2.1 KiB
Plaintext
inherited frViewObservaciones: TfrViewObservaciones
|
|
Width = 521
|
|
Height = 150
|
|
ExplicitWidth = 521
|
|
ExplicitHeight = 150
|
|
object memObservaciones: TcxDBMemo
|
|
Left = 0
|
|
Top = 0
|
|
Align = alClient
|
|
PopupMenu = PopupMenuObservaciones
|
|
Properties.ScrollBars = ssVertical
|
|
Style.LookAndFeel.NativeStyle = True
|
|
StyleDisabled.LookAndFeel.NativeStyle = True
|
|
StyleFocused.LookAndFeel.NativeStyle = True
|
|
StyleHot.LookAndFeel.NativeStyle = True
|
|
TabOrder = 0
|
|
ExplicitHeight = 228
|
|
Height = 150
|
|
Width = 521
|
|
end
|
|
object ActionListObservaciones: TActionList
|
|
Left = 48
|
|
Top = 48
|
|
object EditCut1: TEditCut
|
|
Category = 'Edicion'
|
|
Caption = 'C&ortar'
|
|
ImageIndex = 0
|
|
ShortCut = 16472
|
|
end
|
|
object EditCopy1: TEditCopy
|
|
Category = 'Edicion'
|
|
Caption = '&Copiar'
|
|
ImageIndex = 1
|
|
ShortCut = 16451
|
|
end
|
|
object EditPaste1: TEditPaste
|
|
Category = 'Edicion'
|
|
Caption = '&Pegar'
|
|
ImageIndex = 2
|
|
ShortCut = 16470
|
|
end
|
|
object EditSelectAll1: TEditSelectAll
|
|
Category = 'Edicion'
|
|
Caption = 'Seleccionar todo'
|
|
ShortCut = 16449
|
|
end
|
|
object EditUndo1: TEditUndo
|
|
Category = 'Edicion'
|
|
Caption = '&Deshacer'
|
|
ImageIndex = 3
|
|
ShortCut = 16474
|
|
end
|
|
object EditDelete1: TEditDelete
|
|
Category = 'Edicion'
|
|
Caption = '&Borrar'
|
|
ImageIndex = 5
|
|
ShortCut = 46
|
|
end
|
|
end
|
|
object PopupMenuObservaciones: TPopupMenu
|
|
Left = 80
|
|
Top = 48
|
|
object Copy1: TMenuItem
|
|
Action = EditCopy1
|
|
end
|
|
object Cut1: TMenuItem
|
|
Action = EditCut1
|
|
end
|
|
object Delete1: TMenuItem
|
|
Action = EditPaste1
|
|
end
|
|
object N1: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object Delete2: TMenuItem
|
|
Action = EditDelete1
|
|
end
|
|
object N2: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object SelectAll1: TMenuItem
|
|
Action = EditSelectAll1
|
|
end
|
|
object Undo1: TMenuItem
|
|
Action = EditUndo1
|
|
end
|
|
end
|
|
end
|