D
darzui
Unregistered / Unconfirmed
GUEST, unregistred user!
function AuthSinger(SingerName: string; password: string): integer;
begin
if DataModule1.myTbSinger.locate('name', SingerName, []) then
begin
if DataModule1.myTbSinger.fieldbyname('password').asstring = password then
Result := 0
else Result := 1;
end
else Result := 2;
end;
其中myTBSinger的locate方法和ttable的locate方法是一样的。
明明传入正确的参数,可函数每次都返回2,这是怎么回事?
begin
if DataModule1.myTbSinger.locate('name', SingerName, []) then
begin
if DataModule1.myTbSinger.fieldbyname('password').asstring = password then
Result := 0
else Result := 1;
end
else Result := 2;
end;
其中myTBSinger的locate方法和ttable的locate方法是一样的。
明明传入正确的参数,可函数每次都返回2,这是怎么回事?