سوالي در مورد فارسي نوشتن در پاسکال؟

[mshiraz.2006]

به نام خدا

دوستان چه جوري ميشه تو پاسکال فارسي رو از راست به چپ نوشت؟
يا وقتي مي خواد يه رشته رو بگيره از راست به چپ تايپ بشه؟
اگه کمک کنيد ممنون ميشيم.

با تشکر

[NoneForce]

سلام
براي ابتدا به قسمت سمت راست مكاني كه قصد داريد نوشتن را از آنجا شروع كنيد بياييد
GotoXY(10,10)
بعد بايد اقدام به گرفتن كليدهاي فشرده شده كاربر نماييد. اگر از دستور Read استفاده كنيد كليد زده شده برروي صفحه نمايش داده ميشود . ما ميخواهيم كليد را دريافت كنم و توسط برنامه آنرا روي صفحه نمايش دهيم بعد مكان نما را به سمت چپ حركت داده و كليد بعدي را دريافت كنيد.
repeat
until keypressed;
ch := readkey;
حالا مقدار ch را كنترل مي كنيم (مثلا براي كليد اينتر يا اسكيپ)
بعد مقدار متناظر فارسي آنرا روي صفحه چاپ مي كنيم و مكان نما را به سمت چپ حركت مي دهيم.

متاسفانه من درحال حاظر امكان دسترسي به سورس را ندارم تا كاملتر توضيح دهم ولي روش كلي همين است.

[mshiraz.2006]

به نام خدا

سلام دوست عزيز.

من تست کردم نشد.
فکر کنم از حرفات چيزي نفهميدم.
ميشه يه کم واضح تر توضيح بدي؟
با تشکر

[هدیه]

سلام
اول بايد مكان نما رو به منتها اليه سمت راست ببري يعني ستون 80 و سطر يك كه اين كار رو با دستورgotoxy انجام مي ديد بعد كاراكتر رو مي خوني بعد يكي از شماره ستون كم مي كني دوباره با همان دستور مكان نما را جابه جا مي كني يكي ديگه كاراكتر مي خوني واين كار رو به همين ترتيب با يه حلقه ادامه مي ديد كاراكترها از راست به چپ تايپ ميشه فقط بايد دقت كنيد شرطي بذاريد كه وقتي به ستون 80 رسيد يكي به شماره سطرها اضافه شود و ستون دوباره 1 شود
اميدوارم متوجه شده باشيد.