Sintáxis de SetParent en Builder C++

[ginkaku]

Buenas por motivos de estudio estoy trabajando en c++ y hay un codigo que usaba antes en mis proyectos en delphi: Windows.SetParent(Form2.Handle, Panel2.Handle);
Me podrian decir como se escribe en c++ embarcadero. De antemano muchas gracias
pdta: El proyecto es sobre formularios dentro de otros formularios por eso usaba ese codigo si tuvieran otra idea se les agradeceria

[Casimiro Notevi]

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración

[ecfisa]

Empezado por ginkaku

Buenas por motivos de estudio estoy trabajando en c++ y hay un codigo que usaba antes en mis proyectos en delphi: Windows.SetParent(Form2.Handle, Panel2.Handle);
Me podrian decir como se escribe en c++ embarcadero.
...

Hola ginkaku.

Esa sentencia se escribe:

  ::SetParent(Form2->Handle, Panel2->Handle);

Saludos.

Pd: Por favor, trata de poner títulos relacionados con el problema que vas a publicar. Si mas adelante alguién busca por "SetParent en Builder C++" difícilmente podrá encontrarlo bajo el título "Ayuda en este codigo".

[ginkaku]

Muchisimas gracias me estaba volviendo loco, funciono perfectamente. Y procurare leer las normas de post en el futuro . Enserio thk

[ecfisa]

Hola ginkaku.

Como un comentario adicional, el código:

  
  ::SetParent(Form2->Handle, Panel2->Handle);

Tiene el mismo efecto que:

  
  Form2->Parent = Panel2;

Saludos.

[ginkaku]

Form2->Parent = Panel2; esto funcionaba no cabe duda y yo lo usaba de hecho. Pero no tenia acceso a los focos(creo q asi se dice) no podia usar los edit solo botones, por eso necesitaba el otro codigo

[ecfisa]

Hola ginkaku.

No logro entender en que contexto estás teniendo problemas para usar uno u otro modo. Es decir, si podes acceder a las propiedades Handle, también tenes que poder acceder a las propiedades Parent.

Por ejemplo, estos dos códigos son equivalentes:
1)

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  Form2 = new TForm2(this); // (*)

  Form2->Parent  = Panel1;
  Form2->Align   = alClient;
  Form2->Show();
}

2)

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  Form2 = new TForm2(this);

  ::SetParent(Form2->Handle, Panel1->Handle);
  SetWindowPos(Form2->Handle,HWND_TOP, 0, 0,
    Panel1->ClientWidth, Panel1->ClientHeight, SWP_NOACTIVATE);
  Form2->Show();
}

Y, para agregar una opción diferente, de este modo lo muestra sin título ni bordes como si fuera un TFrame:

void __fastcall TForm1::btManualDockClick(TObject *Sender)
{
 Form2 = new TForm2(this); // (*)

 Form2->Show();
 Form2->ManualDock(Panel1, NULL, alClient);
 Form2->Align = alClient;
}

(*) Esta linea es innecesaria si Form2 se encuentra en: Project => Options => Forms => Auto-create forms.

Saludos.