asapltda Posted January 28, 2015 Share Posted January 28, 2015 Good sirs daysAs I can create the form using the name of the form in application movile ? In a desktop using the following form, as deb application be made for movile? thank you for your help procedure TFMENU.Ejecutar_programa_x_nombre(P_PGMCODE:String; var VALOR:Variant ); var fc: TUniFormClass; f : TUniForm; W_ModalResult :Integer; FormName:String; W_S:string ; begin //pReport := TUniFormPreview.Create(UniApplication); CREAR UNA FORMA FormName:= 'TF' + P_PGMCODE; fc := TUniFormClass(FindClass(FormName)); f := fc.Create(UniApplication ); F.ShowModal( procedure(Result: Integer) begin G_VALOR:=DSPTABPARMS.O_fieldValue; UniEdit1.Text :=DSPTABPARMS.O_fieldValue; end ) end; Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.