Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Brauche Hilfe bei roulettespiel, (feld-inhalt x3 + Geldf

    Delphi
    by Nils_13, 14. Jan 2007
  Ohne mir diesen Code großartig angeschaut zu haben, ist mir aufgefallen, dass du begin und end; vergessen hast. Das muss so aussehen:
  
  begin
  zahl.Caption := FloatToStr(int(random*36));
  y := StrToint(zahl.Caption);
  if (y > 0) and (y < 13) then
  begin
  money.Text := FloatToStr(StrToFloat(money.text)+((StrToFloat(first.text))*3));
  first.text := '0';
  end else