Bueno haciendo la modificación con tu consejo Lepe:
Código Delphi
[-]
var I: Integer;
begin
for I := 0 to FMain.ScrollBox1.ControlCount do begin
if FMain.ScrollBox1.Controls[i] is TFrame then
TFrame(FMain.ScrollBox1.Controls[i]).Free;
Error:
Cita:
---------------------------
Debugger Exception Notification
---------------------------
Project Vellonera.exe raised exception class EListError with message 'List index out of bounds (3)'. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------
|
En el Scrollbox tenía seis frame y sólo destruyó 3 intercalados y no completó el código.
Saludos.