Вывод непустых строк вместо is not null

DM.ADOQuery1.SQL.Clear;
DM.ADOQuery1.SQL.Add('SELECT * FROM brut WHERE LEN(TRIM(pass)) > 0');
DM.ADOQuery1.Active:=True;