Hallo Konrad,
du kannst dir den primary key des aktuellen Datensatzes merken und mit diesem nach der Sortierung den Positionszeiger korrigieren:
Delphi-Quellcode:
procedure TDemoForm.TestButtonClick(Sender: TObject);
var
id: integer;
begin
with ADOQuery
do
begin
DisableControls;
id := FieldByName('
ID').AsInteger;
// GetSqlStatement() ist deine Funktion die das
// SQL Statement neu zusammenbaut...
SQL.Text := GetSqlStatement;
Open;
Locate('
id', id, []);
EnableControls;
end;
end;
Weihnachtsgrüße vom marabu