function QryName(Name: string): boolean;
begin
with IBQuery1 do begin
Close;
SQL.Clear;
SQL.Add('select Name from A);
SQL.Add(' where Name = :Name');
ParamByName('Name').AsString := Name;
Open;
// Result := (RecordCount > 0); 不行
Result := not FieldByName('Name').IsNull; //也没用
end;
end;用iSQL可以查询到一条记录,但是上面的程序返回值是false,为什么?
begin
with IBQuery1 do begin
Close;
SQL.Clear;
SQL.Add('select Name from A);
SQL.Add(' where Name = :Name');
ParamByName('Name').AsString := Name;
Open;
// Result := (RecordCount > 0); 不行
Result := not FieldByName('Name').IsNull; //也没用
end;
end;用iSQL可以查询到一条记录,但是上面的程序返回值是false,为什么?
你还可以用Result := not IsEmpty试试看