Forum: Multimedia
Delphi
by Matze1848,
26. Mär 2011
okok,erst einmal danke für die Beiträge. ich hab mir das mit der liste zu herzen genommen und erstmal (ohne skat oder so) ein mischalgorithmus erstellt, der in ein Memofeld schreibt. hat aber länger gedauert als ich dachte :D
procedure TForm1.Button1Click(Sender: TObject);
var Karten: Integer;
Ausgabe: String;
x : Integer;
Liste1: TStringList;
begin
Memo1.Lines.Clear;
Forum: Multimedia
Delphi
by Matze1848,
26. Mär 2011
Moin,moin.
Ich bin derzeit Klasse 11 und möchte mich mal an höheren Aufgaben als Ampeln und Sonnensystemen probieren ;)
Dacht ich mir, probier ich mal ein Skatspiel zu programmieren.
Also erstmal ohne cards.dll, sondern mit Buttons oder so.
Hab ich mir gedacht fang ich ma mitm mischen an, irgendwas in richtung.
randomize;
Karten:=random(34)+1;