index 0580a475a60f68178a479bf0f942162173155026..f91ab1937f2ab50f496803255ebf6ebecbada50e 100644 (file)
--- a/src/game/g_holmes_ui.inc
+++ b/src/game/g_holmes_ui.inc
*)
// ////////////////////////////////////////////////////////////////////////// //
type
*)
// ////////////////////////////////////////////////////////////////////////// //
type
- THControl = class
+ THControl = class(TPoolObject)
public
type TActionCB = procedure (me: THControl; uinfo: Integer);
public
type TActionCB = procedure (me: THControl; uinfo: Integer);