17 lines
437 B
ObjectPascal
17 lines
437 B
ObjectPascal
|
type
|
|||
|
|
cd1<T,C>=class
|
|||
|
|
end;
|
|||
|
|
cd2<T,C>=record
|
|||
|
|
end;
|
|||
|
|
cd3<T,C>=template //тожесамое что template class
|
|||
|
|
end;
|
|||
|
|
cd4<T,C>=template class
|
|||
|
|
end;
|
|||
|
|
cd5<T,C>=template record
|
|||
|
|
end;
|
|||
|
|
cd6<T,C>=interface //Выдавать ошибку "Интерфейс не может иметь......" Тожесамое с секциией where для классов, записей.....
|
|||
|
|
end;
|
|||
|
|
|
|||
|
|
begin
|
|||
|
|
|
|||
|
|
end.
|