Вывод пустых конкретно всех, включая юзанных

procedure TLog.N6Click(Sender: TObject);
begin
DM.ADOQuery1.SQL.Clear;
DM.ADOQuery1.SQL.Add('SELECT * FROM brut WHERE LEN(TRIM(pass)) < 1 or'
+'(pass is NULL)');
DM.ADOQuery1.Active:=True;
Log.Caption:=Log.Caption+' всего акков без паролей: '+inttostr(dm.ADOQuery1.RecordCount);
end;