Zeiger eines Tables zufällig setzen - Fehler?

DK

Moin Leute!

Benötige eine Methode, die den Cursor des Tables zufällig verschiebt:

long FieldNum = Table->RecNo;
    long FieldCount = Table->RecordCount;
    long NewNum = 0;

    do{
    	randomize();
    	NewNum = random(FieldCount);
    }
    while(NewNum==FieldNum);

    DataMod->Table->First();
    DataMod->Table->MoveBy(NewNum);

- Der Compiler meckert, dass NewNum nie genutzt wird!
- Tatsächlich wird ungefähr nur jedes zweite Mal er Cursor auf einen neuen Datensatz gesetzt...

Also wo ist der Fehler?!?

Danke!

Jansen

Du darfst randomize() nur einmal aufrufen. Benutz mal die Suchfunktion, dann findest du auch Begründungen dafür.