Hallo
... allerdings solltest du dir etwas überlegen, was du machst, wenn sich die Daten extrem stauen. ...).
Da habe ich an zwei Möglichkeiten gedacht:
Zuerst werde ich eine gwisse Anzahl zwischenspeichern und wenn zu viele Daten ankommen, werde ich den Zwischenspeicher immer wieder mal löschen. Es ist kein absolutes Muss, dass immer alle Daten gespeichert werden
zusätzlich kommt dahinter ein
dmFCalib.dbquQuery.Prepared;
Das kannte ich noch nicht. Werde ich mal probieren. Was passiert hier, wenn ich ExecSQL aufrufe wenn der vorherige Aufruf noch nicht beendet ist?
Wäre so was denkbar:
Delphi-Quellcode:
// set query parameters
if iCount < 10
then
begin
inc(iCount);
dmFCalib.dbquQuery.ParamByName('
pCalReportID').Value := dmFCalib.dbquCalReport.FieldByName('
ID').AsInteger;
dmFCalib.dbquQuery.ParamByName('
pFAct').Value := rForce;
dmFCalib.dbquQuery.ParamByName('
pFTarget').Value := rFtarget;
dmFCalib.dbquQuery.ParamByName('
pArt').Value := cArt;
dmFCalib.dbquQuery.ParamByName('
pTemperatur').Value := uHilfs1.Valreal(edTemperatur.Text);
dmFCalib.dbquQuery.ParamByName('
pHumidity').Value := uHilfs1.ValReal(edHumidity.Text);
dmFCalib.dbquQuery.ParamByName('
pServOrt').Value := cServOrt;
dmFCalib.dbquQuery.ParamByName('
pErstUserID').Value := intUser.User.ID;
dmFCalib.dbquQuery.ExecSQL;
dec(iCount);
end;
Hat noch jemand einen Ansatz(Code) für den Thread incl. Connection?
Danke
Gerd