Criar e Destruir Objetos Dinamicamente

Delphi

26/12/2003

no clique do botao:

procedure TForm1.Button1Click(Sender: TObject);
var
Formulario: TForm;
Relatorio: TRLReport;
Titulo: TRLLabel;

begin

Formulario := TForm.Create(Application);
Relatorio := TRLReport.Create(Application);

Relatorio.Parent := Formulario as TForm;
Formulario.InsertComponent(Relatorio);


Relatorio.PreviewModal;


end;

quando o projeto estiver sendo executado, apos o clique do botao vai aparecer o relatorio.. ai se fecha o relatorio e apos o fomulario...

quando fechar o form vai dar pau por causa dos componentes ou formulario criado. Como resolver ?

OBS: To usando Fortes Report, portanto a RLReport deve ser declarada se alguem quiser compilar.


Danielclubedelphi

Danielclubedelphi

Curtidas 0
POSTAR