Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Desarrollo en Delphi para Android
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy


 
 
Herramientas Buscar en Tema Desplegado
  #4  
Antiguo 22-03-2020
jhonalone jhonalone is offline
Miembro
 
Registrado: sep 2007
Ubicación: Madrid
Posts: 548
Poder: 17
jhonalone Va por buen camino
Hola a todos.
Muchas gracias a los que me habéis leído y a los que estuvierais intentando resolver mi problema.

¡¡También HE RESUELTO EL PROBLEMA de la ordenación!!

Fiel a mi costumbre de publicar mis soluciones, por si ayudan a alguien, aquí está la solución:
Código Delphi [-]

// Primero eliminamos los controles que habíamos asignado antes
for xx := FramedVertScrollBox2.ChildrenCount-1 downto 0 do
  if (FramedVertScrollBox2.Children[xx] is TRectangle) or
      (FramedVertScrollBox2.Children[xx] is TListView)
  then
    FramedVertScrollBox2.RemoveObject(FramedVertScrollBox2.Children[xx]);

...........

    // Quitamos esto al  principio de la asignación de controles
{Rectangle7.Position.Y := 0;
Rectangle8.Position.Y := 0;
Rectangle9.Position.Y := 0;
Rectangle10.Position.Y := 0;
Rectangle11.Position.Y := 0;

ListView1.Position.Y := 0;
ListView2.Position.Y := 0;
ListView3.Position.Y := 0;
ListView4.Position.Y := 0;
ListView5.Position.Y := 0;
       }

// Aasignamos los nuevos controles
        FramedVertScrollBox2.AddObject(Rectangle7);
        FramedVertScrollBox2.AddObject(ListView1);

        FramedVertScrollBox2.AddObject(Rectangle8);
        FramedVertScrollBox2.AddObject(ListView2);

        FramedVertScrollBox2.AddObject(Rectangle9);
        FramedVertScrollBox2.AddObject(ListView3);

        FramedVertScrollBox2.AddObject(Rectangle10);
        FramedVertScrollBox2.AddObject(ListView4);

        FramedVertScrollBox2.AddObject(Rectangle11);
        FramedVertScrollBox2.AddObject(ListView5);

........

// Colocamos después en el orden inverso al que deben figurar en el TFramedVertScrollBox
ListView5.Position.Y := 0;
Rectangle11.Position.Y := 0;
ListView4.Position.Y := 0;
Rectangle10.Position.Y := 0;
ListView3.Position.Y := 0;
Rectangle9.Position.Y := 0;
ListView2.Position.Y := 0;
Rectangle8.Position.Y := 0;
ListView1.Position.Y := 0;
Rectangle7.Position.Y := 0;

Consiste en poner los controles en la posición CERO del VertScrollBox (o FramedVertScrollBox) en orden inverso a como quieres que aparezcan en el contenedor, después de haber añadido todos los controles.

Un saludo y hasta la próxima.
__________________
"Pedid y se os dará; buscad y hallaréis ..." (Lc 11,9-10)
"...si no tengo caridad, nada soy..." (1 Cor 13,1-13)
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Duda sobre destrucción de objetos compuestos por otros objetos noob OOP 11 16-02-2009 00:28:33
Objetos C# Cheswar .NET 1 10-03-2008 16:13:27
Objetos Perdidos. marcoszorrilla La Taberna 8 04-05-2007 19:50:23
almacenamiento de objetos seduerey OOP 2 25-09-2004 21:44:07
Objetos jfontane Varios 1 04-07-2003 15:39:04


La franja horaria es GMT +2. Ahora son las 14:05:45.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi