Kirjautuminen

Haku

Tehtävät

Keskustelu: Ohjelmointikysymykset: VB6: Viivan seuraus

Matrack [15.02.2004 12:33:44]

#

Onko VB:ssä mahdollista laittaa esim. Picture1 seuraamaan viivaa ? (Esimerkiksi vahassa Grand Prix Manager -pelissä autot seuraavat viivoja, joita on pistetty rataan.)

rndprogy [15.02.2004 12:58:48]

#

POINT käskyllä se voisi onnistua.

if POINT(picture1.left+1, picture1.top) = 1 then pictureboxi menee oikealle

Jotenkin tolla lailla

hunajavohveli [15.02.2004 16:35:32]

#

Teen sellasen ehtolausekkeen, joka kysyy, että:

Jos picture on viivan vasemmalla puolella, siirretään picturea oikealla.
Ja jos picture on viivan oikealla puolella, siirretään picturea vasemmalle.
Ja jos picture on viivan yläpuolella siirretään picturea alaspäin jne.

Käsitit varmaan.

Ja jos haluat, että picture liikkuu koko ajan samassa paikassa kuin viiva niin sitten:

Picture.Left = Viiva.Left
Piture.Top = Viiva.Top

rndprogy [15.02.2004 16:38:38]

#

POINTissa on se etu että viiva voi olla minkä muotoinen tahansa kuten tuossa tapauksessa varmaan on.

hunajavohveli [15.02.2004 17:01:48]

#

En oikein ymmärrä, mitä tuon POINT-käskyn pitäisi tehdä, eikä se aivan tuolla pelkästään voi toimia. Mutta osittain kyse on kai siitäkin, etten ole pelannut Grand Prix Mangeria. :) Hehheh... taas uusi peli, jota olisi pitänyt pelata, vai miten on Rndprogy?

rndprogy [15.02.2004 17:17:34]

#

En ole itsekkään pelannut Grand Prix Manageria. Mutta POINT käskystä sen verran että se tarkoittaa sitä väriä johon kohtaan sen koordinaatit on laitettu. Ainakin sain sellaisen qb:llä toimimaan pelkällä point käskyllä.

hunajavohveli [15.02.2004 17:26:19]

#

Tiedän toki mitä POINT-käsky tekee. Eli siis palauttaa näytöltä pikselin värinumeron, mutta en vai käsitä, miten se tuolla koodirivillä saa kuvan seuraamaan viivaa.

Tuohan siis tarkistaa kohdan pikselistä yhden pykälän oikealla. Ja jos se on 1, niin silloin siirrettäisiin oikealle. Sitä en ymmärrä. Muutenkin nuo VB:n värikoodit olivat jotenkin kummallisia.
Jos tuo 1 tarkoittaa sinistä, niin silloin pitäisi laittaa QBColor(1). QBColor-funktiohan muuttaa QB:lle tarkoitetun värin VB:lle. Tiesit tämän varmaan.

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta