Hai daywalker-dj-k,
hier noch ein Tip wie der Code besser zu lesen ist
Delphi-Quellcode:
begin
Query1.Close;
Query1.Clear;
Query1.SQL.Add ('SELECT lsnr, aufnr FROM auftragspositionen');
Query1.SQL.Add ('GROUP BY lsnr, aufnr');
Query1.Sql.Add ('WHERE aufnr=:nummer');
Query1.ParamByName ('nummer').AsString := str.EditDatensatz;
Query1.Open;
end;
Stephan B.
"Lasst den Gänsen ihre Füßchen"