خیلی ممنون برای به دست آوردن وسطش اینجوری باید عمل کنم ؟

strLen(STR div 2)


راستی تابعی به اسم REVERSE تو توربو پاسکال 7 داریم ؟ من که نتونستم اجرا کنم همین طور substr