Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Inkompatible Typen

   
    by haentschman, 20. Aug 2020
  Moin...8-)
  
  Diese Logic verstehe ich nicht...
  
  a:=random(length(blatt)); // ermittlung der Karte aus dem Blatt (Integer zwischen 0 und 109)
  
  inc(zz); // Anzahl der Karten
  until ((a > 30) and (a < 90)); // Abheben min. 30 max. 90 Karten von 109 // ??? müßte das nicht statt a zz heißen
  
  setlength(tb,a);// ??? müßte das nicht statt a zz heißen
• Forum: Object-Pascal / Delphi-Language

  AW: Inkompatible Typen

   
    by haentschman, 19. Aug 2020
  Hallöle...8-)
  
  type
  CardWert = (ass,zwei,drei,vier,fuenf,sechs,sieben,acht,neun,z ehn,bube,dame,koenig,jokerw);
  CardFarbe = (kreuz,pik,herz,karo,jokerf);
  CardMotiv = TBitmap;
  
  TCard = class(TObject)
  private
  { private declarations }