Question

Tworzę program w Pascalu, i mam pytanie.
Jak zrobić takie jakby pole do klikania np. 2x2. Żeby można było na ten np: kwadracik kliknąć i po kliknięciu, żeby wykonywało jakąś akcję. I jeszcze jak zmienić kolor tła i czcionki w pascalu?.

Answer 1

Z tym klikaniem to za bardzo Ci nie pomogę ale co do reszty to tak:

>Kolor czcionki zmieniasz poleceniem textcolor() np. textcolor(red)

>Kolor tła ustawiasz zmieniając kolor tła wyświetlanego tekstu i zapisując nim cały ekran, trochę skomplikowane ale napisałem Ci na to procedurke:

Procedure tlo(k:integer);
var
i,j : integer;
begin
textbackground(k);
textcolor(k);
for j := 1 to 25 do
for i := 1 to 80 do begin
gotoxy(i,j);
write(#219);
end;
gotoxy(1,1);
textcolor(white);
end;


Stosujesz ją używając tlo() np. tlo(1). Numery kolorów masz tu:

Black = 0 - czarny
Blue = 1 - niebieski
Green = 2 - zielony
Cyan = 3 - turkusowy
Red = 4 - czerwony
Magenta = 5 - karmazynowy
Brown = 6 - brązowy
LightGray = 7 - jasnoszary


Procedurę możesz sobie dostosować do wielkości jaką chcesz "zamalować" zmieniając parametry w

for j := 1 to 25 do
for i := 1 to 80 do begin

25 to szerokość a 80 to długość "zamalowywanego" obszaru.