Mam taki ot element na Formie - TPanel o nazwie Panel1. Mam na nim 5 elementów TLabel i 5 przycisków TButton. Jak usunąć je wszystkie z tego panelu?
Czyszczenie elementu Panel1
- Rejestracja: dni
- Ostatnio: dni
0
var i : Integer;
for i:=0 to Panel1.ControlCount-1 do
Panel1.Controls[i].Destroy();
- Rejestracja: dni
- Ostatnio: dni
0
Wyświetla się wtedy "List index out of bounds" i wywala program.
Dodam, że te przyciski generuję w locie, labele tak samo.
- Rejestracja: dni
- Ostatnio: dni
0
for i := Panel1.ControlCount - 1 downto 0 do
Panel1.Controls[i].Free;
- Rejestracja: dni
- Ostatnio: dni
- Lokalizacja: Gorlice
0
Można też bez zmiennej:
while (Panel1.ControlCount > 0) do
Panel1.Controls[0].Free;