aurelioset

function beforeInit(sender, config) { config.scrollable='vertical'; }

no, I was having trouble cleaning up the creation of a component (parent), I believe it worked! thank you very much Sherzod. it's 2:15am here, I'm already very tired

hi Sherzod, I'm using unigui 1.90.0.1530. I am trying to solve the problem with this code. procedure TPrincipal.ApagarLista; var i,EOF : Integer; Campo: TComponent; begin eof := MainModule.UniMainModule.DataSourceProd.DataSet.RecordCount; MainModule.UniMainModule.DataSourceProd.DataSet.First; try for I := 0 to eof do begin Campo := FindComponent('frame'+ I.ToString); if not (Campo = nil) then begin Campo.Free; end; end; MainModule.UniMainModule.DataSourceProd.DataSet.Next; finally begin UnimFieldSet1.Container.RemoveAll; end; end; end;

sorry my poor english

hi, how can i clear a UnimFieldSet and write again? this is my code. procedure TPrincipal.Listagem; var FrameSoma : TFFrameProduto; item : TUnimFieldContainer; i,EOF : Integer; begin eof := MainModule.UniMainModule.DataSourceProd.DataSet.RecordCount; MainModule.UniMainModule.DataSourceProd.DataSet.First; try UnimFieldSet1.BeginUpdate; for I := 1 to eof do begin FrameSoma := TFFrameProduto.Create(self); item := TUnimFieldContainer.Create(self); FrameSoma.Name := 'frame'+ I.ToString; FrameSoma.Parent := item; // item.Height := 50; //item.Width := FPrincipal.Width; FrameSoma.UnimLabel1.Caption := (MainModule.UniMainModule.FDQProd.FieldByName('produto').AsString); FrameSoma.UnimImage1.Picture.LoadFromFile(MainModule.UniMainModule.FDQProd.FieldByName('imagem').AsString); FrameSoma.UnimLabel2.Caption := 'Valor '+(MainModule.UniMainModule.FDQProd.FieldByName('Valor').AsString); FrameSoma.UnimLabel3.Caption := (MainModule.UniMainModule.FDQProd.FieldByName('Descricao').AsString); item.Parent := UnimFieldSet1; begin MainModule.UniMainModule.DataSourceProd.DataSet.Next; UnimFieldSet1.EndUpdate; end; end; Except end end;

very interesting, thank you !!!

thank you very much!

I'm using version 1.90.0.1530, I need to receive a result in the VCL application

how to make unigui send status to vcl