Delphi - parametros opcionales

Hola
necesito saber cómo declara parámetros opcionales en un procedimiento, y luego cómo saber si se pasó efectivamente un parámetro o no.
Gracias

No se que tipo de parametro usas pero por ejemplo
function foo(a:integer; b:integer = -1)
begin
if b=-1 then // no se ha pasado el ultimo param
end;

Si tienes dudas concreta un poco mas el problema