Vocabulary[RandomNumber]
Es müsste also heißen:
Vocabulary[RandomNumber].Repetitions:= Vocabulary[RandomNumber].Repetitions-1;
Ich denke es müsste eher heißen
Vocab.Repetitions := Vocab.Repetitions - 1;
Außerdem fehlt noch der wichtigste Bestandteil von Allem: die LISTE!
Die ganzen Records bringen dir nix wenn du keine Liste hast.