Hallo,
ich habe in der
DEC einen neuen Algorithmus hinzugefügt der derzeit eine RawByteString Konstante benutzt
und diese als 1-basiert betrachtet. Im Code gibt's Index Berechnungen wo derzeit ein +1 steht, man kann das
nicht mit Low(NamederKonstante) usw. abfangen.
Jetzt wollte ich im betreffenden Code die Zero Based Strings (ZBS) einfach ausschalten, da ja nutzer unter
Delphi 10.1-10.4 auf mobilen Plattformen immer ZBS an haben, nach der entsprechenden Methode wollte ich das
wieder auf den vorher aktiven Wert setzen, also falls es an war wieder anschalten.
Woanders im Code habe ich ein Konstrukt wie dieses gesehen:
{$IFOPT R+}{$DEFINE RESTORE_RANGECHECK}{$ENDIF}
Man kann also rausfinden, ob R+ gesetzt ist.
Nur das hier funktioneirt nicht, das führt zu einem Compiler Fehler:
{$IFOPT ZEROBASEDSTRINGS}{$DEFINE RESTORE_ZBS}{$ENDIF}
Warum? Gibt's dafür eine Lösung?
Grüße
TurboMagic