SQL query

[value is NULL]

Also, ich bin nun zu foldendem Teilerfolg gekommen mit folgendem Code:

Delphi-Quellcode:

var
  Conn : TADOConnection;
  Query: TADOQuery;
  provider : string;

begin
try
  CoInitialize(nil);
  Conn := TADOConnection.Create(nil);
  Conn.ConnectionString := 'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info = False;Initial Catalog=test;Data Source=localhost';
  Conn.Connected := true;

  Query := TADOQuery.Create(nil);
  Query.Connection := Conn;
  Writeln(Query.SQL.Add('select count(*) from tbuser'));
  Query.Active := true;

except
  on e : exception do begin
    writeln(e.message);
    halt(1);
  end;
end;

end.

Wenn ich diesen Query abschieße: Writeln(Query.SQL.Add('Select count(*) from tbuser')); bekomme ich 0 zurück ich habe jedoch 17 einträge? ist das eventuell der Fehlercode?
wenn ja wie bekomme ich den Output des Query's?

Vielen Dank im Voraus!

PS: für die MSDE wird SQLOLEDB.1 verwendet

LG