Programa Grafico

[buitrago_listas]

de veras, ahora es la hora de ver si puedo ponerlo a andar
Gracias
Fer

[ASAPLTDA]

Ramon lei como colocar los componentes en el panel y me parece fantastico la forma de hacerlo, ahora como guardo la informacion en uba base de datos y como la recupero? disculpa molestarte pero me parecio una solucion buenisima

[[Lepe]]

Suponiendo que el nº de objetos es fijo y definido anteriormente:

Código Delphi [-]
Var T : Tshape;
begin
for i:=0 to Form1.ComponentCount -1 do
 if Form1.Components[i] is TShape then
 begin
    T := Tshape(Form1.components[i];
    CampoNombre.asstring := T.Name;
    CampoLeft.asInteger := T.Left;
 end;

Creo que es autoexplicativo el codigo,ya sabes .

Saludos