Ver Mensaje Individual
  #6  
Antiguo 24-02-2017
ryanier ryanier is offline
Registrado
NULL
 
Registrado: nov 2016
Posts: 5
Reputación: 0
ryanier Va por buen camino
Con la ayuda de AgustinOrtu y otros colegas el código lo implemente de la siguiente forma

Código Delphi [-]
procedure TFormMain.MostrarForm(FormClass: TFormClass; Owner: TComponent; Parent: TWinControl);
var
  Form: TForm;
  i: Integer;
begin
  for i := 0 to Parent.ControlCount - 1 do
    TForm(Parent.Controls[i]).Release;
  Form := FormClass.Create(Owner);
  Form.Parent := Parent;
  Form.BorderIcons := BorderIcons - [biSystemMenu, biMinimize, biMaximize, biHelp];
  Form.Align := alClient;
  Form.Show;
end;
Responder Con Cita