Thema: Delphi SQL abfrgae First 3

Einzelnen Beitrag anzeigen

MatthiasK

Registriert seit: 20. Nov 2015
Ort: Sachsen
19 Beiträge
 
Delphi 7 Personal
 
#7

AW: SQL abfrgae First 3

  Alt 20. Jul 2016, 11:15
Also,

übers WE hab ich viel versucht und bin noch häufiger gescheitert.

Zu dem execute block: den bekomm ich im sql manager nicht zum laufen.

habs jetzt mal in delphi nachgebastelt. läuft fehlerfrei, jedoch wirds in der tabelle nicht geschrieben.
ich seh auch grad nicht den grund dafür. habs ma step by step geprüft. läuft sauber durch, auch in der richtigen anzahl. (hab ma bei einem user nur 2 datensätze gemacht, damit ich nicht 3 sätze für den user als result fürs select hab.)

aber irgendwo ist der wurm drin. wenn ich dann im sql manager ein refresh auf die tabelle mach, ham alle felder noch den wert 0.

ich weiss, meine lösung ist nicht schön. ich brauch bloß langsam was, was funktioniert.

Delphi-Quellcode:
 
for i := 0 to Listbox1.Items.Count - 1 do
  begin
    with zquery do
    begin
      sql.clear;
      sql.Add('select first 3 Itemindex,Pausenbegin,Pausenende,Minutpause, gross from tdaten2 where Itemindex = :ii');
      ParamByName('ii').AsInteger := i ;
      open;
      first;
      for a := 0 to zquery.RecordCount - 1 do
      begin
        edit;
        zquery.FieldByName('gross').AsInteger := 44;
        post;
        zquery.Next;
      end;
    end;
  end;
Matthias
  Mit Zitat antworten Zitat