Zufälliger Datensatz!?

[Sharky]

Hai aerotech,

.MoveBy arbeitet glaube ich doch immer relativ zum aktuellen Datensatz oder?

So könntest Du es z.B. machen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  With Query1 do
  begin
    Close;
    SQL.Text := 'SELECT * FROM meintest';
    Open;
    Query1.RecNo := Random (RecordCount) +1;
  end;
end;

Wobei natürlich das ständige öffnen und schließen der Abfrage bei dir wegfallen würde.