Label erzeugen

**SunSet**

Guten Abend,
ich programmiere derzeit Galgenmännchen und benutze dabei eine Textdatei aus der zufällige Wörter ausgelesen werden. Das Galgenmännchen zeichne ich mit der Funktion Canvas und das funktioniert auch alles super.
Nun stellt sich mir die Frage, wie ich je nach Anzahl der Buchstaben des Wortes die Labels erzeugen kann.
Also wenn das Wort zum Beispiel 8 Buchstaben hat sollen 8 Labels mit der Caption _ erscheinen, jedoch wird bei meiner Umsetzung rein garnichts angezeigt. Ich muss dazu sagen, dass ich mich erst seit einigen Wochen mit Delphi auseinandersetze und somit noch kein Profi bin.

zusammenfalten · markieren

Delphi-Quellcode:

			for i := 1 to length(Wort) do begin

    MyLabel := TLabel.Create(Form1);

      with MyLabel do begin

        Caption := '_';

        Name := 'lb'+inttostr(i);

        left := 30;

        top := 20;

        width := 10;

        height := 10;

        visible := true;

        enabled := false;

        parent := Form1;

      end;

  end;

Ich bedanke mich schon einmal im Vorraus

Label erzeugen

Label erzeugen

Forumregeln