t_id
1404
t_adddate
2004/11/30
t_result
0
Flag
t_fail
set
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
{ %fail } {$mode delphi} type texec1 = class protected procedure execute; public constructor create; end; procedure t(p: pointer); begin end; constructor texec1.Create; begin // This should give an invalid typecast, because a methodpointer are 2 pointers t(pointer(execute)); end; procedure texec1.execute; begin end; begin end.