-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
31. Jan 2010
Ok ich habs jetzt !
In der ersten Runde haben die Gegner ihre letzte Karte ausgespielt während sie in der zweiten dritten ect.
Runde immer ihre letzte karte ausgespielt habe ... zu sehn mit dem selbst gebastelten debugger... also war die ganze zeit gar kein wirklich er fehler da... omg... :roll:
:pale:
Aber Danke an alle die zur Lösung beigetragen haben und euch allen noch einen...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
31. Jan 2010
ok... also in der zweiten runde wirds komisch, da gibt er nämlich nicht nur einen sondern gleich zwei gewinner aus...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
31. Jan 2010
DANKE
da wär ich echt nich drauf gekommen :thumb:
man ich sollte mal was gegen dieses brett vor meinem kopf tun... :mrgreen:
so jetzt müsste man aber doch irgendwo was erkennen... :searching:
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
31. Jan 2010
hier am besten nochmal das komplette packet wies jetzt aussieht...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
31. Jan 2010
wieso geht das nochmal nicht? Hatte den fehler glaub ich schonmal... aber weiß es nicht mehr das ist meine zweite Form ... der ''Debuger''
unit UDeb;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, UKartenliste, UKarte;
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
31. Jan 2010
das problem ist nur das er den gewinner nicht richtig erkennt ... im manchen runden hat man selbst eine 3 der erste gener eine 7 und der zweite gegner eine 12 und dann gibt er aus: Gegner 1 gewinnt...
Ich arbeite gerade daran eine Art eigenes Debug Protokoll zu erstellen... vielleicht finde ich da etwas---
die karten sollen durcheinander sein^^ dafür gibts die prozedure MISCHEN ;)
und...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
31. Jan 2010
ähm... freak4fun?
will ja nicht nerven aber hast du schon was anderes gefunden?
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
31. Jan 2010
Thx an den mod ;)
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
29. Jan 2010
@freak4fun thx
@medium ... dich kennen wir ja schon... ich ignoriere das jetzt einfach mal
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
29. Jan 2010
Och Leute :mrgreen: Kommt schon ich bau auf euch :cry:
Please :o
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
29. Jan 2010
...warte jetzt seit stunden...
ihrgendjemand muss doch da nen fehler sehn... mal von irgendwelchen virtual geschichten abgesehen
:| PLEASE :|
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
29. Jan 2010
...das liegt daran das ich es in der Schule so gelernt habe und da das für ne facharbeit sein wird wäre es nicht so gut plötzlich ganz andere systeme zu verwenden... was das virtual angeht so weiß ich auch selbst gar nicht wozu das ist...
und was war mit inherited
?
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
28. Jan 2010
So ich gebs jetzt auf :wall:
:cry:
Es will immer noch nicht..........
So langsam gehts mir tierisch auf den geist....
kann mal bitte jemand gucken? hier das gesamte packet--->
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
28. Jan 2010
ok ich habs ... habe grundsätzlich das falsche einfüge verfahren:
if Aktuelles=erstes then next;
newListElem:=TKarte.create(pInhalt);
newListElem.setzeNext(Aktuelles);
newListElem.setzePrevious(Aktuelles.gibPrevious);
Aktuelles.gibPrevious.setzeNext(newListElem);
Aktuelles.setzePrevious(newListElem);
Previous;
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
28. Jan 2010
theoretisch nicht... in diesem test schon, aber das wäre egal... ich habe aber etwas herrausgefunden:
aus irgend einem grund ist die Liste verkehrt herum...
mit diesen test massages ließ es sich feststellen... aber wodurch kann das kommen... suche noch,,,
€DIT:
AnHaNg EnTfErNt
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
28. Jan 2010
jap
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
28. Jan 2010
... ja ok... das spiel kennt so wie so niemand und es ist auch irrelevant um welches es sich handelt da ich nur die Zahlen vergleichen will wie oben schon beschrieben ...
es gibt die Zahlen von 0 bis 14 ....
und ich weiß nicht ob dus wusstest, aber man kann dateien auch löschen... :wink: ...womit du dir auch deine festplatte nicht zupackst :mrgreen:
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
28. Jan 2010
relativ...
ich geh jetzt nochmal komplett durch... aber ob ich da was finde ist nicht sicher... kann gut sein das es was ist was mir gar nicht so bewusst ist...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
28. Jan 2010
:pale: :Help: :pale:
Hat keiner ne Idee?
--> Die exe is auch erst einmal gedownloaded worden...
*need help*+*dringend*
:?
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
27. Jan 2010
Kleines Update bevor ich mich aufs Ohr hau...
ich dachte erst es läge vielleicht daran das ich die Hand-Listen an der Stelle an der Sie gefüllt werden nicht geleert hatte.. aber auch daran lag es nicht... hier im anhang mal die exe... vielleicht erkennt ja jemand einen Zusammenhang...
Falls ihr doch den Quellcode komlett braucht meldet euch bitte...
Auf den Karten finden sich die Zahlen...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
27. Jan 2010
Wenns hilft stell ich den gesamten quelltext rein oder lad das hoch...
:? HELP :? :o
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
27. Jan 2010
Ka... schreib mal nen paar beispiele auf:
Runde 1
ich(I): 3 Gegner1(G1): 12 Gegner2(G2): 4 --> G1 gewinnt | y
Runde 2
I: 2 G1: 1 G2: 3 --> G2 gewinnt | y
I: 1 '' '' --> '' | y
Runde 3
I: 6 G1: 5 G2: 11 --> G1 gewinnt | N
I: 8 '' '' --> '' | N
I: 2 ____________________________| N
-
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussel9,
27. Jan 2010
:shock: I-wie gehts da nix^^ also ich lasse mir testweise die karten der gegner (G1 und G2) mit anzeigen und die Abfrage scheint noch nicht zu stimmen :mrgreen: is wahrscheinlich wieder irgend ne kleinigkeit oder son ganz blöder fehler
Danke schonmal fürs Korrigieren meiner Blödheit ;)
Aufruf:procedure TFormMain.Card1Click(Sender: TObject);
var i: Integer;
begin
(Sender as...