Einzelnen Beitrag anzeigen

hoika

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

AW: TIBSQL vs isql-fb Shell

  Alt 30. Apr 2019, 11:17
Hallo,
sehr gut.

Zitat:
output
das ist ja jetzt hoffentlich eine Stringlist und kein Memo?

5 Sachen sehe ich.

Zitat:
q.UniDirectional:=FALSE;
True setzen, du willst in der Query doch nicht per Prior zurücklaufen.

Zitat:
pb1.Position:=i+1;
Wieder ein Oberflächenelement, was sich 10.000 neu zeichnet
mache lieber sowas wie
Delphi-Quellcode:
if (i div 100)=0 then
begin
  pb1.Position:=i+1;
end;
also nur jeden 100. Eintrag zeichnen.
Wenn Max auf 10.000 steht, fällt ein Pos+1 nicht auf.

Zitat:
q.open;
Das habe und den ganzen Block mit dem q.eof habe ich überhaupt nicht verstanden.
Ein Insert wird über q.ExecSQL ausgeführt.

Zitat:
GetTickCount
Du ermittelst die Laufzeit jedes einzelnen Inserts.
Also 20.000 GetTickCounts.
Heiko

Geändert von hoika (30. Apr 2019 um 11:23 Uhr)
  Mit Zitat antworten Zitat