Delphi - Numero de Componentes de un TTabSheet

 
Vista:

Numero de Componentes de un TTabSheet

Publicado por Irreal (69 intervenciones) el 30/08/2007 12:29:20
Necesito saber cual es el último control que tengo en un TabSheet.

Se me a ocurrido que podría comparar la propiedad TabOrder con el numero de controles que hay en el TabSheet pero me encuentro que no veo como contar los controles que hay dentro de un TabSheet .

He probado con TabSheet .ComponentCount pero me devuelve 0.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

RE:Numero de Componentes de un TTabSheet

Publicado por E.T. (1208 intervenciones) el 30/08/2007 19:24:03
Logré hacer que me diera el ultimo componente de la siguiente manera

try
for i:=0 to 100 do begin
ShowMessage(TabSheet1.Controls[i].Name);
end;
Except
ShowMessage('componente '+inttostr(i)+' '+TabSheet1.Controls[i-1].Name);
end;

te muestra uno por uno, al llegar al fin de la lista captura la excepcion o el error y te muestra cual fue el ultimo componente.

Nota. Te mostrará los componente según su orden de creación sin importarle su taborder dentro del tabsheet
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar