Search the Community

Hi We would like to integrate general help system (for example) in our application. It will be nice if help button can be placed in the right side of form captions(title) (near to standard close button) ; So, my question is what is the right way to add custom buttons in the form captions Thnaks Kamen

I have a Mobile Form (MymForm) that has several Title Buttons. I want to change the Caption of TitleButtons[0] on the Form Show Event - please advise how - thanks. procedure TMymForm.UnimFormShow(Sender: TObject); begin if UniMainModule.tblData.Filtered = True then begin MymForm.TitleButtons[0].Caption:= 'ABC'; end else begin MymForm.TitleButtons[0].Caption:= 'DEF'; end; The code above executes without error but makes no difference to the Caption and the original IDE Caption setting remains.

Hi, I've noticed on my test apps the TUniForm/TUniLoginForm .Caption property value is not being displayed at runtime. Instead the forms are displaying the form name. Is this a bug or am I missing something? Thanks.

Good Morning! I have a problem and I'm unable to solve. C'mon: When I work with normal uniforms, it is very easy to change the caption of a label of a form from another. Example: TuniForm2.btOkClick procedure (Sender: TObject); begin uniForm1.uniLabel1.caption: = uniForm2.uniLabel2.Caption; end; What I'm unaable to do: TuniForm2.btOkClick procedure (Sender: TObject); begin uniFrame1.uniLabe1.caption: = uniForm2.uniLabel2.Caption; end; This code does not error. (In debug) The text is sent to the label, but for some reason does not reach the destination: TuniForm2.btOkClick procedure (Sender: TObject); begin FCurrentFrame := TUniFrameClass(FindClass('TuniFrame1')).Create(self); TuniFrame1(FCurrentFrame).uniLabel1.caption := 'hello world'); TuniFrame1(FCurrentFrame).uniLabel2.caption := 'by'; FCurrentFrame.Destroy; end; I tried to follow some examples of demos, but unfortunately could not. Can anyone help me do this? Grateful. (Translated by Google) ***************************************************************** Bom dia! Estou com um problema e eu não estou conseguindo resolver. Vamos lá: Quando eu trabalho com uniForms normais, é muito fácil alterar o caption de um label de um form através de outro. Exemplo: TuniForm2.btOkClick procedure (Sender: TObject); begin uniForm1.uniLabel1.caption: = uniForm2.uniLabel2.Caption; end; O que eu não estou conseguindo fazer: TuniForm2.btOkClick procedure (Sender: TObject); begin uniFrame1.uniLabe1.caption: = uniForm2.uniLabel2.Caption; end; Esse código, não dá erro. (No debug) O texto é enviado ao Label, mas por algum motivo não chega ao destino: TuniForm2.btOkClick procedure (Sender: TObject); begin FCurrentFrame := TUniFrameClass(FindClass('TuniFrame1')).Create(self); TuniFrame1(FCurrentFrame).uniLabel1.caption := 'hello world'); TuniFrame1(FCurrentFrame).uniLabel2.caption := 'by'; FCurrentFrame.Destroy; end; Tentei seguir uns exemplos dos demos, mas infelizmente não consegui. Alguém pode me ajudar a fazer isso? Grato.