No clique do botão eu crio alguns Edits
... Até aí tudo funciona normalmente, porém quando tento excluir os edits
criados clicando em outro botão, nem todos são excluídos.
Ex. criei 10 campos edits
, quando clico para excluir todos de uma só vez, apenas 5 são excluídos. Seguem os códigos (inclusão e exclusão respectivamente):
for x := 0 to (NumReg -1) do
begin
ArrayEdit[x] := TEdit.Create(Self);
ArrayEdit[x].Parent := Self;
ArrayEdit[x].Name := 'edtPreco'+ IntToStr(x+1);
ArrayEdit[x].Left := 265;
ArrayEdit[x].Top := 300 + x * 25;
end;
var Component: TComponent;
begin
for Component in Self do
if Component is TEdit then
TEdit(Component).Free;
end;