delphi - 如何在四个字符组中编辑 IBAN 号码？

Question

以电子方式传输时，IBAN 不应包含空格：打印时，它以由单个空格分隔的四个字符为一组表示，最后一组长度可变，如下例所示：

典型的 IBAN 如下所示：（GR16 0110 1250 0000 0001 2300 695取自上述链接）。

我想让用户更容易输入 IBAN 号码。目前我使用 aTDBEdit来显示 IBAN 号码，并将其作为字符（不带空格）存储在数据库中。

我知道可以使用格式化数字TNumericField.DisplayFormat，也有TMaskEdit，但两者都不是非常有用，因为 IBAN 不是数字并且在不同国家有不同的长度。

如何在 DB 控件中编辑四个字符组中的 IBAN 编号？

PS：我不是要求实际的 IBAN 验证，因为我已经知道了。

score 7 · Accepted Answer

您可以使用 IBAN 字段的 EditMask 属性，因为这也适用于字符串字段。适合 IBAN 的 EditMask 可能如下所示：

">LL00 aaaa aaaa aaaa aaaa aaaa aaaa aaaa aa;0; "

第一个字符使编辑字段将所有字符转换为大写。接下来的四个条目需要两个字母字符，后跟两个数字字符。空白代表请求的间隙。较低的“a”允许使用字母数字字符，但不需要它。

掩码第二部分中的“0”将从存储在字段中的条目中删除任何文字（空白）。

掩码第三部分的空白使间隙空白显示为空白。

1 回答 1