Hola Mc_Hacks
Esencialmente lo mismo que dice delphi.com.ar
Código Delphi
[-]
procedure TwndPrincipal.ProduAgregaExecute(Sender: TObject);
begin
wndAgregaArticulo:=TwndAgregaArticulo.Create(self);
try
wndAgregaArticulo.ShowModal;
finally
wndAgregaArticulo.Free;
end;
end;
Lo crea y lo libera.
Saludos