wie kann man einen zufälligen datensatz auswählen?

[PhöniX]

So..
Ich wille ien zufälligen Datensatz auswählen:
soweit bin ich schon mal:

Delphi-Quellcode:

var
zufallszahl: Integer;
[...]
randomize;
 zufallszahl := random(???);//<- aber was muss hier rein??
'select * from table1 limit ' + zufallszahl + ',1';

aber was muss an die stelle mit den fragezeichen ?

[Luckie]

Delphi-Quellcode:

zufallszahl := random(???);//<- aber was muss hier rein??

Cursor auf dem Befehl setzten und dann mit F1 Merlin's Zauberbuch aufrufen. ;)

[MikeS]

Zitat:

Delphi-Syntax:

function Random [ ( Range: Integer) ];

Beschreibung

In Delphi gibt Random eine Zufallszahl im Bereich 0 <= X < Range zurück. Wird der Parameter Range nicht angegeben, liefert Random einen Real-Wert im Bereich

0 <= X < 1.

Um den Zufallszahlengenerator zu initialisieren, rufen Sie Randomize einmal auf oder weisen der Variable RandSeed vor dem Aufruf von Random einen Wert zu.

Hinweis: Die Implementierung der Funktion Random kann sich bei einer anderen Compiler-Version ändern. Sie sollten Random daher nicht für Verschlüsselungen oder andere Einsatzbereiche verwenden, in denen reproduzierbare Pseudozufallszahlen benötigt werden.

Aus der OH

[Luckie]

Sehr schön. Und warum postest du das? Meinst du, ihn seiner steht das nicht drinne? :roll:

[MikeS]

doch ich denke schon!

da ich seine frage auch beantworten wollte und es ab und zu vorkommt das gleichzeitig
von mehreren usern gepostet wird kann das wohl vorkommen, ODER?

[PhöniX]

ja aber ich muss doch dort die zahl der maximal vorhandenen Datensätze haben...
und wie krieg ich ie darein?

[Sharky]

Zitat:

Zitat von PhöniX

... maximal vorhandenen Datensätze ...

Schaue dir mal die Funktion .RecordCount deines DataSets an.

[EDIT]Aus .RecCount habe ich .RecordCount gemacht. Was ein kleiner Fehler.

[PhöniX]

wo find ich das denn alles?? dataset und .reccount ?

[Luckie]

Zitat:

Zitat von MikeS

doch ich denke schon!
da ich seine frage auch beantworten wollte und es ab und zu vorkommt das gleichzeitig
von mehreren usern gepostet wird kann das wohl vorkommen, ODER?

Gegen gleichzeitiges posten habe ich ja nichts gesagt, da steckt man nicht hinter. Aber was mich stört, ist der Auszug aus der Hilfe. Er soll selber lernen Lösungen an Hand der Hilfe zu finden. Das bringt ihm mehr, als wenn ihm jedes mal die richtige Stelle aus der Hilfe gepostet wird. Hilfe zur Selbsthilfe eben. ;)

[Robert_G]

Wenn du kein DataSet, sondern eine Query benutzt, kannst du es so machen:

Delphi-Quellcode:

Var
  RecCount :Integer;
...
Begin
...
  Query.SQL.Text :=
    'SELECT COUNT(*) RecCount' + #10 +
    'FROM   Tabelle';
  Query.Open;
  RecCount := Query.FieldValues['RecCount'];

Nachtrag: Im Bsp ist es eine TAdoQuery.