Hola a todos...
Mi pregunta consiste en lo siguiente; tengo un formulario con un tpagecontrol que contiene dos TabSheet y en ellos hay componentes TEdit, para recorrer los componentes de un formulario, yo, ejecuto el siguiente código,
Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
componente:TComponent;
begin
for i:=0 to Form1.ComponentCount-1 do
begin
componente:=Components[i];
if componente is TEdit then
TEdit(componente).Clear;
end;
end;
la pregunta es cómo recorro, solamente, los componentes del TabSheet activo...
De antemano gracias por todos sus aportes