Hola
ryanier
Podria ser algo como esto:
Código Delphi
[-]
interface
uses
Classes,
Controls,
Unidad en donde esta definida el form TFormAcreditacionPersonalizada
procedure MostrarFormAcreditacionPersonalizada(Owner: TComponent; Parent: TWinControl);
implementation
procedure MostrarFormAcreditacionPersonalizada(Owner: TComponent; Parent: TWinControl);
var
Form: TForm;
begin
Form := TFormAcreditacionPersonalizada.Create(Owner);
Form.Parent := Parent:
Form.Align := alClient;
Form.Show;
end;
Ejemplo de llamada:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
begin
MostrarFormAcreditacionPersonalizada(Self, pnlMain);
end;