Komponenten wieder freigeben

[choose]

Hallo barnti,

dieser Code sollte funktionieren.

Delphi-Quellcode:

i:= 0;
while i<ComponentCount do
  if Components[i] is TDBEdit then Components[i].Free
  else Inc(i);

Die Erläuterung findest Du in diesem Posting zu einem ähnlichen Problem.