mirror of
https://github.com/cheat-engine/cheat-engine
synced 2026-08-15 02:26:08 -04:00
19 lines
365 B
ObjectPascal
19 lines
365 B
ObjectPascal
unit MenuItemExtra;
|
|
{
|
|
V1.0: TMenuItemExtra is just a TMenuItem with an extra data pointer, so menu
|
|
items can be created on the fly and assigned extra data in the forum of records
|
|
or other objects usefull for an onclick handler
|
|
}
|
|
|
|
interface
|
|
|
|
uses menus;
|
|
|
|
type TMenuItemExtra=class(TMenuItem)
|
|
public
|
|
data: pointer;
|
|
end;
|
|
|
|
implementation
|
|
|
|
end.
|