Forum: Sonstige Fragen zu Delphi
Delphi
by Stillmatic,
23. Mai 2007
Sonst ist keinem was aufgefallen???
Forum: Sonstige Fragen zu Delphi
Delphi
by Stillmatic,
22. Mai 2007
Dann hast du sicherlich 2 Karten gekauft die bei klick auf Nein natürlich wieder bezahlt werden müssen!!
Also:::
Guthaben = 20
Karten = 2
NeuesGuthaben = 18
Paar4 getroffen
Neues Guthaben = 22
Forum: Sonstige Fragen zu Delphi
Delphi
by Stillmatic,
22. Mai 2007
Hi Leutz!!
Ich hab das Programm (als .exe) mal hochgeladen!!
Wenn sich ein paar freiwillige mal zum testen opfern könnten, wäre dies sehr nett!!
Über Meinungen würd ich mich freuen! :lol:
Falls wer die Spielregeln nicht kennt.....
http://de.wikipedia.org/wiki/Schlesische_Lotterie
Forum: Sonstige Fragen zu Delphi
Delphi
by Stillmatic,
21. Mai 2007
Ich darf alles ändern ausser die vorgegebenen Funktionen und ich darf keine globalen Variablen anlegen!!!
Forum: Sonstige Fragen zu Delphi
Delphi
by Stillmatic,
21. Mai 2007
Das ist schlecht!!
Ich darf keine globalen Variablen anlegen und die Funktionen nicht verändern!!
mit getGewinn meine ich.....
Das einer Funktion den Wert des Gewinnes übergeben wird???
Forum: Sonstige Fragen zu Delphi
Delphi
by Stillmatic,
21. Mai 2007
Ich darf die Funktion nicht verändern!!!
Kann man das nicht mit ner getFunktion machen???
Ich probiere es aber es klappt nicht!!
Forum: Sonstige Fragen zu Delphi
Delphi
by Stillmatic,
20. Mai 2007
Sry aber durch den Code blick ich ja überhaupt nicht durch!!
Wie könnte das ganze denn für mein Problem aussehen??
Forum: Sonstige Fragen zu Delphi
Delphi
by Stillmatic,
20. Mai 2007
Ja schau mal nach, bitte!!!
TCards = (k7, k8, k9, kb, kd, kk, k10, ka,
h7, h8, h9, hb, hd, hk, h10, ha,
p7, p8, p9, pb, pd, pk, p10, pa,
kr7, kr8, kr9, krb, krd, krk, kr10, kra);
Forum: Sonstige Fragen zu Delphi
Delphi
by Stillmatic,
20. Mai 2007
Ja TCards hab ich selber erstellt, da sind halt alle Karten drin von
Forum: Sonstige Fragen zu Delphi
Delphi
by Stillmatic,
20. Mai 2007
Hab es soweit!!
for i := 0 to 8 do
Begin
Karte := TCards(random(UConst.cCardCount));
if (Karte in newDeck) then
newDeck:= newDeck - else
Begin
repeat
Karte := TCards(random(UConst.cCardCount));
until (Karte in newDeck) ;
Forum: Sonstige Fragen zu Delphi
Delphi
by Stillmatic,
20. Mai 2007
Guten Abend!!!
Ich möchte ein Kartenspiel namens "Schlesische Lotterie" programmieren!
Ich muss auf einen Buttonklick so reagieren......
Er werden neun zufallsKarten(von einem Skat Kartenspiel) gezogen nach denen nachher die Punkteverteilung berechnet wird!
Nun ist mein Problem folgendes!!!
Ich habe einen array vom Typ TCards( also K7(Karo 7 ),H7(Herz 7) usw...)
Karten : array...