Si bien por algun lado lei que existe una clase
TADODataSet, nunca la he usado
Siempre uso TADOQuery para ejecutar consultas SQL (en general, todos los select) y TADOCommand para el resto
Yo cambiaria el TADODataSet por TADOQuery y como siempre aconsejamos, mejor temprano que tarde, hay que acostumbrarse a usar parametros en las sentencias SQL
Código Delphi
[-]procedure ...
var
qry: TADOQuery;
Cantidad: Integer;
begin
qry := TADOQuery.Create(nil);
try
qry.SQL.Text := ' SELECT COUNT(*) AS CANTREG FROM plancli WHERE CC = :ccusu ';
qry.SQL.Text.Parameters.ParamByName('ccusu').DataType := TFieldType.ftString;
qry.SQL.Text.Parameters.ParamByName('ccusu').Value := ccusu;
qry.Open;
Cantidad := qry.FieldByName('CANTREG').AsInteger; finally
qry.Free;
end;
end;