Código Delphi [-] var N: Integer; begin N:= Query1.RecordCount; end;
var N: Integer; begin N:= Query1.RecordCount; end;