Forum: Object-Pascal / Delphi-Language
Delphi
by freak4fun,
31. Jan 2010
Wenn wir weiter zusammen arbeiten wollen halte dich bitte an die Forenregeln. :)
Das bedeutet keine Doppelposts (pushen). Außerdem wünsche ich mir von dir etwas aussagekräftigere Posts. :D
Das würde mich sehr freuen. :mrgreen:
Forum: Object-Pascal / Delphi-Language
Delphi
by freak4fun,
31. Jan 2010
Beim Aufruf von
Debug.updateview(Kliste,Hand,G1Hand,G2Hand);
in
procedure TFormMain.FormCreate(Sender: TObject);
ist KListe, Hand usw. nil, da sie erst später im FormCreate erzeugt werden. ;)
Forum: Object-Pascal / Delphi-Language
Delphi
by freak4fun,
31. Jan 2010
Kannst du das als Datei anhängen, damit ich das in mein lokales Projekt mit einfügen kann?
Forum: Object-Pascal / Delphi-Language
Delphi
by freak4fun,
31. Jan 2010
Deine Berechnen Methode ist komisch. Setzt mal einen Breakpoint auf die erste If-Bedingung und gehe mit F7 weiter und schau dir die Werte von inhalt in function TKarte.GibInhalt: TInhalt; an. :) Ab der zweiten Runde kommt er da durcheinader. ;)
Forum: Object-Pascal / Delphi-Language
Delphi
by freak4fun,
31. Jan 2010
Kannst du den Fehler eingrenzen? Ich kann das Projekt kompelieren und beim Klick auf den Button werden neue Karten angezeigt. Die scheinen aber wild durcheinander zu sein. So ganz steig ich da noch nicht durch. Im Moment schau ich mir die Sache mit dem Gewinner an, aber die Regeln sind nicht sehr leicht zu durchschauen. ;)
Forum: Object-Pascal / Delphi-Language
Delphi
by freak4fun,
29. Jan 2010
Hi,
ich schau mir das mal an. Den ersten Fehler den ich gefunden habe ist in HideCard. Der Schleifenzähler ist falsch, da Arrays mit 0 anfangen:
procedure TFormMain.HideCard(aImage: array of TImage;
bImage: array of TImage;
cImage: array of TImage);
var
i : Integer;
begin
for i := 0 to 19 do