Registriert seit: 20. Jan 2008
Ort: Nürnberg
340 Beiträge
FreePascal / Lazarus
|
AW: Insert optimieren
16. Sep 2010, 15:53
Im Beispiel von shima is es garnicht drin, und ich habs bei mir im neuen code auch rausgenommen.
Edit:
Delphi-Quellcode:
list.Add('INSERT INTO Messwerte (ID_mess, Millisec, Messwert_Links, Messwert_Rechts)');
for zt := 0 to round(Frm_Messung.Ch_Messung.BottomAxis.Maximum) do
begin
(*Params[0].AsInteger := tId;
Params[1].AsInteger := zt;
Params[2].AsFloat := arr_messwerte[tdim, zt, 0];
Params[3].AsFloat := arr_messwerte[tdim, zt, 1];
ExecSQL;*)
List.Add(' VALUES (' + InttoStr(tid) + ', ' + InttoStr(zt) +', ' + FloattoStr(arr_messwerte[tdim, zt, 0]) + ', '+ FloattoStr(arr_messwerte[tdim, zt, 1]) + ' )');
frm_messung.pb_db.Position := frm_messung.pb_db.Position +1;
end;
Philipp N. "Programmiern ist wie küssen:
Mann kan darüber reden, mann kann es beschreiben,
aber man weiss erst, was es bedeutet,
wenn man es getan hat"
Geändert von PhilmacFLy (16. Sep 2010 um 15:58 Uhr)
|