[Delphi] Problem z label'em

Mam pytanko !

...
for i:=1 to zmienna do

label1.Caption:=('*');
...

Jak zrobić, żeby jeżeli zmienna = np. 5
Etykieta labela wyglądała *****.
Zależnie od wielkości zmiennej label
pokazuje określoną ilość gwiazdek.

Help.
Pozdrawiam.

for I := 0 to zmienne do
Label1.Cation := Label1.Caption + '*';

Przy zalozeniu, ze label byl pusty wczesniej.

Albo
label1.Caption:=StringOfChar('*', zmienna);