Pokerkarten während des Spiels erstellen

[Corpsman]

Also eigentlich sollte das mit Sleep ja gehn.

Aber kannst ja mal ein "Manuelles" sleep machen.

Delphi-Quellcode:

// Wartet Value ms lang.
Procedure Warte(Value:Integer);
var d1 : dword;
begin
  d1 := Gettickcount;
  while Gettickcount - d1 < Value do
    Application.processmessages;
end;

Aber vorsicht habs Blind gecoded.