NOVINKA - Online rekvalifikační kurz Python programátor. Oblíbená a studenty ověřená rekvalifikace - nyní i online.
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
Nevo
Člen
Avatar
Nevo:18.4.2015 17:54

Mám dotaz: Jde nějakým způsobem vytvářet tlačítka? A mám problém. Nejdou mi vkládat obrázky podle návodu v programu. Jde s tím něco dělat.

Odpovědět
18.4.2015 17:54
Všechno jde, pouze musíš být zapálenej pro danou věc, pak jde všechno.
Avatar
Michael Škrášek
Tvůrce
Avatar
Michael Škrášek:18.4.2015 18:03

Vytvářet tlačítka můžeš:

button = Controls.AddButton("name", 10, 10)
Controls.ButtonClicked = click
Sub click
 last = Controls.LastClickedButton
 If last = button Then
  ...
 EndIf
EndSub
Odpovědět
18.4.2015 18:03
"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 Nevo
Michael Škrášek:18.4.2015 18:04

K těm obrázkům, ukaž prosím kód.

Editováno 18.4.2015 18:04
Odpovědět
18.4.2015 18:04
"I choose a lazy person to do a hard job. Because that person will find an easy way to do it. " Bill Gates
Avatar
Jurajs
Člen
Avatar
Odpovídá na Nevo
Jurajs:18.4.2015 18:34

Vkládat obrázky můžeš takhle třeba:

player = "E:\Cesta \ k \souboru\player.png"
GraphicsWindow.DrawImage(player, posX, posY)
Editováno 18.4.2015 18:36
 
Odpovědět
18.4.2015 18:34
Avatar
Nevo
Člen
Avatar
Odpovídá na Michael Škrášek
Nevo:18.4.2015 18:51

Dík všem :)

Editováno 18.4.2015 18:51
Odpovědět
18.4.2015 18:51
Všechno jde, pouze musíš být zapálenej pro danou věc, pak jde všechno.
Avatar
Nevo
Člen
Avatar
Nevo:22.5.2015 21:32

Mám tady nový problém a nevím si s ním rady, opět :)
Dávám zdroják:
change = Controls.AddBut­ton("Changelog", 15, 250)
Sub click3
last3 = Controls.LastClic­kedButton
If last3 = change Then
Goto chnglog
EndIf
EndSub
Problém je, jak jsem zjistil v řádku s "Goto". Po vypsání tohoto řádku mi editor vypíše toto: Chybný popisek v ILGenrator. Zajímavé je, že když toto tlačítko přidám do jiného programu, program bez problému pracuje. Ví někdo co s tím může být?

Odpovědět
22.5.2015 21:32
Všechno jde, pouze musíš být zapálenej pro danou věc, pak jde všechno.
Avatar
Jurajs
Člen
Avatar
Odpovídá na Nevo
Jurajs:22.5.2015 21:45

Tohle je celý kód?

 
Odpovědět
22.5.2015 21:45
Avatar
Jurajs
Člen
Avatar
Odpovídá na Nevo
Jurajs:22.5.2015 21:55

Tady to máš upravené, ale když kliknu na button tak to nic stejně nedělá :D

chnglog:
change=Controls.AddButton("Changelog", 15, 250)
click3()
Sub click3
  last3 = Controls.LastClickedButton
  If last3 = change Then
Goto chnglog
EndIf
EndSub
 
Odpovědět
22.5.2015 21:55
Avatar
Jurajs
Člen
Avatar
Odpovídá na Nevo
Jurajs:22.5.2015 22:02

Tak teď to vypisuje - Ahoj :D

chnglog:
change=Controls.AddButton("Changelog", 15, 250)
Controls.ButtonClicked = click3
Sub click3
  last3 = Controls.LastClickedButton
  If last3 = change Then
    GraphicsWindow.ShowMessage("Ahoj","Pozdrav")
    Goto chnglog

EndIf
EndSub
Editováno 22.5.2015 22:03
 
Odpovědět
22.5.2015 22:02
Avatar
Jurajs
Člen
Avatar
Jurajs:19.6.2016 14:41

SmallBasic má podporu 3D :D huráá :)
https://blogs.msdn.microsoft.com/…sualisation/

 
Odpovědět
19.6.2016 14:41
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.