Bart via fpc-pascal wrote:
On Fri, Aug 18, 2023 at 10:21 AM Adriaan van Os via fpc-pascal
<fpc-pascal@lists.freepascal.org> wrote:
Is there a way to see if a specific class/object method has been overridden or
not ?
There's an example of this in Lazarus Controls unit:
// Check if SetTextBuf is overridden, otherwise
// we can call RealSetText directly
if TMethod(@Self.SetTextBuf).Code = Pointer(@TControl.SetTextBuf)
then //not overridden
Thanks,
Adriiaan van Os
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
