Delphi - Fragen!

[Expresseon]

Nun, ich hatte letztendlich nur einen begin + end Rahmen vergessen, es hat sich geklärt. Falls es jemanden interessiert:

Code:

 begin 
 repeat 
 ok := false;
 v1 := random(51) + 1;
 if not (v1 = v2) 
 then
 begin 
 lbltext.Caption := text[v1];
 ok := true; 
 end;
 until ok; 
 end;

Ich hätte vielleicht sagen sollen, dass ich Random-Integers verwende. Diese mussten natürlich jedesmal neu bestimm werden, daher kam das Aufhängen. Da ich begin und end (rot markiert) vergessen hatte, wurde ok := true (ok ist ein Boolean) nicht ausgeführt und es kam zu Fehlern. Habe es zum Glück endlich herausgefunden, das, was ich wollte war wohl zu schaffen. Habe die Schleife nochmal blau markiert. Danke nochmal an alle anderen.


EDIT:
Dann mal meine nächste Frage.^^
Es gibt ja den sleep - Befehl. Wenn ich mitten beim Ausführen des Programmierten eine Pause haben will, dann gehts weiter, wie kann ich das dann machen? Mit sleeps funktioniert es irgendwie nicht richtig.