Zitat von
himitsu:
du könntest dir notfalls einen kleinen Operator-Record erstellen (langsam mag ich diese Teile
) und die Überlaufbehandluch da einbauen.
War das das Teil, daß Daniel in einen seiner Videos vorgestellt hatte? Hatte er im beispiel nicht 2 Strings addiert oder so?
Das währe natürlich auch eine Idee ^^
Zitat von
mr_emre_d:
Delphi-Quellcode:
function RangeVal( Val, _Min, _Max: Integer ): Integer;
begin
Result := Val;
if ( Val < _Min ) or ( Val > _Max ) then
begin
if Val > _Max then
Result := Val - _Max + _Min - 1;
if Val < _Min then
Result := _Max - ( _Min - Val - 1 );
Result := RangeVal( Result, _Min, _Max );
end;
end;
hui nice
Ich habe z.Z. eine einfache IF abfrage. IF wert > Max then wert-Max ...
Da mein wert nur maximal 31 (2×max-1) annehmen kann reicht das eigentlich wollte das aber noch verbessern.
Dachte da an irgendwas mit
while oder sowas wie
Mod aber auf eine "einfache" Rekursion währ ich nie gekommen. Das geht dann auch bei Zahlen die nicht von 1(0)..X gehen
龍 Der Unterschied zwischen Theorie und Praxis ist in der Praxis größer als in der Theorie.