definition.tex

%@AUTEUR: Philippe De SOUSA et al.
%% Sujet d'un post sur la liste syracuse - avril 2008
 
\documentclass{article}
 
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}
\usepackage[frenchb]{babel}
\usepackage{xcolor}
\usepackage{fancybox,pstricks,calc}
%\usepackage[margin=6cm]{geometry}
 
\newcounter{defi}
 
\newsavebox{\defibox}
\newlength{\margedef}
\newlength{\marge}
 
\setlength{\marge}{0.75cm}
 
\newenvironment{Defi}{%
   \par\noindent % attention au retrait d'alinéa
   \refstepcounter{defi} %reférence au compteur
   \begin{lrbox}{\defibox}%définition de la boite contenant le texte
   \begin{minipage}{0.95\linewidth}
}
{%
  \end{minipage}
  \end{lrbox}%
%on dessine la boite colorée
  \rput[tl](0,0){%
    \psframebox[fillstyle=solid,fillcolor=red!10,framearc=0.5,
	framesep=10pt,linecolor=red]{%
      \usebox{\defibox}
    }%
  }%
%on enlève le trait
  \rput(0.85\linewidth,0){%
    \psline[linewidth=2\pslinewidth,linecolor=white](-4em,0)(4em,0)%
  }%
%on écrit ce qu'on veut...
  \rput(0.85\linewidth,0){%
    \textcolor{red}{\textbf{Définition \thedefi}}%
  }%
  \par
  \setlength{\margedef}{\ht\defibox+\dp\defibox+\marge}
  \vspace{\margedef}
}
 
\pagestyle{empty}
\begin{document}
 
Du texte avant.
 
\begin{Defi}
Dans un triangle, la médiane issue d'un sommet est la droite qui passe
par ce sommet et par le milieu du côté opposé.
\end{Defi}
 
Du texte après.\par
Du texte avant.
 
\begin{Defi}
Dans un triangle, la médiane issue d'un sommet est la droite qui passe
par ce sommet et par le milieu du côté opposé.
\end{Defi}
 
Du texte après.
 
\end{document}