mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-08 22:47:54 +02:00
22 lines
289 B
ObjectPascal
22 lines
289 B
ObjectPascal
program Project1;
|
|
|
|
{$mode delphi}
|
|
|
|
type
|
|
|
|
{ TClass }
|
|
|
|
TClass = class
|
|
public
|
|
class function ToString<T>(A: T; B: string): string; reintroduce;
|
|
end;
|
|
|
|
{ TClass }
|
|
|
|
class function TClass.ToString<T>(A: T; B: string): string;
|
|
begin end;
|
|
|
|
begin
|
|
TClass.ToString<integer>(1, '');
|
|
end.
|