Revisa en la ayuda "parámetros opcionales".
Defínele un valor por defecto en la cabecera y si no lo pones, cogerá el valor por defecto. Lo único que debes tener en cuenta es que los parámetros con valores por defecto deben ir al final.
Código Delphi
[-]
Procedimiento(x1:integer;x3:string;x2:integer=0);
begin
--
end;
Ahora podrás llamarlo como:
Código Delphi
[-]
Procedimiento(var1,var3);
Procedimiento(var1,var3, 0);