Como acessar um objeto dentro de um componente?

07/07/2008

0

Olá pessoal....

Alguém sabe como faço para acessar um objeto dentro de um componente?

Estou usando o componente [b:765b361a81]TJvScrollMax[/b:765b361a81] da JEDI.
Dentro desse componente é colocado outro, o [b:765b361a81]TJvScrollMaxBand[/b:765b361a81] (é uma banda do estilo QReport), mas não se trata de componente de impressão.

Dentro do [b:765b361a81]TJvScrollMaxBand[/b:765b361a81] tem um botão (FButton) o mesmo é protegido, eu uso muitos componentes [b:765b361a81]TJvScrollMaxBand[/b:765b361a81] e cada um deles tem o mesmo botão e eu quero acessar somente o botão de apenas um [b:765b361a81]TJvScrollMaxBand[/b:765b361a81] e não de TODOS. Então queria capturar exatamente esse botão.

Para quem tem o JEDI instalado, copie o código do objeto abaixo e coloque no form que verá de qual componente eu estou falando:

object JvScrollMax1: TJvScrollMax
  Left = 22
  Top = 40
  Width = 360
  Height = 181
  ButtonFont.Charset = DEFAULT_CHARSET
  ButtonFont.Color = clWindowText
  ButtonFont.Height = -9
  ButtonFont.Name = ´Small Fonts´
  ButtonFont.Style = []
  AutoHeight = False
  ScrollBarVisible = False
  BevelOuter = bvNone
  ParentColor = True
  TabOrder = 1
  object JvScrollMaxBand33: TJvScrollMaxBand
    Width = 354
    Height = 125
    Caption = ´Papel de Parede´
    ExpandedHeight = 125
    ButtonVisible = True
    ButtonFont.Charset = ANSI_CHARSET
    ButtonFont.Color = clWindowText
    ButtonFont.Height = -11
    ButtonFont.Name = ´Arial´
    ButtonFont.Style = [fsBold]
    Beveled = False
    BorderWidth = 4
    ParentBeveled = False
    ParentButtonVisible = False
    ParentButtonFont = False
    OnDblClick = JvScrollMaxBand1DblClick
  end
end


Este componente ao clicar no botão (o qual quero capturar) ele expande a aba em runtime, quero deixar este botão desabilitado, mas não sei como acessar ele.


Onjahyr

Onjahyr

Responder

Posts

07/07/2008

Onjahyr

Já consegui resolver, editei o próprio fonte do componente e implementei uma propriedade ButtonEnabled. Funcionando legal...

Blz.


Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar