Ich habe jetzt eine Lösung ausgetüftelt. Ganz alleine!
Das ist der Code.
Vielleicht Interessiert es ja noch mal jemanden.
ADOQuery1.Sql.Add('SELECT * FROM abc WHERE ID=Int(((SELECT Max(ID) FROM abc)-(SELECT Min(ID) FROM abc)+ 1) * Rnd +(SELECT Min(ID) FROM abc))');