Veritabanına bağlantıyı Unidac bileşen paketinde bulunan UniConnection nesnesi ile yapıyorum.
Veritabanı bağlantısında UniTransaction, UniQuery ve MySQLUniProvider bileşenlerini de kullanıyorum.
Daha sonra
Kod: Tümünü seç
procedure TProgressThread.Data_Sorgulama_Pro;
begin
DataModule2.UniQuery1.Close;
DataModule2.UniQuery1.SQL.Clear;
DataModule2.UniQuery1.SQL.Text := 'Select * from kataloglar';
DataModule2.UniQuery1.Open;
DataModule2.UniQuery1.First;
While not (DataModule2.UniQuery1.Eof) do
begin
Synchronize(Yeni_Katalog_Sablon_Pro); //Thread yöntemi ile işlemleri başlatmak
DataModule2.UniQuery1.Next;
end;
DataModule2.UniQuery1.Close;
end;
Aslında bağlantı, verileri çekmek ve işlemek hususunda herhangi bir problem yaşamıyorum. Ancak hızlı bir internet bağlantısında dahi UniConnection nesnesini aktif ederken 11 saniye ve 10 adet kaydı veritabanından çekerken 20 saniye gibi bir süre beklemek gerekiyor. Eğer internet hızı düşükse bu işlemleri yapmak tam bir çile oluyor. Yapılan işlemleri Thread yöntemi ile yaptığım için AniIndicator nesnesi devreye giriyor ama dediğim gibi bağlantı hızı yavaşsa bu nesne dön dön. . . . durmak bilmiyor.
Sizlerden isteğim bu işlemleri yapabileceğim başka bir yöntem var mı veya bu yapıda nasıl bir değişiklik yaparak işlemleri hızlandıra bilirim. Saygılarımla