Olá Silvio, não tenho o código aqui comigo agora mas seria mais ou menos isso:
//componente
type
meuedit = class(tedit)
image: timage;
constructor create....
end;
constructor create....
begin
image:= timage.create.
...
end
ai no meu código ficaria assim para criar o componente:
var
edt: tmeuedit;
begin
edt:= tmeuedit.create....
edt.parent:= self;
...
end
//em outra funcao coloco o meu edit como invisivel
edt.visible:= false;
bem, aqui tenho o problema, o edit fica invisivel e a imagem nao.
eu poderia fazer assim
edt.visible:= false;
edt.image.visible:= edt.visible;
mas acho que nao seria a melhor forma, acredito que tenha como eu eu fazer
edt.visible:= false e neste momento atribuir automaicamente o mesmo vaor para a
propriedade visible da imagem.
se precisar poso o fonte para ser analisado, porém consigo fazer isso apenas
amanhã.
desde já obrigado
Ezequiel
________________________________
De: Silvio Clécio <silvioprog@...>
Para: objectpascal@...
Enviadas: Domingo, 12 de Abril de 2009 19:14:59
Assunto: Res: [objpascal] Ajuda criação de componente
Olá galera,
Bom, como vc não mostrou parte da implementação, vou dar um tiro no escuro:
-------
SeuTImage.Visible := SeuTEdit.Visible;
-------
Talvez seja interessante dar um Repaint após mudar o estado de Visible do
SeuTImage. Agora cuidado, não vai dar um Repaint num evento tipo OnPaint. :)
P.S.: Veja sobre "CMVisibleChanged" , pode ser uma boa. ;)
____________ _________ _________ __
[]'s, Silvio Clécio
---
Linux User: #481900
Skype: silvioprog
ICQ: 432519902
E-mail, Y! Messenger: silvioprog@yahoo. com.br
Gmail, GTalk: silvioprog@gmail. com
BlogSite: http://silvioprog. blogspot. com/
BlogSpot: http://silvioclecio .blogspot. com/
VirtualDriver: http://silvioprog. 4shared.com/
°oO| Seja livre, use Linux! |Oo°
____________ _________ _________ __
De: Ezequiel <epianegonda@ yahoo.com. br>
Para: objectpascal@ yahoogrupos. com.br
Enviadas: Domingo, 12 de Abril de 2009 18:48:32
Assunto: [objpascal] Ajuda criação de componente
Pessoal, estou precisando de uma ajuda na criação de um componente. Este
componente está herdando de um TEdit e no seu construtor, criando uma imagem. O
problema é o seguinte, quando eu crio meu componente ele exibe a imagem numa boa
porém se eu torna-lo invisível (meuedit.visible: = false) a imagem continua
visível. Oque eu quero fazer é atribuir false na propriedade visible do meu
componente e ele deixar a imagem invisível também.
Alguém poderia me ajudar?
Obrigado
Ezequiel
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbusca dos.yahoo. com
[As partes desta mensagem que não continham texto foram removidas]
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com
[As partes desta mensagem que não continham texto foram removidas]