AdoQuery içinde progressbar kullanımı hakkında

[TescilsizUzman]

Merhaba,
Öncelikle ProgressBar'ın Visible özelliğini tasarım ekranında  False  yapın.  Böylece  uygulama  çalıştığında  ProgressBar  görünmeyecektir.
Kayıt  işlemine  başlamadan, ProgressBar'ı  göstererek,  pozisyon  ve  max  değerlerini  belirleyin. finally  bölümünde  ise  visible  özelliğini   False  yapın.
örnek verecek  olursak

//Diğer işlemler
ProgressBar1.visible := True;
ProgressBar1.max := KaydedeceğinizKayitSayisi;
ProgressBar1.Position := 0;
Try
//Kayıt işlemleri döngüsü
 ProgressBar1.Position := işlenenkayitSayisi;
Application.ProcessMessages;
 //Kayıt işlemleri sonu
Finally
 ProgressBar1.visible :=False;
End;

İyi çalışmalar