Thema: Zykloide

Einzelnen Beitrag anzeigen

franktron

Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#19

Re: Zykloide

  Alt 14. Jul 2006, 10:54
Also ich hab da ein paar Fehler in deine Code gefunden.

Delphi-Quellcode:
  r:=strtoint(LE1.Text);
  if (r<10) or (r>100)
  then
    ShowMessage('Bitte einen Radius zwischen 0 und 201 eingeben.')
  else
Also son eine Lustige Meldung treibt wohl jedem in den Wahnisnn


Und der Code ist schlecht Formartiert und die Vars habe nicht Normkonforme Namen.
Frank
Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
  Mit Zitat antworten Zitat