verschachtelte if funktion

[Sir Rufo]

@xZise

ich befürchte aber, das dem TE die Grundlagen fehlen, um deinen Code zu verstehen bzw. den auf dieser Basis zu vervollständigen. Natürlich schreit die Aufgabenstellen und Delphi nach einer OOP-Lösung (mit Klassen), aber schau dir den Ansatz vom TE an und du wirst festellen, dass der über das Drag'n'Drop von Komponenten auf ein Form noch nicht viel weiter gekommen ist.

Somit wäre ein Verweis auf ein Grundlagen-Tutorial in diesem Falle besser.

Um dieses plain zu lösen sollte der TE mal eine Logik-Tabelle aufzeichnen und dabei alle möglichen Konstellationen eintragen. Damit kann man dann ein Regelwerk erstellen und dieses dann nach Delphi umsetzen.

[EDIT]

So ich hab da mal als Fingerübung ein Solitär zusammengeklopft
Es ist bestimmt nicht die beste Version, aber eine die funktioniert.
Logik und Ausgabe sind natürlich getrennt.

Im Anhang befinden sich die Quellen und die kompilierte Version (logisch als exe)

HINWEIS Da ich die Generics benutze lässt sich der Code nur mit Delphi 2010 (2009?) compilieren. Mit geübten Fingern kann man die Generics aber auch wegprogrammieren