AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

überlauf bei eigenem Zahlentyp

Ein Thema von TeronG · begonnen am 12. Mär 2009 · letzter Beitrag vom 13. Mär 2009
 
Benutzerbild von TeronG
TeronG

Registriert seit: 19. Jul 2004
Ort: München
960 Beiträge
 
Delphi 2007 Professional
 
#8

Re: überlauf bei eigenem Zahlentyp

  Alt 13. Mär 2009, 08:28
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.
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:44 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz