ExecSQL + Speicherverbauch

[DelphiAndreas]

Delphi-Quellcode:

procedure TForm1.TimerTimer(Sender: TObject);
begin
        sqlQuery.Close;
        sqlQuery.SQL.Text := 'INSERT INTO test.dbf (JAHR, ANZAHL, ZUSATZ) VALUES('
        + quotedStr('2005')+ ', ' + quotedStr('23') + ', ' + quotedStr('Dies ist ein test') + ')';
        sqlQuery.ExecSQL;
end;

Das hab ich mal schnell so gebastelt. Am besten das Timer-Intervall ganz klein stellen, und dann dauert das ein bißchen, vielleicht sind es zu wenige Daten pro Zeile. Trotzdem kann man im Taskmanager eine Speichererhöhung beobachten. Aber in dem richtige Project ist das irgendwie schlimmer, aber das ist viel zu lang um das hier zu posten