Memory-Spiel: Ideen

[Bjoerk]

Zitat von Mavarik:

Zitat von Bjoerk:

Was nämlich ein schönes Schmankerl wäre, wenn man die Karten so anordnen könnte, wie man es beim Memoryspiel auch macht (kreuz und quer, auch schräg

So?

Oder wirklich per Hand?

Halt einfach kreuz und quer, wie Kinder sie auch auf den Tisch legen.

[Mavarik]

Zitat von Bjoerk:

Halt einfach kreuz und quer, wie Kinder sie auch auf den Tisch legen.

Sehr nice...

[XardasLP]

Hallo,

wie kann man ein Image1.Free wieder createn?

FormSpiel.Image1.Create(nil);
Will mein Memory Spiel und alle Komponenten auf einer Form wieder zurück setzen, damit ein neues Spiel beginnen kann.


Hier zum Ansehen:
https://www.youtube.com/watch?v=PnEQ...annel=XardasLP

[nahpets]

Versuchs mal mit Image1.Picture := Nil; Allerdings kannst Du dann anschließend nicht mehr auf Picture zugreifen, bis ein neues Bild geladen wurde.

Ansonsten schau mal hier: https://www.benefind.de/web.php?org=...+delphi+source

Ein Image zur Laufzeit zu erstellen müsste so gehen: Image1 := TImage.Create(FormSpiel);

[XardasLP]

https://gyazo.com/b8b6bd000dfa2902cccf83494c71e311

Nope geht nicht.

Delphi-Quellcode:

FormSpiel.Image1.Free;
FormSpiel.Image1_1.Free;
FormSpiel.Image2.Free;
FormSpiel.Image2_1.Free;
FormSpiel.Image3.Free;
FormSpiel.Image3_1.Free;
FormSpiel.Image4.Free;
FormSpiel.Image4_1.Free;
FormSpiel.Image5.Free;
FormSpiel.Image5_1.Free;
FormSpiel.Image6.Free;
FormSpiel.Image6_1.Free;
FormSpiel.Image7.Free;
FormSpiel.Image7_1.Free;
FormSpiel.Image8.Free;
FormSpiel.Image8_1.Free;

FormSpiel.Image1 := FormSpiel.Image1.Create(FormSpiel);
FormSpiel.Image1_1 := FormSpiel.Image1_1.Create(FormSpiel);

FormSpiel.Image2 := FormSpiel.Image1.Create(FormSpiel);
FormSpiel.Image2_1 := FormSpiel.Image1_1.Create(FormSpiel);

FormSpiel.Image3 := FormSpiel.Image1.Create(FormSpiel);
FormSpiel.Image3_1 := FormSpiel.Image1_1.Create(FormSpiel);

FormSpiel.Image4 := FormSpiel.Image1.Create(FormSpiel);
FormSpiel.Image4_1 := FormSpiel.Image1_1.Create(FormSpiel);

FormSpiel.Image5 := FormSpiel.Image1.Create(FormSpiel);
FormSpiel.Image5_1 := FormSpiel.Image1_1.Create(FormSpiel);

FormSpiel.Image6 := FormSpiel.Image1.Create(FormSpiel);
FormSpiel.Image6_1 := FormSpiel.Image1_1.Create(FormSpiel);

FormSpiel.Image7 := FormSpiel.Image1.Create(FormSpiel);
FormSpiel.Image7_1 := FormSpiel.Image1_1.Create(FormSpiel);

FormSpiel.Image8 := FormSpiel.Image1.Create(FormSpiel);
FormSpiel.Image8_1 := FormSpiel.Image1_1.Create(FormSpiel);

[Luckie]

Zitat von XardasLP:

Nope geht nicht.

Immer diese wahnsinnig aussagekräftigen Fehlerbeschreibungen. Sollen wir jetzt raten, was nicht geht und welche Fehlermeldung kommt?

[himitsu]

Gute Fehlerbeschreibung (und nein, ein externes Bild zählt nicht) und dann nicht lesen können.
PS: Bilder "hier" anhängen. Und Strg+C, wenn der Fehlerdialog aktiv ist und dann per Strg+V hier als TEXT rein.

Zitat von nahpets:

Ein Image zur Laufzeit zu erstellen müsste so gehen: Image1 := TImage.Create(FormSpiel);

Ja, der Picture.Graphic ein NIL zuzuweisen funktioniert garantiert.

Und wo bitte liegt der Code, daß heir ständig auf FormSpiel zugegriffen werden muß?

[nahpets]

Ich schrieb sinngemäß FormSpiel.Image1 := TImage.Create(FormSpiel); und nicht FormSpiel.Image1 := FormSpiel.Image1.Create(FormSpiel); Anstatt die Images freizugeben und anschließend neu zu erstellen, erscheint die Methode

Zitat von himitsu:

Ja, der Picture.Graphic ein NIL zuzuweisen funktioniert garantiert.

sinnvoller.

[XardasLP]

Wenn man sich das Video (https://www.youtube.com/watch?v=PnEQdamZbak) angesehen hätte, würde man ja sehen, dass das Programm nachdem das Spiel gewonnen wurde ein neues Spiel starten soll und dazu die FormSpiel komplett zurückgesetzt werden muss.

Zitat:

Und wo bitte liegt der Code, daß heir ständig auf FormSpiel zugegriffen werden muß?

Also muss die FormGewonnen auf Elemente der FormSpiel zugreifen und diese löschen und wieder .create/n.

---------------------------
Benachrichtigung über Debugger-Exception
---------------------------
Im Projekt Project1.exe ist eine Exception der Klasse EAccessViolation aufgetreten. Meldung: 'Access violation at address 00483BCF in module 'Project1.exe'. Read of address 00000000'. Prozess wurde angehalten. Mit Einzelne Anweisung oder Start fortsetzen.
---------------------------

[Luckie]

Ach, der Link war die Fehlermeldung?