D
dafuwengqing
Unregistered / Unconfirmed
GUEST, unregistred user!
with sql do
begin
cli closecl
add('select flag1 into :f from kch ');
add('where kch=:kc');
end;
parameters.ParamByName('kc').Value :=kch;
parameters.ParamByName('f').Value :=flag;
tishi
begin
cli closecl
add('select flag1 into :f from kch ');
add('where kch=:kc');
end;
parameters.ParamByName('kc').Value :=kch;
parameters.ParamByName('f').Value :=flag;
tishi