Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  AW: Fehlerquotient

   
    by Lisa.99, 6. Mär 2017
  Danke habe es hinbekommen
  
  Hier soll er den Fehlerquotient berechnen, nur leider kann man als Fehleranzahl keine Kommazahlen eingeben. Ich glaube das es kein integerwert sein darf, nur leider wüsste ich nicht in wie weit ich das ändern muss, damit der ganze button dann funktioniert.
  var wort, fehler, ergebnis : integer;
  begin
  wort:= strtoint(Edit3.Text);
  fehler:= strtoint(Edit5.Text);
  ...
• Forum: Programmieren allgemein

  AW: Fehlerquotient

   
    by Lisa.99, 6. Mär 2017
  begin erg:= '15';
  Edit6.Text:= Floattostr(erg);
  end else
  
  Hier zeigt er mir, dass Fehler aufgetreten sind, aber weiß leider den Fehler nicht.
• Forum: Programmieren allgemein

  AW: Fehlerquotient

   
    by Lisa.99, 27. Feb 2017
  Dankeschön :-D
  Das hilft mir bestimmt weiter.
• Forum: Programmieren allgemein

  Fehlerquotient

   
    by Lisa.99, 27. Feb 2017
  Hallo!
  Ich lasse den Fehlerquotienten berechnen. Nun wollte ich die dazugehörigen Notenpunkte ausgeben lassen. Nur leider zeigt er mir einen Fehler.
  
  
  procedure TForm1.Button6Click(Sender: TObject);
  var fehlerquotient, erg : integer;
  begin
  fehlerquotient:= strtoint(Edit4.Text);
  if fehlerquotient < '0,59' then
  begin erg:= '15';