Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  Re: Programmiercode verkürzen!

   
    by uligerhardt, 6. Apr 2009
  Stümmt. :mrgreen:
  
  Dann fehlt noch ein Fall für die Eingabe 13:
  Wert := Zufallszahl mod 13;
  if (Wert = 0) or (Wert > 10) then
  Wert := 10;
  oder (mit himitsus Einwurf)
  Wert := Max(Succ(Pred(Zufallszahl) mod 13), 10);. (Alles ungetestet.)
  
  ÄHM: Min, nicht Max. :oops:
• Forum: Programmieren allgemein

  Re: Programmiercode verkürzen!

   
    by uligerhardt, 6. Apr 2009
  Auf jeden Fall würde ich mal den Namen der Projektdatei auf Baccara.dpr ändern. Dann kriegt dein Exe automatisch den richtigen Namen. :-)
  Und wenn du schon beim Umbenennen bist: Gib der MainForm (TForm1) gleich auch einen vernünftigen Namen.
  
  Weiter: Randomize nur einmal im Programm aufrufen, z.B. im FormCreate.
  
  Und Wertzuordnen könnte so ausschauenWert := (Zufallszahl - 1) mod 13;
  if Wert...