RecordCount

[Elvis]

Hier mal ein Schnipsel, den man hier mit etwas Mühe auch selbst gefunden bzw daraus abgeleitet hätte.

Delphi-Quellcode:

var
  connection : IDbconnection;
  command    : IDbCommand;
  reader     : IDataReader;
  parameter  : IDataParameter;
begin

  connection := deineConnection;
  command := connection.CreateCommand();
  try
    command.CommandText := 'SELECT X FROM Y WHERE Z = :Z';
    parameter := command.CreateParameter();
    command.Parameters.Add(parameter);
    parameter.DbType := DbType.Int32;
    parameter.Value  := 1;
    
    reader := command.ExecuteReader();
    try
      while reader.Read() do
       irgendeinContainer.Add(new SomeClass(reader.GetInt32(0)));
    finally
      reader.Dispose();
    end;
  finally
    command.Dispose();
  end;
  Anzahl := irgendeinContainer.Count;
  // mache was mit den Daten...

Für einen einzelnen Wert würde auch das reichen:

Delphi-Quellcode:

  command := connection.CreateCommand();
  try
    command.CommandText := 'SELECT count(X) FROM Y WHERE Z = :Z';
    parameter := command.CreateParameter();
    command.Parameters.Add(parameter);
    parameter.DbType := DbType.Int32;
    parameter.Value  := 1;
    Anzahl := command.ExecuteScalar() as Integer;
  finally
    command.Dispose();
  end;

Auch das war eigentlich ziemlich offensichtlich. Schaue mal in die SDK Doku (findest du im Start menü), da werden sie geholfen.