Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.270 Beiträge
 
Delphi 10.4 Sydney
 
#2

Re: !!! Datenbankübertragungsfortschritt - Progressbar wie?

  Alt 26. Nov 2009, 09:47
Hallo,

wie funktioniert denn überhaupt deine "Übertragung".
Ich denke mal "von Hand".

Die hoslt dir mir

Access

zuerst mit Select Count(*) die Anzahl der Datensätze holen
(rein in iTableCount)

Dann in while not AccessQuery.Eof

Delphi-Quellcode:
PB_Table.Min:= 0;
PB_Table.Max:= iTableCount;

iPos:= 0;
while not AccessQuery.Eof do
begin
  Inc(iPos);

  PB_Table.Position:= iPos;
 // ev. Application.ProcessMessages

  AccessQuery.Next;
end;
Bei der Anzahl der Tabellen genau so.



Heiko
Heiko
  Mit Zitat antworten Zitat