Ver Mensaje Individual
  #1  
Antiguo 05-07-2024
Eduard23 Eduard23 is offline
Miembro
 
Registrado: mar 2023
Posts: 32
Reputación: 0
Eduard23 Va por buen camino
Mostrar ProgressBar durante un Query

buenas amigos del foro quisiera tocar este tema que se lo han hecho muchas veces pero consegui buscando en el foro este codigo es como mostrar un progressbar durante un query

Código SQL [-]
with ADOQuery1 do
begin
SQL.Clear;
SQL.Add('select * from Tabla1');
ExecuteOptions := [eoAsyncFetch];
Open;
end;

En el Evento OnFetchProgress del ADOQuery:

ProgressBar1.Max := MaxProgress;
ProgressBar1.Position := Progress;
Application.ProcessMessages;

trate de usarlo pero arroja el siguiente error si alguien sabe como corregirlo les sabria agradecer lo necesito usar
gracias de antemano
Responder Con Cita