Przejdź do zawartości

Microsoft Small Basic - poradnik programowania: Różnice pomiędzy wersjami

brak opisu edycji
Nie podano opisu zmian
Nie podano opisu zmian
Linia 1248: Linia 1248:
* <code>GraphicsWindow.CanResize = "False"</code> - użytkownik nie może zmieniać rozmiaru
* <code>GraphicsWindow.CanResize = "False"</code> - użytkownik nie może zmieniać rozmiaru
* <code>GraphicsWindow.CanResize = "True"</code> - użytkownik może zmieniać rozmiar
* <code>GraphicsWindow.CanResize = "True"</code> - użytkownik może zmieniać rozmiar
Domyślnie ta właściwość jest ustawiona na "true".


=== Obsługiwane kolory na przykładzie koloru tła ===
=== Obsługiwane kolory na przykładzie koloru tła ===
Linia 1379: Linia 1378:


http://i.imgur.com/RpoT1Uw.png
http://i.imgur.com/RpoT1Uw.png
=== Szybkie rysowanie wielu linii poziomych ===
Pętle możemy wykorzystać do szybkiego narysowania wielu linii, jeśli chcemy je zrobić wedle określonego schematu.
Poniższy kod rysuje linie poziome od góry do dołu.
<code>
<poem>
GraphicsWindow.Width = 200
GraphicsWindow.Height = 200
GraphicsWindow.BackgroundColor = "#00C8FF"
GraphicsWindow.PenWidth = 6
For y = 10 To 190 Step 10
  GraphicsWindow.PenColor = "#7700FF"
  GraphicsWindow.DrawLine(5,y,195,y)
EndFor
</poem>
</code>
http://i.imgur.com/ebqLodn.png
Program zaczyna od narysowania linii, której współrzędna Y będzie wynosiła 10. Gdy to zrobi, znowu rysuje linię, ale tym razem o 10 Y niżej niż wcześniej (czyli 20). I tak aż dojdzie do Y = 190.
=== Szybkie rysowanie wielu linii pionowych ===
Analogicznie postępujemy, gdy chcemy narysować wiele linii pionowych.
<code>
<poem>
GraphicsWindow.Width = 200
GraphicsWindow.Height = 200
GraphicsWindow.BackgroundColor = "#00C8FF"
GraphicsWindow.PenWidth = 3
For x = 10 To 190 Step 10
  GraphicsWindow.PenColor = "#7700FF"
  GraphicsWindow.DrawLine(x,5,x,195)
EndFor
</poem>
</code>
http://i.imgur.com/CzkFX5z.png
=== Rysowanie w oparciu o rozmiar okna ===
Czasami wygodnie jest ustawić współrzędne w oparciu o właściwości podające szerokość i wysokość okna.
<code>
<poem>
GraphicsWindow.Width = 269
GraphicsWindow.Height = 269
GraphicsWindow.BackgroundColor = "#00C8FF"
GraphicsWindow.PenWidth = 3
GraphicsWindow.PenColor = "#7700FF"
GraphicsWindow.DrawLine(5,100,GraphicsWindow.Width-5,100)
</poem>
</code>
http://i.imgur.com/0SDQf6n.png
Zwróćmy uwagę na <code>GraphicsWindow.DrawLine(5,100,''GraphicsWindow.Width-5'',100)</code>. Jako współrzędną X2 ustawiliśmy <code>''szerokość okna - 5''</code>, co przy szerokości 2[[69]] daje 264.
A tak wygląda przy innych rozmiarach okna:
* 169,169
http://i.imgur.com/O52ymPF.png
* 269,169
http://i.imgur.com/mMW7Ak8.png
=== PRZYKŁAD: Dzielenie okna na 4 równe części ===
Mamy za zadanie podzielić okno graficzne na 4 równe części za pomocą linii. W dodatku osoba sprawdzająca będzie mogła ustawić dowolny rozmiar okna.
Musimy w takim układzie utworzyć dwie linie, z czego jedna będzie pozioma, druga pionowa i będą się przecinać w środku okna.
Linia pozioma musi być na wysokości połowy okna (wysokość okna / 2), a linia pionowa w połowie szerokości okna (szerokość okna / 2).
Linia pozioma musi być długości równej szerokości okna, zaś pionowa równa jego wysokości.
<code>
<poem>
GraphicsWindow.Width = 269
GraphicsWindow.Height = 269
GraphicsWindow.BackgroundColor = "#00C8FF"
GraphicsWindow.PenWidth = 5
'Linia pozioma
GraphicsWindow.PenColor = "#7700FF"
GraphicsWindow.DrawLine(0,GraphicsWindow.Height/2,GraphicsWindow.Width,GraphicsWindow.Height/2)
'Linia pionowa
GraphicsWindow.PenColor = "#FF0026"
GraphicsWindow.DrawLine(GraphicsWindow.Width/2,0,GraphicsWindow.Width/2,GraphicsWindow.Height)
</poem>
</code>
* 269,269
http://i.imgur.com/UzRYbyl.png
* 269,169
http://i.imgur.com/3Wh0iSG.png