Hallo,
erstelle mit folgendem Code dynamische Label, da ich aus einem Wort jeden einzelnen Buchstaben als Label haben möchte:
Delphi-Quellcode:
var
i,j:integer;
begin
Label4.Visible:=False;
Wort:=sl.Strings[random(sl.Count)];
Label4.Caption:=Wort;
j:=176;
for i:=1 to Label4.GetTextLen do
begin
Buchstabe:=TLabel.Create(nil);
Buchstabe.Parent:=Form1;
Buchstabe.Caption:=Copy(wort,i,1);
Buchstabe.Left:=j+20;
Buchstabe.Top:=176;
j:=Buchstabe.Left;
end;
end;
Wie kann ich jetzt zum Bleistift alle Labels von "Buchstabe" löschen, oder auf einzelne zugreifen?
Danke im Voraus