- Η Turbo Pascal παρέχει τη δυνατότητα χρήσης χαρτογραφικών γραφικών.
- Πριν τη χρήση τους είναι απαραίτητο να καθορίσουμε τον κατάλογο
στον οποίο βρίσκονται οι απαραίτητες βιβλιοθήκες.
Αυτό γίνεται από την επιλογή της Pascal: Options - Directories.
Στην οθόνη που εμφανίζεται καθορίζουμε στην επιλογή:
Unit directories: c:\apps\bp\units
και στην επιλογή:
Resource directories: c:\apps\bp\units
Για να μην απαιτηθεί να ξανακαθορίσουμε τις επιλογές αυτές,
επιλέγουμε στο τέλος την εντολή Options - Save.
- Για τη χρήση τους πρέπει το πρόγραμμα να περιέχει τις
παρακάτω δηλώσεις:
program test;
uses Graph, Crt;
- Το σύστημα γραφικών αρχικοποιείται ως εξής:
var
grDriver: Integer;
grMode: Integer;
begin
grDriver := Detect;
InitGraph(grDriver, grMode,'c:/apps/bp/bgi');
- Η ανάλυση της οθόνης στην οριζόντια και κάθετη διεύθυνση
επιστρέφεται από τις συναρτήσεις GetMaxX, GetMaxY.
- Το μέγιστο δυνατό χρώμα επιστρέφεται από τη συνάρτηση
GetMaxColor
.
- Το (0,0) των συντεταγμένων βρίσκεται πάνω αριστερά στην οθόνη.
- Ένα εικονοστοιχείο στις συντεταγμένες της οθόνης x, y
μπορεί να πάρει ένα ορισμένο χρώμα c με την εντολή:
putpixel(x ,y , c);
- Για να συνεχίσουμε να βλέπουμε την οθόνη των γραφικών μετά το
τέλος των λειτουργιών του προγράμματος μπορούμε στο τέλος να προσθέσουμε
τις εντολές:
Readln;
CloseGraph;
end.