¿ese método se cambia TODO o solo la parte que reescribo???
por ejemplo...
Code: Select all
//...
OVERRIDE METHOD KeyChar IN CLASS TEdit WITH xEditKeyChar
//...
FUNCTION xEditKeyChar( nKey, nFlags )
Local Self := HB_QSelf()
FWLOG ValType( Self ), ::ClassName()
IF nKey == VK_RETURN
Return 0
ENDIF
return ::Super:KeyChar( nKey, nFlags )
O Sobrecarga el método con lo escrito y si no se cumple retorna al anterior KeyChar existente en la clase original.
::Super:KeyChar( nKey, nFlags )
O... ::Super es la referencia al padre del objeto, en esta ocasion TControl ???