Max und Minimalwert einer Integervariable festlegen

[exoduscrises]

Hallo zusammen, habe in der Suche nichts brauchbares gefunden und wollte jetzt fragen ob man eventuell einen Maximal- und Minimalwert für eine Integervariable festlegen kann.

mfg ´Stefan

[alcaeus]

Hallo,

ja, z.B. so:
type MyInt = 15..23; Greetz
alcaeus

[himitsu]

Delphi-Quellcode:

Type TMaxMinInteger = -5..123;

Var xyz: TMaxMinInteger;

xyz ist jetzt eine Variable, wo alle Werte von -5 bit 123 reinpassen.

bei über-/unterschreitung meckert standardmäßig der Compiler (es wird nicht compiliert), oder das Programm (Error)...


[add]
mir wurde zwar der neue Beitrag angekündigt, aber wurde unten nicht angezeigt?

[IngoD7]

Zitat von himitsu:

bei über-/unterschreitung meckert standardmäßig der Compiler (es wird nicht compiliert), oder das Programm (Error)...

Hmmm ...

Delphi-Quellcode:

Type TMaxMinInteger = -5..123;

Var xyz: TMaxMinInteger;
    abc: integer;

begin
  abc := 250;
  xyz := abc;  // <-- Compiler meckert nicht, Programm meckert auch nicht
end;

[ste_ett]

Lass dir mal xyz ausgeben.

inttostr(xyz)

[Binärbaum]

Zitat von IngoD7:

Zitat von himitsu:

bei über-/unterschreitung meckert standardmäßig der Compiler (es wird nicht compiliert), oder das Programm (Error)...

Hmmm ...

Delphi-Quellcode:

Type TMaxMinInteger = -5..123;

Var xyz: TMaxMinInteger;
    abc: integer;

begin
  abc := 250;
  xyz := abc;  // <-- Compiler meckert nicht, Programm meckert auch nicht
end;

Das liegt evtl. daran, dass in den Optionen die Bereichsprüfung abgeschaltet wurde.

MfG
Binärbaum

[IngoD7]

Zitat von ste_ett:

Lass dir mal xyz ausgeben.
inttostr(xyz)

Ergab bei mir fehlerfrei den String '250'.

Aber ...

Zitat von Binärbaum:

Das liegt evtl. daran, dass in den Optionen die Bereichsprüfung abgeschaltet wurde.

Das war's. Wobei das Einschalten alleine nicht reicht, das hatte ich probiert. Das Projekt muss danach einmal erzeugt werden, damit der Progammlauf (gestartet aus der IDE) auch auf Fehler läuft.

Ist nicht das erste mal, dass ich darauf hereinfalle ...

[exoduscrises]

Vielen Dank erstmal, funktioniert wunderbar bei mir wenn ich mir die variable nochmal in einer anderen ausgeben lasse, jetzt kann ich endlich keine Lautstärke 62763 mehr erreichen ...

mfg Stefan

[Oxmyx]

Zitat von exoduscrises:

Vielen Dank erstmal, funktioniert wunderbar bei mir wenn ich mir die variable nochmal in einer anderen ausgeben lasse, jetzt kann ich endlich keine Lautstärke 62763 mehr erreichen ...

mfg Stefan

Wenn der Benutzer die Lautstärke eingibt, dann würde ich eher eine Abfrage nehmen, ob die Zahl im erlaubten Bereich liegt.

[exoduscrises]

der Benutzer drückt auf einen Button bei dem die Lautstärke um "-10" erhöht wird , also gibt sie ja nicht direkt ein.