Na, was für einen Wert hat denn 'gezog', 'gefun' und 'ausquer.Recordcount' wenn der Fehler kommt?
Tipp:
Delphi-Quellcode:
while (i < anzahl) do begin
Randomize; // <<<<<< sowieso überflüssig hier
gezog:=Random(gefun-1);//zufälliger DS
try
ausquer.RecNo:=gezog;// DSZeiger setzen
auswahl.Add(ausquer.fieldbyname('Kollege').AsString+' '+ausquer.fieldbyname('Phrasenschwein').AsString);
{*} except
{*} ausquer.RecNo:=gezog;// <<<<<<<< Breakpoint auf diese Stelle
{*} auswahl.Add(ausquer.fieldbyname('Kollege').AsString+' '+ausquer.fieldbyname('Phrasenschwein').AsString);
{*} end;
inc(i);
end;
Aber ei viel wicht Frag ist do, wies besteh dei Varnam nu au den ers Silb?
(Rethorische Frage)