s:=adoquery.fieldbyname('keyfield').asstring; ADOQuery1.Active:=False; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('select * from score '); ADOQuery1.Active:=true; adoquery1.locate('keyfield',s,[]);
var m:Tbook; begin m:=ADOQuery1.getbook; ADOQuery1.Active:=False; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('select * from score '); ADOQuery1.Active:=true; ADOQuery1.gotobook(m); end;
var m:Tbook; begin m:=ADOQuery1.getbook; ADOQuery1.Active:=False; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('select * from score '); ADOQuery1.Active:=true; ADOQuery1.gotobook(m); end;
ADOQuery1.Active:=False;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select * from score ');
ADOQuery1.Active:=true;
adoquery1.locate('keyfield',s,[]);
m:Tbook;
begin
m:=ADOQuery1.getbook;
ADOQuery1.Active:=False;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select * from score ');
ADOQuery1.Active:=true;
ADOQuery1.gotobook(m);
end;
m:Tbook;
begin
m:=ADOQuery1.getbook;
ADOQuery1.Active:=False;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select * from score ');
ADOQuery1.Active:=true;
ADOQuery1.gotobook(m);
end;