Guest Posted February 14, 2011 Posted February 14, 2011 Message from: "Dennis Ortiz" Hi Farshard, I can Insert Components in UniScrollBox at Runtime, Example: .. .. .. with TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(FUniScrollBox))) do begin Name := 'lbl'+fLblNumStr; end; .. .. .. . Quote
Guest Posted February 14, 2011 Author Posted February 14, 2011 Message from: "Dennis Ortiz" El 2/14/2011 3:30 PM, Dennis Ortiz escribió: > Hi Farshard, > > I can Insert Components in UniScrollBox at Runtime, > > Example: > > . > . > . > with > TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(FUniScrollBox))) > do begin > Name := 'lbl'+fLblNumStr; > end; > > . > . > . In Web Mode . Quote
Guest Posted February 14, 2011 Author Posted February 14, 2011 Message from: "Dennis Ortiz" El 2/14/2011 3:30 PM, Dennis Ortiz escribió: > Hi Farshard, > > I can Insert Components in UniScrollBox at Runtime, I Can't ... > > Example: > > . > . > . > with > TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(FUniScrollBox))) > do begin > Name := 'lbl'+fLblNumStr; > end; > > . > . > . In Web Mode . Quote
Guest Posted February 14, 2011 Author Posted February 14, 2011 Message from: "Farshad Mohajeri" "Dennis Ortiz" wrote in message news:xHOKW2HzLHA.2160@anaxagvs227... > Hi Farshard, > > I can Insert Components in UniScrollBox at Runtime, > > Example: > > . > . > . > with > TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(FUniScrollBox))) do > begin > Name := 'lbl'+fLblNumStr; > end; Owner should be Self not FUniScrollBox try: TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(Self))) . Quote
Guest Posted February 14, 2011 Author Posted February 14, 2011 Message from: "Dennis Ortiz" El 2/14/2011 3:41 PM, Farshad Mohajeri escribió: > "Dennis Ortiz" wrote in message > news:xHOKW2HzLHA.2160@anaxagvs227... >> Hi Farshard, >> >> I can Insert Components in UniScrollBox at Runtime, >> >> Example: >> >> . >> . >> . >> with >> TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(FUniScrollBox))) do >> begin >> Name := 'lbl'+fLblNumStr; >> end; > > Owner should be Self not FUniScrollBox > > try: > TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(Self))) > > Ok, i need to change my Logic, because wass trying to do this: THLUniScrollDataEntry = class(TObject) private .. Public constructor Create(const ConnectionIDataset : IHighlanderDataset; Const UniGuiScrollBox : TUniScrollbox); Destructor Destroy; override; end; . Quote
Guest Posted February 14, 2011 Author Posted February 14, 2011 Message from: "Dennis Ortiz" El 2/14/2011 3:56 PM, Dennis Ortiz escribió: > El 2/14/2011 3:41 PM, Farshad Mohajeri escribió: >> "Dennis Ortiz" wrote in message >> news:xHOKW2HzLHA.2160@anaxagvs227... >>> Hi Farshard, >>> >>> I can Insert Components in UniScrollBox at Runtime, >>> >>> Example: >>> >>> . >>> . >>> . >>> with >>> TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(FUniScrollBox))) >>> do >>> begin >>> Name := 'lbl'+fLblNumStr; >>> end; >> >> Owner should be Self not FUniScrollBox >> >> try: >> TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(Self))) >> >> > Ok, i need to change my Logic, because wass trying to do this: > > THLUniScrollDataEntry = class(TObject) > private > .. > Public > > constructor Create(const ConnectionIDataset : IHighlanderDataset; Const > UniGuiScrollBox : TUniScrollbox); > Destructor Destroy; override; > end; > I was suscessfully do what i need the, but i think allowing these is necesary TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(Self))) Rigth now Create a class (type Tobject) that create the dynamic fields but in really the intention is change that to THLUniScrollDataEntry = class(TuniscrollBox) when these option is was available. Rigth now i need to pass a Tuniform Parameter to my constructor to create invisible controls there and change the parent to UniScrollBox and make them visible. constructor Create(const ConnectionIDataset : IHighlanderDataset; Const UniGuiScrollBox : TUniScrollbox, UniForm : tuniForm); Please excuse my poor english . Quote
Guest Posted February 15, 2011 Author Posted February 15, 2011 Message from: "Farshad Mohajeri" "Dennis Ortiz" wrote in message news:nMUudQIzLHA.2160@anaxagvs227... > El 2/14/2011 3:56 PM, Dennis Ortiz escribió: >> El 2/14/2011 3:41 PM, Farshad Mohajeri escribió: >>> "Dennis Ortiz" wrote in message >>> news:xHOKW2HzLHA.2160@anaxagvs227... >>>> Hi Farshard, >>>> >>>> I can Insert Components in UniScrollBox at Runtime, >>>> >>>> Example: >>>> >>>> . >>>> . >>>> . >>>> with >>>> TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(FUniScrollBox))) >>>> do >>>> begin >>>> Name := 'lbl'+fLblNumStr; >>>> end; >>> >>> Owner should be Self not FUniScrollBox >>> >>> try: >>> TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(Self))) >>> >>> >> Ok, i need to change my Logic, because wass trying to do this: >> >> THLUniScrollDataEntry = class(TObject) >> private >> .. >> Public >> >> constructor Create(const ConnectionIDataset : IHighlanderDataset; Const >> UniGuiScrollBox : TUniScrollbox); >> Destructor Destroy; override; >> end; >> > I was suscessfully do what i need the, but i think allowing these is > necesary TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(Self))) > > Rigth now Create a class (type Tobject) that create the dynamic fields but > in really the intention is change that to THLUniScrollDataEntry = > class(TuniscrollBox) when these option is was available. > > Rigth now i need to pass a Tuniform Parameter to my constructor to create > invisible controls there and change the parent to UniScrollBox and make > them visible. > > constructor Create(const ConnectionIDataset : IHighlanderDataset; Const > UniGuiScrollBox : TUniScrollbox, UniForm : tuniForm); > If I understand correctly you want to create a component but use it later, am I right? But it is not possible in uniGUI. If you create a control at runtime then you must insert and display it in same event. You can't display it later. . Quote
Guest Posted February 15, 2011 Author Posted February 15, 2011 Message from: "Dennis Ortiz" >>>> news:xHOKW2HzLHA.2160@anaxagvs227... >>>>> Hi Farshard, >>>>> >>>>> I can Insert Components in UniScrollBox at Runtime, >>>>> >>>>> Example: >>>>> >>>>> . >>>>> . >>>>> . >>>>> with >>>>> TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(FUniScrollBox))) >>>>> do >>>>> begin >>>>> Name := 'lbl'+fLblNumStr; >>>>> end; >>>> >>>> Owner should be Self not FUniScrollBox >>>> >>>> try: >>>> TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(Self))) >>>> >>>> >>> Ok, i need to change my Logic, because wass trying to do this: >>> >>> THLUniScrollDataEntry = class(TObject) >>> private >>> .. >>> Public >>> >>> constructor Create(const ConnectionIDataset : IHighlanderDataset; Const >>> UniGuiScrollBox : TUniScrollbox); >>> Destructor Destroy; override; >>> end; >>> >> I was suscessfully do what i need the, but i think allowing these is >> necesary TUniLabel(FUniScrollBox.InsertControl(TUniLabel.Create(Self))) >> >> Rigth now Create a class (type Tobject) that create the dynamic fields but >> in really the intention is change that to THLUniScrollDataEntry = >> class(TuniscrollBox) when these option is was available. >> >> Rigth now i need to pass a Tuniform Parameter to my constructor to create >> invisible controls there and change the parent to UniScrollBox and make >> them visible. >> >> constructor Create(const ConnectionIDataset : IHighlanderDataset; Const >> UniGuiScrollBox : TUniScrollbox, UniForm : tuniForm); >> > If I understand correctly you want to create a component but use it later, > am I right? Yes, and finally i have it working the way i want, with some minor changes constructor Create(const ConnectionIDataset : IHighlanderDataset; var UniGuiScrollBox : TUniScrollbox; Const This : TWinControl); thanks, . Quote
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.