Можно сделать "тождественного" наследника, и получить доступ к ним.
Ты этот фокус мог видеть в авторском творчестве для MenuXP
Фокус этот - просто лексические забавы, и ни одного байта в кодах не поменяет.
Типа так:
...
type
TCtrlEx = object(TControl);
PCtrlEx = ^TCtrlEx;
var S: PCtrlEx;
begin
S := PCtrlEx(Sender);
S.fUpdRgn := CreateRectRgn( 0, 0, 0, 0 );
.....
Поиск
Друзья
Администрация