如果用DELPHI,首先定义一个类型
Type TDataNode = record
ID: Cardinal;
end;
PDataNode = ^TDataNode;
然后 pDatack: PDataNode;
gNode:TTreeNode;
pDatack:=gNode.Data;
iddata:=integer(pDatack.id);
DataModule3.ADOTable1.open;
DataModule3.ADOTable1.Locate('id',inttostr(iddata),[lopartialkey]);
Type TDataNode = record
ID: Cardinal;
end;
PDataNode = ^TDataNode;
然后 pDatack: PDataNode;
gNode:TTreeNode;
pDatack:=gNode.Data;
iddata:=integer(pDatack.id);
DataModule3.ADOTable1.open;
DataModule3.ADOTable1.Locate('id',inttostr(iddata),[lopartialkey]);
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货