8 lines
255 B
ObjectPascal
8 lines
255 B
ObjectPascal
|
type
|
|||
|
|
t1 = abstract class(System.Collections.IEnumerator)
|
|||
|
|
// Падает только если НЕ указать System.Collections
|
|||
|
|
public property System.Collections<integer>.IEnumerator.Current: object read nil;
|
|||
|
|
|
|||
|
|
end;
|
|||
|
|
|
|||
|
|
begin end.
|