Delphi 5 + AlphaDB + CharInSet()

Viewing 2 posts - 1 through 2 (of 2 total)
  • Author
    Posts
  • #59308
    Support
    Keymaster

      Thank you.

      The AlphaDB package is updated now for using with old versions of Delphi:

      http://www.alphaskins.com/sfiles/stable/alphadb.zip

      #59316
      JM-DG
      Participant
        'dxMos' wrote:

        Hello,

        just for information!

        Delphi 5 + Ver.14.20

        I have to replace …

        Code:
        if CharInSet(Key, [#32..#255]) and

        with

        Code:
        if (KEY IN [#32..#255]) and
        (FDataLink.Field nil) and
        not (Key IN ['0'..'9']) and
        (Key {$IFDEF DELPHI_XE2}FormatSettings.{$ENDIF}DecimalSeparator) and
        (Key '-') then begin

        Thomas

        I just added the file acntUtils in the uses of the problematic files & everything worked out.

      Viewing 2 posts - 1 through 2 (of 2 total)
      • You must be logged in to reply to this topic.