gesonderte Ergebnisberechnung in DB-Tab eingeben

[p80286]

in dem UPDATE muß es dann heißen Where ID=2 und für den SELECT

Delphi-Quellcode:

   qryMain.SQL.Text := 'SELECT ID,KDNR,NAME,VORNAME,FIRMA,PRODUKT,ANZAHL,PREIS FROM WARENVERKAUF1';
   qryMain.Open;
   while not qryMain.EOF do begin
     { hier die Werte übernehmen}
     idfeld:=qryMain.Fields.Fieldbyname('ID').asstring;
     ......
     qryMain.Next;
   end;

und ich packe immer vor und hinter jede Query noch ein .Close also

Delphi-Quellcode:

   qryMain.Close; 
   qryMain.SQL.Text := 'SELECT ID,KDNR,NAME,VORNAME,FIRMA,PRODUKT,ANZAHL,PREIS FROM WARENVERKAUF1';
   qryMain.Open;
   while not qryMain.EOF do begin
     { hier die Werte übernehmen}
     idfeld:=qryMain.Fields.Fieldbyname('ID').asstring;
     ......
     qryMain.Next;
   end;
   qryMain.Close;

damit ich mir keinen Dreck einhandele.

Gruß
K-H

P.S.
das .Close natürlich auch vor das Update-Statement.