Du verwendest da auch eine Menge von
globalen Variablen, die natürlich auch
uncool sind.
Diese Werte gehören ja zu einem Kontext und diesen Kontext kannst du auch klarer gestalten
Delphi-Quellcode:
TSomeValue = record
a,b,c : double;
end;
TContext = class
private
x,y,z,a,b,c {usw....}:double;
public
procedure Calc( var a1, b1, c1 : double );
// Besser so
function CalcBetter( const aInput : TSomeValue ) : TSomeValue;
end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)