关于一个Record的问题??

Question

能否用一个过程来判断任意的Record类型.让它的字段在给定的类型下操作如： 
有如下记录:
TTest1=Record
  A:integer;
  B:char;
  C:string;
end;TTest2=Record
  A:char;
  B:integer;
  C:string;
end;现在想让记录的字段为integer类型的全部设为0;不知道用Typeinfo能不能做出来???

Answer 1

var
  a : TTest1;fillChar(@a, sizeof(a), 0);

Answer 2

case Query1.FieldByName(locFieldName).DataType of
      ftString:
        locFieldValue := Query1.FieldByName(locFieldName).AsString;
      ftFloat:
        begin
         locTypeFloat := True;
         locFieldVal2 := Query1.FieldByName(locFieldName).AsFloat;
        end;
      end;