Forum: Object-Pascal / Delphi-Language
Delphi
by 3_of_8,
25. Aug 2007
Dann steht da vermutlich keine Zahl drin.
Forum: Object-Pascal / Delphi-Language
Delphi
by 3_of_8,
25. Aug 2007
1. "Es klappt nicht" ist keine Fehlerbeschreibung
2. Ich habe gesagt Max auf 100 setzen _ODER_ mit 10 multiplizieren.
Forum: Object-Pascal / Delphi-Language
Delphi
by 3_of_8,
24. Aug 2007
Ja, gibt es. Du setzt Max auf 100. Oder du multiplizierst den Wert mit 10.
Und was meinst du mit "25 von 50 bezogen auf 100"?
Forum: Object-Pascal / Delphi-Language
Delphi
by 3_of_8,
24. Aug 2007
Er rechnet definitiv richtig, er rundet wahrscheinlich nur falsch.
Du wirst definitiv keine 111.11% erhalten, weil du MaxValue=100 hast und außerdem ist 800/82 ungefähr 11,1%. Warum setzt du nicht einfach den Wert des Gauges gleich auf 11?
Forum: Object-Pascal / Delphi-Language
Delphi
by 3_of_8,
24. Aug 2007
Das Ergebnis der Operation x/y ist in Delphi ein Real, kein Integer. Daher musst du ergebnis als Real (oder Single/Double/Extended) definieren. Eine weitere Möglichkeit wäre, x/y durch x div y zu ersetzen.
Übrigens brauchst du insgesamt nur eine Variable.
procedure Form1.OKBtnClick(Sender: TObject);
begin
Timer1.enabled:=true;
Timer1.Interval:=10;
end;
procedure...