odczyt z txt zapis do .bmp w pascalu

0

Mamy do zrobienia w pascalu programik, który ma odczytać polecenia z pliku tekstowego, narysować wg nich obrazek, a potem zapisać go jako *.bmp. Polecenia rysowania obrazka dla pascala w trybie graficznym potrafię zrobić - ale jak zrobić, żeby to czytało z pliku txt (normalny odczyt z pliku wyświetla jako tekst). Będę wdzięczna za każdą wskazówkę.

0

W pascalu mamy do dyspozycji kilka prymitywów: linia, łamana, okrąg, elipsa, wielokąt, punkt. W pliku tekstowym musisz umieścić deklaracje tych procedur, np:

line 100 100 200 200
circle 200 200 100
point 100 100 1

teraz odczytujesz z pliku linię i sprawdzasz co ma być rysowane:

if nazwa = 'line' then line(x1,y1, x2,y2);
if nazwa = 'circle' then circle(x1, y1, radius);

Można zrobić to bardziej elegancko, ale to jest najprostsze. Co do zapisu do pliku to mam gotowy moduł, który zapisuje do pliku PCX. Pisz na gg lub maila to prześlę źródło

1 użytkowników online, w tym zalogowanych: 0, gości: 1