registerlangconsts

procedure registerlangconsts(

  const name: string;

  const stockcaptionpo: pstockcaptionaty;

  const modalresulttextpo: pdefaultmodalresulttextty;

  const modalresulttextnoshortcutpo: pdefaultmodalresulttextty;

  const textgeneratorpo: pdefaultgeneratortextty

);