بد کار کردن دستور screen 12 در محیط QB

sport414

Active Member
سلام خدمت دوستان
می خواستم در QB گرافیک کار کنم وقتی از دستور screen 12 استفاده می کنم صفحه سیاه میشه و هیچ کدوم از دستورات گرافیکی که در متن برنامه هست ( مثل رسم دایره ووو) کار نمیکنه. علت چیه ؟ لطفا راهنمایی بفرمایید .
ممنون:rose:
 

the_king

مدیرکل انجمن
سلام خدمت دوستان
می خواستم در QB گرافیک کار کنم وقتی از دستور screen 12 استفاده می کنم صفحه سیاه میشه و هیچ کدوم از دستورات گرافیکی که در متن برنامه هست ( مثل رسم دایره ووو) کار نمیکنه. علت چیه ؟ لطفا راهنمایی بفرمایید .
ممنون:rose:

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

این مثال رو امتحان کنید. اگر جواب داد که هیچ، وگرنه ایراد از همون ناسازگاری ویندوز با QBasic قدیمی است :
کد:
DIM r AS INTEGER, i AS INTEGER
SCREEN 12
r = 3
FOR i = 1 TO 14
  r = r + r / 3
  CIRCLE (320, 240), r, i + 1
NEXT
SLEEP

اینجور برنامه های زیر خاکی رو تحت ویندوز با کمک ابزار هایی مثل DosBox اجرا می کنند.

DOSBox - Download

رجوع شود به :
يکerrorدرسيستم عاملxp
 

جدیدترین ارسال ها

بالا