20 lines
209 B
ObjectPascal
20 lines
209 B
ObjectPascal
|
unit interface_parameter2;
|
|||
|
|
|
|||
|
|
interface
|
|||
|
|
|
|||
|
|
procedure p1({@}a: byte);
|
|||
|
|
procedure p1(a: byte; b: real);
|
|||
|
|
|
|||
|
|
implementation
|
|||
|
|
|
|||
|
|
procedure p1({!}a: byte);
|
|||
|
|
begin
|
|||
|
|
|
|||
|
|
end;
|
|||
|
|
|
|||
|
|
procedure p1(a: byte; b: real);
|
|||
|
|
begin
|
|||
|
|
|
|||
|
|
end;
|
|||
|
|
|
|||
|
|
end.
|