Ray Blaak a �crit dans le message ...
>"${critical_count} critical things are in the ${total_count} bad things
here"
>
>The upshot is that the messages package now needs to allow the
specification of
>values for the placeholders, using name/value pairs:
>
>  type Replacement is private:
>  type Replacements is array (<>) of Replacement;
>
>  function Subst(Name, Value : in String) return Replacement;
>
>  function Translate
>      (message : in Translatable_Message; parameters : in Replacements)
>        return String;
>  -- I prefer Translate or Lookup instead of Display_Message, since you
might
>  -- need the translated string for many purposes, e.g. logging, error
>  -- messages, on a button, in a menu, etc.  I also suggest
>  -- Translatable_Message or something similar, since the text is not
>  -- necessarily for errors.


A function very close to this one could be found in my Template_Parser
package. Nice plug isn't it :)

I use it all the time to parse Web page template containing tags to be
replaced
by some values before sending it back to the Web server.

Pascal.

--|------------------------------------------------------
--| Pascal Obry                           Team-Ada Member
--| 45, rue Gabriel Peri - 78114 Magny Les Hameaux FRANCE
--|------------------------------------------------------
--|         http://perso.wanadoo.fr/pascal.obry
--|
--| "The best way to travel is by means of imagination"