判断类型及是否符合类型值函数

原创 2004年07月09日 16:16:00

//判断类型及是否符合类型值函数
function TReportForm.ControlType(FType : TNrType ; FValue : String): Boolean;
Var
  i : integer;
function CountSubStr(SubStr, Source: string): Integer;
begin
  result := 0;
  while pos(SubStr, Source)<> 0 do
  begin
    inc(result);
    Source := copy(Source, pos(SubStr, Source)+Length(SubStr), $7FFFFFFF);
  end;
end;

begin
  Result := True;
  if FType = DrMoney then
  begin
  if CountSubStr('.',FValue) > 1 then Result := False;     //'.'大于1个
  For i := 1 to Length(FValue) do
    if not (FValue[i] in ['0'..'9','.','$']) then Result := False;     //非法字符
    if not Result then  exit;
  end  //DRMoney
  else if FType = DrNum then
  begin
    For i := 1 to Length(FValue) do
      if not (FValue[i] in ['0'..'9']) then Result := False;     //非法字符
  end//Drint
  else if FType = DrTel then
  begin
    if CountSubStr('-',FValue) > 1 then Result := False;     //'-'大于1个
    For i := 1 to Length(FValue) do
      if not (FValue[i] in ['0'..'9','-']) then Result := False;     //非法字符
    if not Result then  exit;
  end //DrTel
  else if FType = DrEmail then
  begin
    if CountSubStr('@',FValue) <> 1 then
    begin
      Result := False;     //'.'大于1个
      exit;
    end;
  end;
end;

[JS]js中判断变量类型函数typeof的用法汇总

1、作用: typeof 运算符返回一个用来表示表达式的数据类型的字符串。  可能的字符串有:"number"、"string"、"boolean"、"object"、"function" 和 "un...
  • szwangdf
  • szwangdf
  • 2015年01月08日 14:28
  • 17532

angularJs数据类型判断

angular.isArray 判断括号内的值是否为数组。 格式:angular.isArray(value); value: 被判断是否为数组的值。 ------------...
  • summerchencongxx
  • summerchencongxx
  • 2016年08月23日 11:50
  • 6452

Python之isinstance() 函数判断数据类型

isinstance isinstance(object, classinfo) 判断实例是否是这个类或者object是变量 classinfo 是类型(tuple,dict,int,float...
  • u013372487
  • u013372487
  • 2015年04月22日 14:24
  • 2035

LJH_决定C++语言中函数的返回值类型

  • 2017年09月22日 08:53
  • 3.48MB
  • 下载

C++泛型编程技巧 - 如何判断输入类型是否定义了特定的成员函数

判断一个类型包含了哪些数据或函数成员在提供了类型反射机制的高级语言上大有用处,而C++这种静态语言并未提供直接支持。 需要有类似MFC一样在每个类型里编写组织相关信息的代码才行。 本篇尝试使用一种非侵...
  • chengjian1027
  • chengjian1027
  • 2013年08月24日 00:23
  • 1122

javascript学习笔记—判断值和函数的类型

New Document /* 五种基本数据类型: number:数值 string:字符串 boolean:布尔 null:空 un...
  • a125138
  • a125138
  • 2012年08月03日 17:40
  • 1630

函数返回值是否使用引用类型的问题:理解引用、返回值

在《对象更有用的玻璃罩——常引用》一文中,介绍了对象作为函数的参数时,推荐使用引用的形式。并且,如果实际参数的值不允许改变时,声明为常引用更佳。   在《第8周-任务1-方案3-复数类中运算符重载(...
  • sxhelijian
  • sxhelijian
  • 2012年04月16日 17:17
  • 8813

动软生成器自制模板(时间溢出判断,string类型给默认值等)

  • 2013年12月11日 20:21
  • 3KB
  • 下载

object 工具类 判断实体中属性值是否都为空 将实体Stirng类型为null的值替换

import java.lang.reflect.Field; import java.lang.reflect.InvocationTargetException; import java.la...
  • jrsuccess
  • jrsuccess
  • 2014年09月30日 14:47
  • 1861

c++ 函数符号重载 返回类型是否为引用问题 剖析

在c++中要想实现这样的运算就必须自定义运算符重载函数,让它来完整具体工作。   在这里要提醒读者的是,自定义类的运算符重载函数也是函数,你重载的一切运算符不会因为是你自己定义的就改变其运算的优先级...
  • qq_19175749
  • qq_19175749
  • 2015年11月09日 15:35
  • 841
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:判断类型及是否符合类型值函数
举报原因:
原因补充:

(最多只允许输入30个字)