Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   FreePascal Wechselnde Bilder (https://www.delphipraxis.net/178168-wechselnde-bilder.html)

Dastii 20. Dez 2013 13:46

Wechselnde Bilder
 
Ich habe mir einen Bandit also einen Spielautomaten Programmiert (mit Lazarus). Dies haben wir in der Schule gemacht.
Halt nur mit Zahlen und da mir das zu langweilig ist wollte ich gerne mal wissen wie ich es hinkriegen kann das anhand von Bildern zu machen.
Die sollen halt zufällig "gewürfelt" werden also sich wechseln und dann anhalten und bei bestimmten Kombinationen bekommt man halt Spielgeld gut geschrieben.

Vielen Dank schon mal.

Gruß Dastii

himitsu 20. Dez 2013 16:06

AW: Wechselnde Bilder
 
Da du ja bestimmt ordentlich die Logik von der Oberfläche getrennt hast,
brauchst du jetzt nur da, wo jetzt die Zahlen angezeigt (der Oberfläche zugewiesen) werden,
stattdessen für die entsprechende Zahl ein Bild anzeigen. :angle:

TImage und da entweder ein das Bild reinladen
- via LoadFromFile oder LoadFromStream
- oder die Bilder vorher in TBitmap/TJpeg/TPicture laden und dann dem Image.Picture zuweisen
- oder eines der Bilder aus einer TImageList in das TImage kopieren




Die Funktionen, für das Mischen usw. kannst/musst du "intern" mit Zahlen belassen
und wenn nun eine entsprechende Zahl dargestellt werden soll, dann das x-te Bild aus (d)einer Bilderliste in die Anzeige laden.


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:11 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz