با سلام
برای استفاده از محیط قضیه بدون درج کلمه قضیه که در هر بار استفاده از محیط فوق عنوان متفاوتی برای آن در نظر گرفته شود.
برای این کار کد زیر را استفاده کردم. از دوستان تقاضامندم در صورت وجود اشکال و یا غیراصولی بودن کد راهنمایی بفرمایند. با تشکر
\documentclass[a4paper,11pt,twoside,openany,svgnames]{book}
\usepackage{geometry}
\usepackage[most]{tcolorbox}
\usepackage{amsmath}
\usepackage{ptext}
\usepackage{xepersian}
\settextfont[Scale=1]{Yas}
\newcounter{theorem}
\numberwithin{theorem}{chapter}
\makeatletter
\newtcolorbox{theorem}[1][]{
breakable,
enhanced,
%backgroundcolor=yellow!80,
colback=orange!07,
colframe=orange!07,
top=25pt, %\baselineskip
enlarge top by=\topsep,
overlay unbroken and first={
\node[xshift=-10pt,yshift=-15pt,rounded corners,anchor=east] at (frame.north east) % thick,draw=blue,fill=blue!20,
{\setRTL\hboxR{\refstepcounter{theorem}\strut{\color{red}{\thetheorem~~}\if#1\@empty\relax\relax\else~#1\fi}}};
}
}
\makeatother
\begin{document}
\chapter{عنوان فصل}
\begin{theorem}[عنوان ]
متن متن متن متن متن متن متن متن متن متن متن متن متن متن متن متن متن متن متن متن متن متن
%\ptext[4]
\end{theorem}
\end{document}