Muss Monopoly programmieren... :-(

[HellSpawn1609]

Bin Schüler und muss Monopoly programmieren, für die Schule als Projekt.
Dazu gibt es bestimmt viele Fragen von mir an euch. *grins*
Ich habe Delphi 7 die Schülerversion, also die Personal.

Will das so machen, dass ich das nur Grafisch darstellen lassen, d.h. alles läuft in array's und record's ab.
Muss halt nur die Steine bewegen lassen auf dem Brett, sonst nichts.
Alles andere mache ich in den array's und record's.


1. Frage
Wie Steure ich das Spielfeld?? Also wie lasse ich auf einem Bild, dass ich schon in ein Image laden lasse, figuren laufen.
Die Figuren sind auch nur Bilder!


schon vielen dank im voraus!!

lg hellspawn

[fwsp]

da kannst du einfach die top und left property des TImage benutzen

[Schaedel]

image.left...
image.top ....
Damit bewegst du bilder...
Aber das sollte ruckeln
Um es ruckelfrei hinzubekommen solltest du es immer wieder neuzeichnen, wenn du es bewegst ...

[edit]
Ich empfehle dir aber ne Paintbox... die is schöner .. ruckelt nicht...
problem ist nur das du den hitnergrund neuzeichnen musst
[/edit]

[TeronG]

Wellcome to the DP


hmm .. damit's nich ganz OT is ... bei ruckeln hilft manchmal auch DoubleBuffered.

[H4ndy]

Hier mal eine kleine Empfehlung (habs selber schon programiert):

Bau dir eine Info-Struktur (Record oder Object),
um einen Spielstein identifizieren zu können.
(Wichtigster Inhalt ist "wo stehe ich" (könnte z.B. Feld-Nr. sein, also 1-40),
und das Bild, was benutzt werden soll).

Dann könntest du z.B. eine Routine schreiben, welche dir
ausrechnet wo das Bild gezeichnet werden soll.
(also die Feld-Nr in X/Y-Koordinaten umrechnet. Da Monopoly an jeder
Kante 10 Felder hat, musst du also alle 10 Felder die Berechnung ändern).

Beim OnPaint einer PaintBox rufst du dann einfach die Umrechnungsroutine
für jeden Spielstein auf und zeichnest den Spielstein dann.

Das schwierigste dabei ist nur der Positions-Algo, dieser sollte aber
noch etwas Denkarbeit locker zu schaffen sein.
Großer Vorteil ist: diese Art der Spielstein-Verwaltung vereinfacht die Benutzung erheblich,
da du so Spiel-Inhalt von der Grafik trennen kannst.

[KuH_am_SchuH]

es ruckelt aber nich wenn dus mit timern machst : z.B.


Tform1.keydown...
begin
if key = Vk_LEFT then timer1.interval := 200;

end;


Tform1.keyup...
begin
if key = VK_LEFT then timer1.interval := 0;
end;

Tform1.timer1...
begin
image1.left := image1.left + 1;
end;




das war nur ein beispiel wies nicht ruckelt musstes nurnoch für deine zwecke umbaun^^

[HellSpawn1609]

hi H4ndy!

Hast du noch das Monopoly?? Würde mir das gerne mal ansehen und um evlt. mir etwas von der funktionsweise abzuschauen!

lg HellSpawn

[H4ndy]

Ist kein Problem, hab ich erst vor ne Weile schon mal gemacht ^^
( siehe http://www.delphipraxis.net/internal...=499461#499461 (mit Screenshot) )

Schick mir bitte ne PN mit deiner eMail-Addresse, dann kann ichs dir
heute Abend nach der Arbeit zumailen.

[HellSpawn1609]

habe ein weiteres problem.
ich will ein bild laden mit openpicturedialog.execute

so mache ich es...


OpenPictureDialog1.Filename := 'Bilder/Spielfiguren/Spielfigur_1.dip';

oder
OpenPictureDialog1.Filename := 'Bilder/Spielfiguren/Spielfigur_2.bmp';


geht beides nicht!??
was mache ich falsch??
da kommt dann eine Fehlermeldung: Unbekannte Bilddateierweiterung!

Aber die endung des Bildes ist aber bmp bzw. dip

[TurboMartin]

Wenn du

Zitat:

OpenPictureDialog1.Filename := 'Bilder/Spielfiguren/Spielfigur_2.bmp';

benutzt, musst du auch das Laufwerk angeben.
eigentlich muss es so sein:
OpenPictureDialog1.Filename := 'C:\Bilder\Spielfiguren\Spielfigur_2.bmp';
oder wenn es im gleichen verzeichnis liegt wie deine anderen dateien
OpenPictureDialog1.Filename := '...\Bilder\Spielfiguren\Spielfigur_2.bmp';