asapltda Posted October 9, 2019 Share Posted October 9, 2019 Hi, I need to pass values from the dbgrid to the frame when I use rowexpand to show the auxiliary way, if someone has an example of how to do it I could share it, thanks Link to comment Share on other sites More sharing options...
Sherzod Posted October 9, 2019 Share Posted October 9, 2019 52 minutes ago, asapltda said: Hi, I need to pass values from the dbgrid to the frame when I use rowexpand to show the auxiliary way, if someone has an example of how to do it I could share it, thanks Hi, Sorry, can you please explain in more detail? Link to comment Share on other sites More sharing options...
asapltda Posted October 9, 2019 Author Share Posted October 9, 2019 FROM DE MAIN FORM procedure TFGENERARRESERVAS.UniDBGrid1RowExpand(Sender: TUniCustomDBGrid; const RowId: Integer; var RowControl: TControl; Container: TUniContainer); begin d.generarreservas_g_idpeddet := VPEDDET_CDS.FieldByName('IDPEDDET').AsInteger ; <--- THIS IS DATA MODULE RowControl := TFGENERARRESERVASAUX1.Create(Container); <------ROW CONTROL end; -------------------------------------- AUXILIARY FORM procedure TFGENERARRESERVASAUX1.UniFrameBeforeReady(Sender: TObject); <------ROW CONTROL begin D.GET_VPEDDET_IDPEDDET(p_idpeddet, VPEDDET); <--- THIS IS DATA MODULE end; --------------------- I NEED TO PASS THE VALUE OF THE MAIN FORM TO THE AUXILIARY FORM OF A DBGRID AS I CAN DO IT, I CAN DO IT USING THE DATA MODULE EXISTS ANOTHER WAY GRACIAS/ TKS Link to comment Share on other sites More sharing options...
zhyhero Posted October 9, 2019 Share Posted October 9, 2019 rowexpand aframe:=taframe. create(container); aframe. x:=2019; aframe. aprocedure(2019); rowcontrol:=aframe; Link to comment Share on other sites More sharing options...
Recommended Posts
Please sign in to comment
You will be able to leave a comment after signing in
Sign In Now