Aggiunta validate per zerofill
git-svn-id: svn://10.65.10.50/trunk@741 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
40ebcac0c8
commit
e45d7934ef
@ -60,6 +60,8 @@
|
||||
CHECK_FIELD esegue il check su di un altro campo
|
||||
campo
|
||||
FILENAME_FUNC controlla se la stringa e' un nome di file
|
||||
ZEROFILL_FUNC riempie di zeri i numeri fino a n caratteri
|
||||
n.ro di caratteri
|
||||
*/
|
||||
|
||||
#define EXPR_FUNC 0 2
|
||||
@ -80,7 +82,8 @@
|
||||
#define STRCALC_FUNC 15
|
||||
#define ONEREQ_FUNC 16
|
||||
#define CHECK_FIELD 17 1
|
||||
#define FILENAME_FUNC 18
|
||||
#define FILENAME_FUNC 18 0
|
||||
#define ZEROFILL_FUNC 19 1
|
||||
|
||||
#define VALEXPR VALIDATE EXPR_FUNC
|
||||
#define NUM_EXPR VALEXPR 0
|
||||
|
@ -577,7 +577,23 @@ HIDDEN bool _filename_val(TEdit_field& f, KEY)
|
||||
return fn.ok();
|
||||
}
|
||||
|
||||
#define MAX_FUNC 19
|
||||
HIDDEN bool _zerofill_val(TEdit_field& f, KEY k)
|
||||
{
|
||||
if (f.to_check(k))
|
||||
{
|
||||
const int columns = atoi(get_val_param(0));
|
||||
TString & val = f.get();
|
||||
|
||||
if (val.len() < columns && real::is_natural(val))
|
||||
{
|
||||
val.right_just(columns, '0');
|
||||
f.set(val);
|
||||
}
|
||||
}
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
#define MAX_FUNC 20
|
||||
|
||||
HIDDEN VAL_FUNC _global_val_func[MAX_FUNC] =
|
||||
{
|
||||
@ -599,7 +615,8 @@ HIDDEN VAL_FUNC _global_val_func[MAX_FUNC] =
|
||||
_strcalc_val,
|
||||
_onereq_val,
|
||||
_chkfld_val,
|
||||
_filename_val
|
||||
_filename_val,
|
||||
_zerofill_val
|
||||
};
|
||||
|
||||
bool validate(int fn, TEdit_field& f, KEY k, const TArray& parms)
|
||||
|
Loading…
x
Reference in New Issue
Block a user