اموزش محیط گرافیکی توربو پاسکال

لینک دریافت فایل خرید پایین توضیحات

فرمت فایل word  قابل ویرایش پرینت

تعداد صفحات: 15

اموزش محیط گرافیکی توربو  پاسکال 7

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

Uses graph ;

با استفاده دستور uses برنامه شما تواند پیمانه ثوابت توربو پاسکال استفاده کند . ثوابت پیمانه فایلی که یک unit نامیده شود جای گیرند . کدی که حالت گرافیکی توسط کامپیوتر تولید شود ، نوع کامپیوتر بستگی دارد . بنابراین نوع سخت افزار گرافیکی که اختیار سیستم باید توربو پاسکال اعلام شود . کار دو متغیر Driver Mode بصورت زیر استفاده شود :

Var

  Driver , Mode : Integer ;

محتوای دو متغیر نوع سخت افزارهای گرافیکی سیستم مشخص کند . تعیین حالت گرافیکی دستور زیر استفاده شود :

InitGraph (Driver, Mode, ‘…….’) ;

رویه InitGraph سیستم گرافیکی شما بررسی کرده سپس متغیرهای Driver Mode مقادیر مناسب قرار دهد . پارامتر رشته ‘……’ شاخه مشخص کند که نرم افزار کنترل سیستم گرافیکی شما وجود دارد . رشته که بدون کاراکتر ‘ ‘ معناست که نرم افزار شاخه جاری قرار دارد .

این نرم افزار همواره شاخه BGI قرار دارد معمولا" محلی که برنامه توربو پاسکال نصب شده . بنابراین باید ادرس شاخه BGI بجای رشته بنویسیم . انعطاف پذیر شدن برنامه قابلیت اجرای سیستم مختلف معمولا" یک نسخه شاخه BGI شاخه که برنامه قرار دارد ، کپی کنیم .

صفحه نمایشی که مانند یک مختصات :

در برنامه نویسی گرافیکی موقعیت هر خط هر شکلی که نمایش رسم کنید ، باید کنترل کنید . نمایش محیط گرافیکی بصورت مختصات X-Y تعدادی نقطه توان نظر گرفت . اکثر نمایشگرها ابعاد متداول عبارتند : 200×320 ، 350×640 ، 480×640 . که معمولا" تعداد نقاط محور X بیشتر .

توابع GetMaxX GetMaxY توربو پاسکال، ترتیب حداکثر تعداد نقاط Xها Yها برمی گردانند . بنابراین بدست اوردن ابعاد واقعی نمایشگر خود توانید توابع بصورت زیر استفاده کنید :               

 MaxX := GetMaxX ;             MaxY := GetMaxY ;

مختصات گوشه نمایش صورت زیر است.

برای برگرداندن برنامه حالت متنی دستور زیراستفاده کنیم . 

CloseGraph ;

رنگ زمینه متن :

بطور پیش فرض رنگ زمینه متن ، ترتیب سیاه سفید استفاده شود . دستورات زیر امکان تغییر رنگ زمینه متن فراهم کنند .

SetBkColor (….) ;                  تعیین رنگ زمینه

SetColor (….) ;                         تعیین رنگ متن  

برای انتخاب رنگها ثوابت رنگی معادل عددی رنگها طبق جدول زیر استفاده شود :

ثابت

مقدار

ثابت

مقدار

Black

0

DarkGray

8

Blue

1

LightBlue

9

Green

2

LightGreen

10

Cyan

3

LightCyan

11

Red

4

LightRed

12

Magenta

5

LightMagenta

13

Brown

6

Yellow

14

LightGray

7

White

15

خلاصه توابع رویه گرافیکی :

·                Line (X1, Y1, X2, Y2) ;

بین نقاط (X1,Y1) (X2,Y2) خطی رسم شود .

·        Rectangle (X1, Y1, X2, Y2) ;