You've already forked lazarus-ccr
edccbda8d8
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6322 8e941d3f-bd1b-0410-a28a-d453659cc2b4
113 lines
2.3 KiB
Plaintext
113 lines
2.3 KiB
Plaintext
object MemoEditFrm: TMemoEditFrm
|
|
Left = 427
|
|
Height = 305
|
|
Top = 205
|
|
Width = 305
|
|
ActiveControl = reLines
|
|
BorderStyle = bsSizeToolWin
|
|
Caption = 'Memo for %s'
|
|
ClientHeight = 305
|
|
ClientWidth = 305
|
|
Color = clBtnFace
|
|
Font.Color = clWindowText
|
|
OnShow = FormShow
|
|
LCLVersion = '1.9.0.0'
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Height = 29
|
|
Top = 276
|
|
Width = 305
|
|
Align = alBottom
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ClientHeight = 29
|
|
ClientWidth = 305
|
|
Font.Color = clWindowText
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
object btnOK: TButton
|
|
AnchorSideTop.Control = btnCancel
|
|
AnchorSideRight.Control = btnCancel
|
|
Left = 160
|
|
Height = 25
|
|
Top = 0
|
|
Width = 75
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Right = 4
|
|
Caption = '&OK'
|
|
Default = True
|
|
ModalResult = 1
|
|
TabOrder = 0
|
|
end
|
|
object btnCancel: TButton
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideRight.Control = Panel1
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 239
|
|
Height = 25
|
|
Top = 0
|
|
Width = 62
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 4
|
|
BorderSpacing.Bottom = 4
|
|
Cancel = True
|
|
Caption = 'Cancel'
|
|
ModalResult = 2
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object reLines: TMemo
|
|
Left = 4
|
|
Height = 268
|
|
Top = 4
|
|
Width = 297
|
|
Align = alClient
|
|
BorderSpacing.Around = 4
|
|
OnKeyUp = reLinesKeyUp
|
|
PopupMenu = popMemo
|
|
ScrollBars = ssBoth
|
|
TabOrder = 1
|
|
end
|
|
object popMemo: TPopupMenu
|
|
left = 128
|
|
top = 104
|
|
object Load1: TMenuItem
|
|
Caption = 'Load...'
|
|
ShortCut = 16463
|
|
OnClick = Load1Click
|
|
end
|
|
object Save1: TMenuItem
|
|
Caption = 'Save...'
|
|
ShortCut = 16467
|
|
OnClick = Save1Click
|
|
end
|
|
object N1: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object Cut1: TMenuItem
|
|
Caption = 'Cut'
|
|
ShortCut = 16472
|
|
OnClick = Cut1Click
|
|
end
|
|
object Copy1: TMenuItem
|
|
Caption = 'Copy'
|
|
ShortCut = 16451
|
|
OnClick = Copy1Click
|
|
end
|
|
object Paste1: TMenuItem
|
|
Caption = 'Paste'
|
|
ShortCut = 16470
|
|
OnClick = Paste1Click
|
|
end
|
|
object N2: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object Selectall1: TMenuItem
|
|
Caption = 'Select all'
|
|
ShortCut = 16449
|
|
OnClick = Selectall1Click
|
|
end
|
|
end
|
|
end
|