Club Builder

[tyloya]

Hola

Al crear unos forms dinámica/ estos me aparecen uno a uno desde la parte superior izquierda del form MDI padre , y luego se sitúan en la posición que les doy como coordenadas...

Habría alguna forma de que estos forms se mostraran todos a la vez a la hora de ejecutar la aplicación?,....porque queda bastante feo el que se vea cómo se van creando y distribuyendo.

Con este código los creo:


void __fastcall Tfrmdct:: Crearformsdct(TObject *Sender)
{
//indico d quien son hijos estos forms (FormMDI)
OrgImg= new Tfrmdct(FormMDI);
DctCoef= new Tfrmdct(FormMDI);
DctCoefSel=new Tfrmdct(FormMDI);
DctCoefQuan=new Tfrmdct(FormMDI);
DctCoefRest=new Tfrmdct(FormMDI);
DctInvTrans=new Tfrmdct(FormMDI);
Diferen=new Tfrmdct(FormMDI);
Filtro=new Tfrmdct(FormMDI);
Quant=new Tfrmdct(FormMDI);
OrgImg->Left=Screen->DesktopLeft;
OrgImg->Top=Screen->DesktopTop;
OrgImg->Caption="Original Image";
DctCoef->Left=OrgImg->Width;
DctCoef->Top=OrgImg->Top;
DctCoef->Caption="DCT Coeficients";
DctCoefSel->Left=(OrgImg->Width)+(DctCoef->Width);
DctCoefSel->Top=OrgImg->Top;
DctCoefSel->Caption="Coeficientes DCT seleccionados";
DctCoefQuan->Left=Screen->DesktopLeft;
DctCoefQuan->Top=(OrgImg->Height)+(OrgImg->Top);
DctCoefQuan->Caption="Coeficientes DCT cuantificados";
DctCoefRest->Left=DctCoefQuan->Width;
DctCoefRest->Top=(OrgImg->Height)+(OrgImg->Top);
DctCoefRest->Caption="Coeficientes DCT Restaurados";
DctInvTrans->Left=(OrgImg->Width)+(DctCoef->Width);
DctInvTrans->Top=(OrgImg->Height)+(OrgImg->Top);
DctInvTrans->Caption="Coeficientes DCT Trans";
Diferen->Left=Screen->DesktopLeft;
Diferen->Top=OrgImg->Height + DctCoef->Height +DctCoef->Top;
Diferen->Caption="Diferencias";
Filtro->Left=Diferen->Width;
Filtro->Top=(DctCoefRest->Height)+(DctCoefRest->Top);
Filtro->Caption="Filtro";
Quant->Left= (Filtro->Width) + (Diferen->Width);
Quant->Top=(DctCoefRest->Height)+(DctCoefRest->Top);
Quant->Caption="Cuantificación";
OrgImg->Show();
DctCoef->Show();
DctCoefSel->Show();
DctCoefQuan->Show();
DctCoefRest->Show();
DctInvTrans->Show();
Diferen->Show();
Filtro->Show();
Quant->Show();

}

[ferpb]

hola,
esto se me acaba de ocurrir pero NO se si funciona
creas todos los form con propiedad visible a false y los muestras todos en la misma sentencia.

form1->Visible = form2->Visible = ... = true;

puedes probar..., pero quizas dependa de algo como el refresco de pantalla, o queseyo

[tyloya]