范例1：新建对象D，插入5行3列随机数
D:=new selobj();
insert into D rand(5,array('a','b','c'));
return D.data(); // return D.FData;
type selobj=class
//******数组变量和下标变量********
FData;
FIndex;
//******数据处理方法**************
Public
Function create();
begin
FData:=array();
FIndex:=-1;
end;
Function TSQLBatchInsert(V);
begin
FData&=V;
return true;
end;
Function data();
begin
return fdata;
end;
End;
范例2：新建对象D，插入1行4列指定数据后，再插入5行3列随机数。
D:=new selobj();
insert into D insertfields(["a"],["b"],["c"],["d"]) values(1,2,3,4);
insert into D rand(5,array('a','b','c'));
return D.data(); // return D.FData;
type selobj=class
//******数组变量和下标变量********
FData;
FIndex;
//******数据处理方法**************
Public
Function create();
begin
FData:=array();
FIndex:=-1;
end;
Function TSQLBatchInsert(V);
begin
FData&=V;
return true;
end;
Function TSQLSetValue(Key,Value):Boolean;
begin
FData[FIndex][Key]:=Value;
return true;
end;
Function TSQLInsert():Boolean;
begin
FIndex:=length(FData);
return true;
end;
Function data();
begin
return fdata;
end;
End;