Vydělávej až 160.000 Kč měsíčně! Akreditované rekvalifikační kurzy s garancí práce od 0 Kč. Více informací.
Hledáme nové posily do ITnetwork týmu. Podívej se na volné pozice a přidej se do nejagilnější firmy na trhu - Více informací.

Diskuze – Lekce 5 - Small Basic - Grafická okna

Zpět

Upozorňujeme, že diskuze pod našimi online kurzy jsou nemoderované a primárně slouží k získávání zpětné vazby pro budoucí vylepšení kurzů. Pro studenty našich rekvalifikačních kurzů nabízíme možnost přímého kontaktu s lektory a studijním referentem pro osobní konzultace a podporu v rámci jejich studia. Toto je exkluzivní služba, která zajišťuje kvalitní a cílenou pomoc v případě jakýchkoli dotazů nebo projektů.

Komentáře
Avatar
Filmun
Člen
Avatar
Filmun:6.12.2016 19:34

mám otázku jak udělat když zmáčknu např W aby se ěco stalo?

 
Odpovědět
6.12.2016 19:34
Avatar
Filmun
Člen
Avatar
Filmun:6.12.2016 19:36

jo a proč tohle nefunguje:
x = 50
y = 50
GraphicsWindow­.Width = 500
GraphicsWindow­.Height = 500
GraphicsWindow­.BackgroundCo­lor = "Black"
GraphicsWindow­.PenColor = "Blue"
GraphicsWindow­.FillRectangle(x, y, 50, 50)
GraphicsWindow­.KeyDown = key_down
Sub key_down
last_key_down = GraphicsWindow­.LastKey
If last_key_down = "W" Then 'W
y = y - 20
EndIf
EndSub
GraphicsWindow­.Clear()
GraphicsWindow­.FillRectangle(x, y, 50, 50)

 
Odpovědět
6.12.2016 19:36
Avatar
Michael Škrášek
Tvůrce
Avatar
Odpovídá na Filmun
Michael Škrášek:6.12.2016 19:37

Na konci článku máš ukázanou reakci na "Escape" ... jen to přepiš na "W". ;-)

Odpovědět
6.12.2016 19:37
"I choose a lazy person to do a hard job. Because that person will find an easy way to do it. " Bill Gates
Avatar
Michael Škrášek
Tvůrce
Avatar
Odpovídá na Filmun
Michael Škrášek:6.12.2016 19:39

Po stisknutí musíš znovu vykreslovat čtverec:

Sub key_down
        last_key_down = GraphicsWindow.LastKey
        If last_key_down = "W" Then
                y = y - 20
                GraphicsWindow.Clear()
                GraphicsWindow.FillRectangle(x, y, 50, 50)
        EndIf
EndSub
Odpovědět
6.12.2016 19:39
"I choose a lazy person to do a hard job. Because that person will find an easy way to do it. " Bill Gates
Avatar
Filmun
Člen
Avatar
Filmun:6.12.2016 20:50

Mockrát dík

 
Odpovědět
6.12.2016 20:50
Avatar
Placka03
Člen
Avatar
Placka03:8.4.2018 10:50

Dá se ve SmallBasic udělat, že bych stiskl třeba tlačítko a otevřelo by to nějaký soubor?

 
Odpovědět
8.4.2018 10:50
Avatar
Michael Škrášek
Tvůrce
Avatar
Odpovídá na Placka03
Michael Škrášek:8.4.2018 14:09

Samozřejmě, ale nebudu ti na všechno psát kód. Jestli sis přečetl všechny tutoriály a stejně nevíš, zkus se podívat na nějaké programy jak je to tam řešený. ;)

př.
https://www.itnetwork.cz/…ile-explorer
...

Odpovědět
8.4.2018 14:09
"I choose a lazy person to do a hard job. Because that person will find an easy way to do it. " Bill Gates
Avatar
Placka03
Člen
Avatar
Placka03:8.4.2018 14:10

Diky moc

 
Odpovědět
8.4.2018 14:10
Avatar
Čenda
Člen
Avatar
Čenda:5.11.2018 19:32

Proč tohle nefunguje?
If GraphicsWindow­.MouseDown Then
GraphicsWindow­.ShowMessage(" ", " ")
EndIf

 
Odpovědět
5.11.2018 19:32
Avatar
Jurajs
Člen
Avatar
Odpovídá na Čenda
Jurajs:5.11.2018 20:11

Jestli umíš anglicky tak si přečti něco o událostech ke Smallbasic, tam to máš vysvětlené...A chybí ti tam pár řádků kódu + stejně to máš špatně napsané - https://smallbasic-publicwebsite.azurewebsites.net/…torials.aspx
Tady máš pěkně na to tutoriály, pěkně si to prostuduj a pak se ptej....Jinak události jsou - EVENTS :D :)

 
Odpovědět
5.11.2018 20:11
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 10 zpráv z 20.