FcdsBarPicParams := TClientDataSet.Create(nil);
FcdsBarPicParams.Data := ATable;
FcdsBarPicParams.AddIndex(ID, ID, [ixPrimary]);
FcdsBarPicParams.IndexName := ID;with FcdsBarPicParams do
begin
if not FindKey([AID]) then Exit;
while not EOF and (FieldByName(ID).AsInteger = AID) do
begin
oBarPicParam := TGGJBarPicParam.Create(FieldByName(pfnParamCode).AsString,
FieldByName(pfnUnit).AsString, TGAEADataType(FieldByName(pfnDataType).AsInteger),
FieldByName(pfnParamVDID).AsInteger, FieldByName(pfnIsSCPJParam).AsBoolean);
Next;
End
请教一个问题,ABarPicParams是一张表,每次读表的时候都会按照它的一个ID字段去找符合要求的一行数据
我想让它读取的同时,读取的顺序是按照表里了另一个字段orderNum的升序顺序。
FcdsBarPicParams.Data := ATable;
FcdsBarPicParams.AddIndex(ID, ID, [ixPrimary]);
FcdsBarPicParams.IndexName := ID;with FcdsBarPicParams do
begin
if not FindKey([AID]) then Exit;
while not EOF and (FieldByName(ID).AsInteger = AID) do
begin
oBarPicParam := TGGJBarPicParam.Create(FieldByName(pfnParamCode).AsString,
FieldByName(pfnUnit).AsString, TGAEADataType(FieldByName(pfnDataType).AsInteger),
FieldByName(pfnParamVDID).AsInteger, FieldByName(pfnIsSCPJParam).AsBoolean);
Next;
End
请教一个问题,ABarPicParams是一张表,每次读表的时候都会按照它的一个ID字段去找符合要求的一行数据
我想让它读取的同时,读取的顺序是按照表里了另一个字段orderNum的升序顺序。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货