<html>
  <head>
    <meta content="text/html; charset=ISO-8859-1"
      http-equiv="Content-Type">
  </head>
  <body bgcolor="#FFFFFF" text="#000000">
    <div class="moz-cite-prefix">On 2014-05-04 07:21, Fabrice Couvreur
      wrote:<br>
    </div>
    <blockquote
cite="mid:CACyK-er0TSE1FoRrFa6VxG1gSQnRPQVJ=11hKXcQ1ognNFh4bw@mail.gmail.com"
      type="cite">
      <div dir="ltr"><span style="font-family:verdana,sans-serif"><span
            id="result_box" class="" lang="en"><span class="">Hi</span><span>,</span>
            <br>
            <span class="">I encounter</span> <span class="">two
              problems</span><span> :</span> <br>
            <span class="">-</span> <span class="">Section numbers</span>
            <span class="">are not</span> <span class="">red ;</span> <br>
            <span class="">-</span> <span class="">Calling the</span> <span
              class="">second</span> <span class="">section</span> <span
              class="">does not cause</span> <span class="">the
              creation of</span> <span class="">a new paragraph.</span>
            <br>
            <span class="">Regards,</span> <br>
            <span class="">Fabrice<br>
              <br>
              \setupcolors[state=start]<br>
              \def\MySectionCommand#1#2%<br>
                {\framed<br>
                   [frame=off,<br>
                    width=\textwidth,<br>
                    align={right},<br>
                    background=color,<br>
                    backgroundcolor=lightgray]<br>
                   {#1\quad#2}}<br>
              <br>
\setuphead[section][command=\MySectionCommand,numbercolor=red]<br>
              <br>
              \setupbodyfont[palatino,12pt]<br>
              <br>
              \starttext<br>
              <br>
              \MySectionCommand{A.}{Définitions}<br>
              \input knuth<br>
              \MySectionCommand{1.}{Propriétés}<br>
              \input knuth<br>
            </span></span></span></div>
      <br>
    </blockquote>
    I think you want ownnumber (in addition to the previously mentioned
    \section).<br>
    <br>
    <blockquote><tt>\setupcolors[state=start]<br>
        \define[2]\MySectionCommand<br>
          {\framed<br>
             [frame=off,<br>
              width=\textwidth,<br>
              align={right},<br>
              background=color,<br>
              backgroundcolor=lightgray]<br>
             {#1.\quad#2}}<br>
        <br>
\setuphead[section][command=\MySectionCommand,ownnumber=yes,numbercolor=red]<br>
        <br>
        \setupbodyfont[palatino,12pt]<br>
        <br>
        \starttext<br>
        <br>
        \placecontent<br>
        <br>
        \section{A}{Définitions}<br>
        \input knuth<br>
        <br>
        \section{1}{Propriétés}<br>
        \input knuth<br>
        <br>
        \section{2}{Propriétés}<br>
        \input knuth<br>
        <br>
        \section{3}{Propriétés}<br>
        \input knuth<br>
        <br>
        \section{B}{Définitions}<br>
        \input knuth<br>
        <br>
        \section{1}{Propriétés}<br>
        \input knuth<br>
        <br>
        \section{2}{Propriétés}<br>
        \input knuth<br>
        <br>
        \stoptext</tt><tt></tt><br>
    </blockquote>
    <br>
    <br>
    -- <br>
    Rik Kabel<br>
  </body>
</html>