Jump to content

DiegoNBR

Members
  • Posts

    2
  • Joined

  • Last visited

DiegoNBR's Achievements

Newbie

Newbie (1/4)

0

Reputation

  1. Version: uniGUI Complete Trial Edition 1.90.0.1509 procedure TFrmProdutosWeb.UniFormCreate(Sender: TObject); var LProdutosWeb: TFrmProdutos; //VCL Form to convert in Unigui in Runtime begin bBloquearCreateShowVCL := True; //Error occurs here: LProdutosWeb := TFrmProdutos.Create(nil); LProdutosWeb.Visible := False; DPadraoControllerDM.View.Form := Self; SuspendLayouts; try Self.Caption := LProdutosWeb.Caption; UniServerModule.Title := Self.Caption; Self.Top := LProdutosWeb.Top; Self.Left := LProdutosWeb.Left; Self.Height := LProdutosWeb.Height; Self.Width := LProdutosWeb.Width; TConversorVCL2Unigui.ConverterObjetos(LProdutosWeb, Self); finally bBloquearCreateShowVCL := False; LProdutosWeb.FormCreate(LProdutosWeb); LProdutosWeb.FormShow(LProdutosWeb); ResumeLayouts; LProdutosWeb.Free; end; end;
  2. Hello, did you find out what this problem is? The same is happening to me. Clarifying, I am creating a VCL form and at the time of Create the problem occurs
×
×
  • Create New...