mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-12 20:21:04 +02:00
Converter: asign popup menu handlers.
git-svn-id: trunk@26705 -
This commit is contained in:
parent
355e947a65
commit
1bcfb7129a
@ -82,13 +82,16 @@ object ReplaceFuncsForm: TReplaceFuncsForm
|
|||||||
Width = 5
|
Width = 5
|
||||||
end
|
end
|
||||||
object PopupMenu1: TPopupMenu
|
object PopupMenu1: TPopupMenu
|
||||||
|
OnPopup = PopupMenu1Popup
|
||||||
left = 248
|
left = 248
|
||||||
top = 152
|
top = 152
|
||||||
object InsertRow1: TMenuItem
|
object InsertRow1: TMenuItem
|
||||||
Caption = 'Insert Row'
|
Caption = 'Insert Row'
|
||||||
|
OnClick = InsertRow1Click
|
||||||
end
|
end
|
||||||
object DeleteRow1: TMenuItem
|
object DeleteRow1: TMenuItem
|
||||||
Caption = 'Delete Row'
|
Caption = 'Delete Row'
|
||||||
|
OnClick = DeleteRow1Click
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
Loading…
Reference in New Issue
Block a user