Insert Optimierung

[hoika]

Hallo,

als Anfänger solltest du ja erst einmal anfangen,
statt sich gleich an die Optimierung zu setzen.

Was ist an 4 min Laufzeit sooo schlimm,
dieses Insert wird doch wohl nicht zu den Haupt-Aufgaben deines Programms gehören.

Mach doch erst mal so weiter.


Noch was zum Probieren

Delphi-Quellcode:

procedure TForm1.InputDatasetClick(Sender: TObject);
var i:Integer;
 startzeit,stopzeit : TDateTime;

begin
startzeit := now;
Screen.Cursor := crHourGlass;
ZConnection.Database := 'c:\msql\firedb.fdb';

 ZQuery1.SQL.text:='INSERT INTO TestTabelle (Wert1, Wert2) VALUES(:v1, :v2)';
 ZQuery1.Prepare;

 for i:=0 to SG1.RowCount-1 do
  begin
    with ZQuery1.params do
    begin
      ParamValues['v1']:=SG1.Cells[0, i];
      ParamValues['v2']:=SG1.Cells[1, i];
    end; // with
   ZQuery1.ExecSQL;
  end; // i
Screen.Cursor := crDefault;
stopzeit := now;
Panel1.Caption :='SuchZeit : '+ FormatDateTime('nn:ss:zzz', StopZeit - StartZeit) ;
end;

Was du leider immer noch nicht geschrieben hattest:
Hat deine Tabelle Indizes ?

Heiko