Quantidade de Registros numa consulta com ADOQuery
Olá Pessoal,
Queria saber como devo fazer para definir o numero de registros que quero trazer numa consulta. Existe uma propriedade MaxRecords do componente ADOQuery que posso definir na fase de desenvolvimento. Mas como posso alterar essa propriedade dinamicamente. O usuário irá definir esse valor num componente TRxSpinEdit, que guarda um integer e o mesmo será passado como parâmetro para o ADOQuery.
No aguardo
Muito Obrigado
Queria saber como devo fazer para definir o numero de registros que quero trazer numa consulta. Existe uma propriedade MaxRecords do componente ADOQuery que posso definir na fase de desenvolvimento. Mas como posso alterar essa propriedade dinamicamente. O usuário irá definir esse valor num componente TRxSpinEdit, que guarda um integer e o mesmo será passado como parâmetro para o ADOQuery.
No aguardo
Muito Obrigado
Tiagonews
Curtidas 0
Respostas
Carlosrm
10/07/2003
Veja se isso ajuda:
AdoQuery1.Close;
AdoQuery1.Sql.Clear;
AdoQuery1. Parameters.ParamValues[´MaxRegistros´] := TRxSpinEdit1.Value;
AdoQuery1.Sql.Add(´Select Campo1,..., Count(*) ´);
AdoQuery1.SqlAdd(´From Tabela ´);
AdoQuery1.Sql.Add(´ Where Count(*) <= : MaxRegistros´);
AdoQuery1.Open;
(Não esqueça de definir o parâmetro MaxRegistros como Integer).
carlosrm.
AdoQuery1.Close;
AdoQuery1.Sql.Clear;
AdoQuery1. Parameters.ParamValues[´MaxRegistros´] := TRxSpinEdit1.Value;
AdoQuery1.Sql.Add(´Select Campo1,..., Count(*) ´);
AdoQuery1.SqlAdd(´From Tabela ´);
AdoQuery1.Sql.Add(´ Where Count(*) <= : MaxRegistros´);
AdoQuery1.Open;
(Não esqueça de definir o parâmetro MaxRegistros como Integer).
carlosrm.
GOSTEI 0
Ruysalles
10/07/2003
With AdoQuery1 do
begin
Close;
Sql.Clear;
Sql.Text := ´ Select TOP + spinedit1.text + ´ campo1,campo2,campo3´ +
´ From tabela´
Open;
end;
begin
Close;
Sql.Clear;
Sql.Text := ´ Select TOP + spinedit1.text + ´ campo1,campo2,campo3´ +
´ From tabela´
Open;
end;
GOSTEI 0