توربو پاسكال 7 و error 200

[احمد یاراد]

با سلام به اساتيد محترم
بنده در راستاي يادگيري كتاب برنامه نويسي جامع پاسكال نوشته اقاي مهرداد اسماعيلي به مشكلي خواص برخوردم
كه اصلا دوست ندارم با وجود چنين مشكلي برنامه سطح مياني و پايين را رها كنم بنده به قسمت تابع ها و
پروسيجرهاي گرافيكي كتاب رسيدم اما نميدانم اين تابع ها چرا هنگام اجرا error 200 را میدهد به این مضمون
division by zero حتی پروسیجر sound هم همین error200 را میدهد البته من به مشکلات شناساندن کارت
گرافیک در این زبان اگاهم اما با اینحال لطفا راهنماییم کنید همینطور در مورد پروسیجر sound
با تشکر از شما
احمد یاراد

[Wonderboy]

سلام

احمد ياراد عزيز خسته نباشي.

مشکل تقسيم بر صفر مشکليه که روي سيستمهاي Pentium Pro 200MHz يا بالاتر (روي همه سيستمهاي امروزي) موقع برنامه نوشتن با توربو پاسکال يا برلند پاسکال و زبانهاي پاسکال مشابه پيش مياد. بخصوص اگه از يونيتهاي CRT يا گرافيک استفاده کني.

البته من سال 81 يه برنامه اي نوشتم که اين مشکل رو، هم براي برنامه هايي که نوشتي و فايل اجراييش فقط موجوده و امکان کامپايل مجدد نداره حل ميکنه و هم برنامه پاسکال نصب شده روي سيستمت رو طوري تغيير ميده که از اون به بعد برنامه نوشته شده توي اون محيط پاسکال، ديگه دچار مشکل نميشه.

برنامه هايي که مشکلشون با اين روش حل شده رو خودم تست کردم و روي سيستمهاي Pentium 4 امروزي براحتي اجرا شده.

اين برنامه رو تحت دو نسخه براي سيستمهاي داس و ويندوز نوشتم، که حجم نسخه تحت داس اون فقط 66 کيلوبايته، حالا اگه تمايل داري من اين برنامه رو برات بفرستم.

موفق باشي. ;)

[احمد یاراد]

با سلام و با تشكر از زحمات شما كه نميدانم چگونه ميتوانم جبران كنم واقعا خيلي كمكم كرديد
بله بله بنده خيلي خيلي مشتاق هستم كه اين برنامه رو برايم بفرستيد تا بهتر بتوانم بعد از گذر از پاسكال وارد دنياي برنامه نويسي با دلفي بشم البته اگر براي شما زحمتي ندارد دوست دارم يك توضيح در مورد استفاده برنامه بهم بدهيد تا دچار مشكل
نشم البته يك توضيح هم در مورد اينكه چرا كمپايلر پاسكال در Pentium Pro 200MHz و بالاتر از ان كار نميكنه اين نكته برايم خيلي
كور مانده .
يك صحبت داخل پرانتزي ( راستي من ميتوانم با شما خودموني تر و خصوصي تر صحبت كنم يا اينكه زياد بنويسم)
با تشكر از شما
به اميد ديدار

[vibaampr]

سلام
اين بحث Uses CRT و clrscr در کلاس ما خیلی داغ هست و استادمون این رو گفته که برای مامپیوتر های امروزی مشکل میگیره

راه حل: از پاسکال دیباگ شده استفاده کنیم
حالا این پاسکال دیباگ شده چه کوفتی هست و از کدوم جهنم دره ای میشه گیرش اورد رو من هم نمیدونم

فعلا بای

[Wonderboy]

سلام

احمد یاراد عزيز از اينکه به من اينقدر لطف داري متشکرم، منو با جملاتت حسابي شرمنده کردي. :blush:
نيازي به جبران نيست، من وقتي اشتياقت رو براي ياد گرفتن مسائل برنامه نويسي ميبينم واقعا خوشحال ميشم. :laughing:

اين برنامه رو روي سايت خودم ميذارم تا اگه دوستان ديگه هم خواستن، بتونن دانلود و استفاده کنن.

اينم لينک سايت:

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

عنوان اين مطلب هم توي سايت اينه: نرم افزار TPWizard برای حل مشکل تقسیم بر صفر (Division By Zero) در پاسکال.

و اما مشکل division by zero از کجا ناشي ميشه؟

اين مشکل وقتي بروز ميکنه که در برنامه هاي نوشته شده به زبان توربو پاسکال و برلند پاسکال از يونيت Crt استفاده ميشه. هنگام ارزشدهي به اين يونيت عددي براي Procedure به نام Delay محاسبه ميشه. از اين محاسبه تعداد دفعات اجراي يک حلقه در فاصله دو بار فراخواني وقفه تايمر به دست مياد. در مورد يونيت Crt اين عدد براي سيستمهاي سريع مثل سيستمهاي امروزي بسيار کوچکه و باعث سرريزي در ثبات ميشه. در کتابخانه زبان توربو پاسکال و برلند پاسکال اين خطا با پيغام division by zero اعلام ميشه.

دوست عزيز البته که ميتوني خصوصي تر و خودموني تر صحبت کني. راستش من هم خيلي دوست دارم با تو بيشتر آشنا بشم. :happy:

به اميد ديدار.
موفق باشي.

[احمد یاراد]

سلام
با تشكر فراوان از اينكه برنامه را برايم فرستاديد راستي ميخواستم كمي صحبت شخصي با شما بكنم اما نميدانم چرا ارسال پيغام
خصوصي به شما برايم فعال نبود راستي ببخشيد كه اين سوال را از شما ميكنم يكي از كاربران سايت برايم در اين مورد پيغام فرستاده ميخوام پيغامش رو از روي اين صفحه پاك كنم ممكنه راهنماييم كنيد راستي محل سوكونت شما را اينجا زده لنگرود
من كه باورم نميشه واقعا محل سكونت شما لنگرود هست اگر اينطور هست نا اميد شدم چرا كه اميد ان را داشتم كه روزي
شايد ميتوانستم با شما ملاقات داشته باشم حالا باز هم با شرمنگي فراوان اينو مي پرسم واقعا چنين است .
راستش ميخواستم كمي هم در مورد برنامه اي كه نوشته ايد صحبت كنم اما ديدم قبل از بررسي برنامه تان حرفي بزنم شايد كمي بي ادبي كرده باشم.
حال يك سوال ؟ بنظر شما من اگر پاسكال را تحت سيستم عامل داس كار كنم بهتره يا نه اگر در ويندوز هم كار كنم فرقي نميكنه
وقتي از اول كه من وارد برنامه نويسي با اين زبان شدم با ويندوز كار ميكردم اما همينكه به همين error 200 برخوردم گفتم شايد مشكل از ويندوز هست و به همين خاطر يك هارد 250 مگ خريدم و داس نصب كردم گفتم شايد اينطوري مشكل حل بشه
اما باز هم مشكل نشد كه در اوج نا اميدي شما مثل فرشته نجات به دادم رسيديد البته من كه خودم وقتي تحت داس توربو رو كار
ميكنم بيشتر به دلم مي چسبه با اينحال ميخواستم ببينم نظر شما در اين مورد چييه ؟ ببخشيد كه كمي سبك صحبت كردم
با تشكر از شما
خداحافظ

[احمد یاراد]

[QUOTE=vibaampr]سلام
اين بحث Uses CRT و clrscr در کلاس ما خیلی داغ هست و استادمون این رو گفته که برای مامپیوتر های امروزی مشکل میگیره

راه حل: از پاسکال دیباگ شده استفاده کنیم
حالا این پاسکال دیباگ شده چه کوفتی هست و از کدوم جهنم دره ای میشه گیرش اورد رو من هم نمیدونم

فعلا بای[/QUOT
سلام

[احمد یاراد]

[QUOTE=vibaampr]سلام
اين بحث Uses CRT و clrscr در کلاس ما خیلی داغ هست و استادمون این رو گفته که برای مامپیوتر های امروزی مشکل میگیره

[احمد یاراد]

سلام
با تشكر فراوان از اينكه برنامه را برايم فرستاديد راستي ميخواستم كمي صحبت شخصي با شما بكنم اما نميدانم چرا ارسال پيغام
خصوصي به شما برايم فعال نبود راستي ببخشيد كه اين سوال را از شما ميكنم يكي از كاربران سايت برايم در اين مورد پيغام فرستاده ميخوام پيغامش رو از روي اين صفحه پاك كنم ممكنه راهنماييم كنيد راستي محل سوكونت شما را اينجا زده لنگرود
من كه باورم نميشه واقعا محل سكونت شما لنگرود هست اگر اينطور هست نا اميد شدم چرا كه اميد ان را داشتم كه روزي
شايد ميتوانستم با شما ملاقات داشته باشم حالا باز هم با شرمنگي فراوان اينو مي پرسم واقعا چنين است .
راستش ميخواستم كمي هم در مورد برنامه اي كه نوشته ايد صحبت كنم اما ديدم قبل از بررسي برنامه تان حرفي بزنم شايد كمي بي ادبي كرده باشم.
حال يك سوال ؟ بنظر شما من اگر پاسكال را تحت سيستم عامل داس كار كنم بهتره يا نه اگر در ويندوز هم كار كنم فرقي نميكنه
وقتي از اول كه من وارد برنامه نويسي با اين زبان شدم با ويندوز كار ميكردم اما همينكه به همين error 200 برخوردم گفتم شايد مشكل از ويندوز هست و به همين خاطر يك هارد 250 مگ خريدم و داس نصب كردم گفتم شايد اينطوري مشكل حل بشه
اما باز هم مشكل نشد كه در اوج نا اميدي شما مثل فرشته نجات به دادم رسيديد البته من كه خودم وقتي تحت داس توربو رو كار
ميكنم بيشتر به دلم مي چسبه با اينحال ميخواستم ببينم نظر شما در اين مورد چييه ؟ ببخشيد كه كمي سبك صحبت كردم
با تشكر از شما
خداحافظ

[vibaampr]

سلام
هم به آقا احمد عزیز هم به آقا مهدی
میگم مهدی جان سایتت خیلی قشنگه. واثعا خوشم اومد. موفق باشی
راستی از این هم که اون برنامه رو گذاشتی ممنونم)البته هنوز امتحانش نکردم(

[احمد یاراد]

سلام به استاد خوب خودم و دوستان آقای مهدی نصرتیان با عرض معذرت
آقا شما چرا دیگه جواب نمیدید دلم خیلی براتون تنگ شده
با تشکر

[احمد یاراد]

سلام به استاد خوب خودم و دوستان آقای مهدی نصرتیان با عرض معذرت
آقا شما چرا دیگه جواب نمیدید دلم خیلی براتون تنگ شده
با تشکر

[احمد یاراد]

بلایابللبطدذبلادلبفیابلاب لیالایبابلا

[Mehdi_Best]

سلام خدمت دوستان عزيزم
به نظرتان اين تاپيك شبيه چت نشده؟ مفهوم انجمن و فروم اين نيست كه مسايل شخصي در آن ذكر شود. پس لطف كنيد براي صحبت هايي غير از بحث اصلي تاپيك، از راههاي ارتباطي ديگر همانند پيغام خصوصي - ايميل و مسنجر استفاده فرماييد. با تشكر از توجهي كه مي فرماييد.

[Wonderboy]

سلام

احمد یاراد عزيز از اينکه چند روزي نبودم معذرت ميخوام :blush: ، براي سيستمم مشکلي پيش اومده بود که حل شد.

راستي لازم ميدونم از vibaampr عزيز به خاطر نظر لطفشون نسبت به من تشکر کنم.

در مورد پاک کردن پيغامهاي کاربران در يک تاپيک فکر کنم که فقط مديران اجازه اين کار رو دارن.
در مورد صحبت خصوصي هم فکر ميکنم حق با Mehdi_Best عزيز باشه و بهتره که اين کار رو با ايميل يا قسمت پيغامهاي خصوصي انجام بديم. البته من يه پيغام خصوصي برات ميفرستم و آدرس ايميلم رو توش مينويسم تا اگه صحبت خصوصي هست از طريق ايميل انجام بديم.
در مورد محل زندگي من بايد بگم که بله من واقعا اهل لنگرود هستم. شهري خوش آب و هوا از استان گيلان که هم کوههاي سرسبز داره و هم دريا، البته نميخواستم وقت عزيزان و اين تاپيک رو با حرفهايي که ارتباطي با موضوع اين تاپيک نداره بگيرم ولي چون سوال کرده بودي اين چند خط رو براي توضيح نوشتم.

احمد یاراد عزيز در مورد جملاتي که درباره من نوشتي فقط ميتونم بگم که به من لطف داري، من خودم رو شايسته اين همه تعريف نميدونم، واقعا منو شرمنده کردي. :blush:

در مورد کار با پاسکال از داخل ويندوز يا داس زياد فرقي نميکنه، اون بستگي به اين داره که تو با کدوم محيط راحت تري.

اگه ناراحت نميشي ميخوام چند مطلب رو به عنوان يه برادر کوچکتر عنوان کنم:
من فکر مي کنم که اگه بعد از توربو پاسکال به سراغ ويژوال بيسيک بري و بعد (يا تقريبا هم زمان)، به سراغ دلفي يا ويژوال دات نت بري پيشرفت بهتري مي کني. البته توي پيغام خصوصي اين مطلب رو بيشتر برات توضيح ميدم.

موفق و پيروز باشي.

[احمد یاراد]

سلام آقاي مهدي نصرتيان از ديدار دوباره شما خيلي خوشحال شدم راستش آقاي mehdi_best درست ميگن پس من اخرين
صحبت خصوصي رو هم به ناچار ميكنم تا به اميد خدا براي دفعه بعد از روشهاي ارتباطي ديگري استفاده كنيم راستش من نميدونم پيغام خصوصي شما را كجا بايد مشاهده كنم به هر حال بنده با راهنمايي بعدي شما خيلي مشتاق هستم تا با
شما با خيال راحت صحبت خصوصي داشته باشم اينطوري نظم سايت هم بهم نميريزه .
بنده از نصيحت آخر شما ناراحت كه نشدم بلكه خيلي هم خوشحال شدم البته من از قدرتمند بودن زيان برنامه نويسي دلفي تعاريف زيادي شنيدم با اينحال بنده به اميد تفصيلي صحبت كردن در موارد به صورت خصوصي را مشتاقم .
با تشكر

[Wonderboy]

سلام

احمد ياراد عزيز ظاهرا تا مدتي از عضويت شما نگذره نه ميتونين به کسي پيغام خصوصي بدين نه کسي ميتونه به شما پيغام خصوصي بده.

من که از شما آدرس ايميلي ندارم بهمين دليل آدرس ايميلم رو مينويسم تا بتونيم بهم ايميل بزنيم. ;)

آدرس ايميل من:
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

موفق باشي.

[احمد یاراد]

salam man email zadam vali shma hanoz javab nanadid
ba tashakor

[somayyeh]

سلام

من تازه توی این انجمن عضو شدم وچند تا سوال در مورد ساختمان داده داشتم البته می شه گفت که برنامه می خواستم :
1_ برنامه ای که عنصری را به بعد از چهارمین گره اضافه کند ویا ششمین گره را حذف کند.
2_ برنامه بازی مار با استفاده از صف پیوندی .
3_ برنامه ای که به صورت string عبارت را دریافت ارزیابی و در نهایت مقدار عددی معادل را برگرداند به روش پیوندی.
مثلا: 12x+3x-2

اگه امکان داشته باشه وبلد باشید خواهش می کنم کمکم کنید .

متشکرم.

[احمد یاراد]

با سلام به شما سميه خانوم
راستش بنده دوست داشتم جوابتون رو بدم اما دقيقا متوجه سوالتون نشدم اگه ميشه كمي دقيق تر سوالتون رو مطرح كنيد
ببخشيد شما ميخواهيد اين برنامه را در توربو پاسكال 7 بنويسيد مشخص بودن زبان برنامه داراي اهميت خاصي است
لطفا سوال رو كمي واضح تر مطرح كنيد
با تشكر.

[احمد یاراد]

با سلام به آقاي مهدي نصرتيان عزيز
آقا من الان خيلي وقت است كه براي شما ايميل زدم ولي هنوز شما جواب من رونداديد كمي نا اميد شدم .
با تشكر .

[احمد یاراد]

سلام اقاي vibaamoer راستي اين برنامه اقاي مهدي نصرتيان رو تونستي استفاده كني
چطوري ميشه استفاده كرد .
باتشكر.

[M@$00D]

گور پاسكال دي باگ شده رو من بلدم . اگه كسي مي خواد واسش تو تاپيك بذارم
(يه اف كوجيك كارو حل مي كنه)

[M@$00D]

من گور پاسكال دي باگ شده رو بلدم .
يه اف بذاريد تا اون رو توي تاپيك بذارم

[looker]

آقا این چیزی که بلدی در اختیار ما بذار

[احمد یاراد]

چی که بلدم

[alishams]

سلام
هر كدام از آقايان ميدانند بگويد اين برنامه Tpwizardچگونه كار ميكنه؟
خيلي متشكر.

[Wonderboy]

سلام

دوستان عزيز امشب راهنماي استفاده از برنامه TPWizard رو ميذارم رو سايت.

[Wonderboy]

سلام

دوستان، بخصوص alishams عزيز راهنماي نرم افزار TPWizard رو هم تهيه کردم.
راهنما رو ميتوني از آدرس زير دانلود کني:


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

موفق باشي.

[Wonderboy]

سلام

دوستان عزيز اگه برنامه رو از روي سايت من تا قبل از ساعت 4 بعد از ظهر پنجشنبه مورخه 25 اسفند 1384 دانلود کردين. بايد دوباره برنامه رو دانلود کنين چون مشکلي داشت که اصلاح شد.

از اين بابت شرمندم. :blush:

موفق باشين.

[mojtaba802]

اين خطا يعني تقسيم عدد بر صفر که در واقع منظور اين نيست.منظور اين است که شما در برنامه
از يونتي به نام
Crt
استفاده مي کنيد و زبان پاسکال در اين قسمت در دسترسي به توابع يونيت
Crt
مشکل دارد.پس بايد يک پاسکال کامل پيدا کنيد
********************************************
مجتبي رضائي از برازجان
mojtaba8022000@yahoo.com

[koorosh_1387]

با سلام و احترام
من نتوانستم جهت دانلود فايلي كه دوست عزيزمان داده بودند و مشكل خطاهاي برنامه پاسكال را برطرف ميكند وارد سايتشان شوم آدرس را اينطور نوشتم [ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ] لطفا راهنمائي فرمائيد
با تشكر

[amin750]

لینک خرابه!!!!!!!!!!!!
کمک کنید.

[raoufe zeraati]

salam.bi moghadame migam, chetori mishe ba dastooraye if ,for ba chandta dastoore sadeye dige sheklaye hendesi rasm kark.masalan mostatil.mosalas....ostademoon pedaremoono darovorde

[Mds]

سلام دوستان ،
برای بر طرف شدن این مشکل این فایل ها رو در محل نصب پاسکال در فولدر tp/bin جایگزین فایل های قبلی کنید.


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

[Arashmicrob]

ممنون بابت این پچ