Zitat von
ichnixwissen:
Er soll bei der Auswertung die Prozent anzeigen. er1,er2,er3 und er4 (ist integer) sind auf anderen Formen, aber global in Unit2 deklariert und Unit2 in uses eingetragen. Er zeigt,aber immer bei der Auswertung = an.
Delphi-Quellcode:
er:= er1 + ((er2)/ 4) + ((er3)/ 2) + er4;
pro:= (er / 20) * 100;
Label1.Caption:= floattostr(pro);
Wenn die ganzen er's integer sind, würde ich die Berechnung von pro anders vornehmen:
pro := (er * 100.0) / 20.0;
Zuerst multiplizieren, und die Konstanten als Gleitkomma schreiben. Dann sollte es gehen.
Gruss