while ist ein schleife.
in worten heisst dein code:
Solange die "Zahl" in Label 1 größer oder gleich 15 ist, solange immer wieder das bild reinladen.
da sich die zahl während dem bild-laden nicht ändert hast du somit eine endlosschleife die auf ewig das bild lädt.
mit einem if sollte das gehen:
Delphi-Quelltext
1: 2:
| if StrToFloat(label34.Caption) >= 15 then Image1.Picture.LoadFromFile('pokal.bmp'); |
wenn das bild einmal geladen wurde musst du es nicht nochmal laden - es sei denn du willst ein anderes bild laden.