Thema: Delphi Memory Programm

Einzelnen Beitrag anzeigen

bcvs

Registriert seit: 16. Jun 2011
703 Beiträge
 
Delphi 12 Athens
 
#20

AW: Memory Programm

  Alt 17. Mär 2015, 08:54
procedure TFormAL.Image15Click(Sender: TObject);
begin
image15.visible:= false;
end;
So und dann öffnet sich ein Formular Mit den Karten. 8 Paare und über jeden Ist das "Deckblatt".
Und wenn man das anklickt ist das weg. So aber es muss ja wieder erscheinen wenn das Pärchen nicht passt.
Und das bekommen wir mit unserem Delphi wissen was wir in der schule erlernt haben nicht wirklich hin. ..
Wenn ich das richtig verstehe, habt ihr für jeden Kartenzustand (verdeckt, aufgedeckt) ein eigenes TImage, was dann immer auf visible:=false gesetzt wird, wenn es nicht gebraucht wird.

Ich würde nur ein TImage pro Karte nehmen und da immer das benötigte Bild reinladen. Die Nummer des Bildes könnte man in der Eigenschaft Tag des TImage speichern. Diese Nummer wäre dann gleichzeitig der Dateiname des Bildes.

aufdecken:
Image.Picture.LoadFromFile(IntToStr(Image.Tag)+'.bmp');
verdecken:
Image.Picture.LoadFromFile('deckblatt.bmp');

Erst, wenn ein Pärchen gefunden wurde, werden die beiden Images auf visible:=false gesetzt.
  Mit Zitat antworten Zitat